Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:BackOffice
Módulo:Financeiro
Idioma:Português(Brasil)
Função:

FINA850 - Ordem de Pago 2


02. DESCRIÇÃO

...

O ponto de entrada A087TUDOK permite a validação do painel de pagamentos do modelo II (MODII) na rotina Financeiro (FINA850).

...

Observações

Permite o uso da variável cNatureza.

03. PARÂMETROS

Não se aplica.

04. RETORNO

User Function A085TUDOK()
Local lRet

Nome

Tipo

Descrição

lRet

Lógico

.T.

Exemplos

a validação foi aceita
.F. a validação não foi aceita

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleA085BTN
linenumberstrue
#INCLUDE "Totvs.ch"

User Function A085TUDOK()

Local lRet :=.T.

...



If !(MsgYesNo("Confirma pagamento do titulo "+ParamIxb[1][1][1][10]+" para o provedor "+ ParamIxb[1][1][1][1] +"\"+ParamIxb[1][1][1][16]+" no valor de "+Transform(ParamIxb[1][1][1][6],"@E 9,999,999,999,999.99")+"?"))

...


	
	lRet :=.F.

...



Endif

...



If lRet .and. !MsgYesNo("Confirma o uso de tipo "+ParamIxb[1][3][2][1][1]+" em moeda "+ ParamIxb[1][3][2][1][4] +" com data de emissão "+dtoc(ParamIxb[1][3][2][1][11])+" e de vencimento "+dtoc(ParamIxb[1][3][2][1][12])+"?")

...


	
	lRet :=.F.

...



Endif

...



If lRet.and. !MsgYesNo("Confirma o uso da natureza "+cNatureza+"?")

...



	lRet :=.F.

...



Endif

...

idioma

...

Português(Brasil)

...

Versões

...

Microsiga_Protheus11

...

Sistemas Operacionais Suportados

...

Todos

...

Compatível com as Bases de Dados

...

Todas

...

Retorno

...

Lret(logico)
.T. a validação foi aceita
.F. a validação não foi aceita

...

Eventos de chamada do Ponto de Entrada

...

No tudo Ok do FINA850

...

Programa Fonte

...



Return Lret