Descrição | Ponto de entrada para verificar os dados do título a ser pago, podendo também manipular o valor a ser recebido. |
---|
Programa fonte | LOJXREC.PRW |
---|
Parâmetros | Nome | Tipo | Descrição |
---|
Paramixb[1] | Numérico | Valor total do/s título/s Selecionado/s (Não pode ser manipulado) | Paramixb[2] | Array | Array com os dados dos títulos com seguinte estrutura: Posição | Tipo | Descrição |
---|
01 | Lógico | Titulo selecionado | 02 | Caractere | Prefixo | 03 | Caractere | Numero do título | 04 | Caractere | Parcela | 05 | Data | Vencimento | 06 | Numérico | Valor | 07 | Numérico | Valor Multa | 08 | Numérico | Valor Juros | 09 | Numérico | Valor Desconto | 10 | Numérico | Valor Recebido | 11 | Caractere | Tipo | 12 | Caractere | Contrato | 13 | Caractere | Cliente | 14 | Caractere | Loja | 15 | Caractere | Filial Titulo | 16 | Numérico | Recno | 17 | Numérico | Valor Acréscimo | 18 | Lógico | Conc. Acrs. | 19 | Numérico | Valor abatimento | 20 | Data | Vencimento Original | 21 | Caractere | Lock | 22 | Numérico | Moeda | 23 | NIL | - | 24 | Data | Data da baixa | 25 | Numérico | Saldo | 26 | Numérico | Valor Liq |
|
|
---|
Retorno | Array de duas posições na seguinte estrutura: Posição 01 | Valor numérico recebido por Paramixb[1], com valor total a ser recebido, deve ser retornado o mesmo valor que foi recebido. |
---|
Posição 02 | Array recebido pelo Paramixb[2] com os títulos do cliente. OBS: A única posição que é efetivamente verificada pelo padrão será a posição 10 de valor a ser recebido. |
---|
|
---|
Exemplo | User Function LJRECALT() Local aRetorno := {} //Retorno do PE Local nTotal := Paramixb[1] //Array com os titulos a receber do cliente Local aTitulo := Paramixb[2] //Array com os titulos a receber do cliente Local nX := 0 //Controle de For
For nX := 1 To Len(aTitulo) If aTitulo[nX][01] // Titulo selecionado?
/* || Lógica para verificar e manipular valores do titulo */ EndIf NexT Aadd(aRetorno,nTotal) Aadd(aRetorno,aTitulo)
Return (aRetorno) |
---|