Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: LJRECVER - Verificação dos títulos selecionados


Abrangências:Protheus 12
Versões:Protheus 12
Compatível Países:Argentina , Bolívia , Brasil , Chile , Colômbia , México
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil) , Português (Portugal) , Espanhol


Descrição:
Ponto de Entrada para tratar a pesquisa dos títulos em aberto do cliente, chamado nas funções LJRecPesq e LJRecEstorna, após os títulos terem sido selecionados.
Programa Fonte
LOJXREC.PRW
Sintaxe

LJRECVER - Verificação dos títulos selecionados ( [ @aTitReceb ] ) --> aTitRetor

Parâmetros:



Nome

Tipo

Descrição

Default

Obrigatório

Referência

aTitReceb

Array of Record

Títulos selecionados para verificação







X


Retorno
aTitRetor
    (array_of_record)
  • Array com os títulos para prosseguir.
Observações
Executado na tela de Venda Assistida no recebimento de títulos.

Recebe Array com as posições conforme exemplo abaixo: 
 .F.,;  // 1. Posicao logica.
 "",;  // 2. Prefixo do titulo.
 "",;  // 3. Titulo.
 "",;  // 4. Parcela.
 CToD(""),; // 5. Vencimento real.
 0,;   // 6. Valor.
 0,;   // 7. Multa.
 0,;   // 8. Juros.
 0,;   // 9. Desconto.
 0,;   // 10. Recebimento.
 "",;  // 11. Tipo.
 "",;  // 12. Contrato.
 "",;  // 13. Cliente.
 "",;  // 14. Loja.
 "",;  // 15. Filial.
 0,;   // 16. RecNo.
 0,;   // 17. Acrescimo financeiro.
 .F.,;  // 18. Posicao logica.
 0,;   // 19. Abatimento.
 CToD(""),; // 20. Vencimento original.
 "",;  // 21. Chave do registro
 1 ,;  // 22. Codigo da moeda do titulo
 0    // 23. Interes (Juros) - Posicao reservada
Exemplos
User Function LJRECVER ()Local nPosTit := 0Local aTitRetor := {}Local aTitReceb := := iIf( PARAMIXB <> nil, aClone(PARAMIXB[1]), {} )For nPosTit := 1 to Len( aTitReceb )	aAdd( aTitRetor, aTitReceb[nPosTit] )Next nPosTitReturn aClone(aTitRetor)