Histórico da Página

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

Árvore de páginas