FR650FIL - Recebe os Títulos do arquivo de retorno de comunicação bancária

O ponto de entrada FR650FIL recebe os Títulos do arquivo de retorno de comunicação bancária.

User Function FR650FIL()
Local aValores := PARAMIXB
Local lRet := .T.


Alert( 'Número do Título: ' + aValores[1,1];
+ ' Data da Baixa: ' + DTOC(aValores[1,2]);
+ ' Tipo do Título: ' + aValores[1,3];
+ ' Nosso Número: ' + aValores[1,4];
+ ' Despesa: ' + Str(aValores[1,5]);
+ ' Desconto: ' + Str(aValores[1,6]);
+ ' Abatimento: ' + Str(aValores[1,7]);
+ ' Valor Recebido: ' + Str(aValores[1,8]);
+ ' Juros: ' + Str(aValores[1,9]);
+ ' Multa: ' + Str(aValores[1,10]);
+ ' Valor CC: ' + Str(aValores[1,11]);
+ ' Credito: ' + DTOC(aValores[1,12]);
+ ' Ocorrência: ' + aValores[1,13];
+ ' Buffer: ' + aValores[1,14])

Return lRet

Português(Brasil)

Versões_Anteriores

Todos

Todas

PARAMIXB - array(aValores)

Return lRet

Execblock("FR650FIL",.F.,.F.,{aValores})

FINR650.PRX