Histórico da Página

Descrição	Ponto de entrada para

manipular

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[

2

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

UserFunction 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 := 1To 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)

Árvore de páginas

Versões comparadas

Versão antiga 8

Nova versão Atual

Chave