Histórico da Página

Descrição	O ponto de entrada A850TOK2 permite a geração de pagamento antecipado - PA, na rotina ordem de pagamento modelo II pagamentos do modelo II (MODII),na rotina do Financeiro (FINA850).
Observações	Permite o uso da variável private cNatureza.
Exemplos	User Function A850TOK2() 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 Return Lret
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	Validação na geração do PA na rotina FINA850
Variáveis	aSE2 (array com todos os dados do titulo)
Programa Fonte	FINA850 - Financeiro

Árvore de páginas