Módulo: CÂMBIO IMPORTAÇÃO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 08/12/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 09:49:08
Descrição da Nota: PROCESSAR BOLETO - FINANCIAMENTO - FILTRO POR DATA PARC. PRIN/JUR
Sintoma
Ao processar boleto de parcela de principal ou juros de financiamento, mesmo colocando até a data
final das parcelas, não estão aparecendo todas, sendo que nenhuma esta paga, portanto deveriam
aparecer. As de comissão aparecem corretamente.
Solução
Retirar a condição de filtro por data incorreta, na seleção da tabela /PWS/ZYCBT113, para trazer os
dados corretamente.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02651 Data: 08/12/2006 Hora: 11:38:06
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02651
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00142
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02175 - 00001 - 6.0 - 00025 - ROTINA DE PAGAMENTO - CAMPO DATA "DE" "ATÉ"
----------------------------------------------------------------------------------------------------
PROCESSAR BOLETO - FINANCIAMENTO - FILTRO POR DATA PARC. PRIN/JUR
----------------------------------------------------------------------------------------------------
Palavras Chave:
PROCESSAR BOLETO FINANCIAMENTO FILTRO POR DATA PARC. PRIN/JUR
/PWS/ZYCBT113-DTFINAL PARCELA PRINCIPAL PARCELA JUROS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYGLR001
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYGLR001
...
ENDFORM.
FORM seleciona_financi.
FREE itab_zycbt113.
IF data-high IS INITIAL.
SELECT nrseq tpparc nrparc nrfinanc dtinicio dtfinal
txjfixa txjvar txjtotal aliqir vlme vlir txtinf
APPENDING TABLE itab_zycbt113
FROM /pws/zycbt113
WHERE ( dtpagto EQ '00000000' OR dtpagto EQ ' ' )
AND dtfinal LE v_data
* >> Início da exclusão: FORM SELECIONA_FINANCI
AND dtfinal IN data
* << Fim da exclusão
AND status NE 'E'
AND tpparc NE 'C'
AND nrseq IN financi.
ELSE.
SELECT nrseq tpparc nrparc nrfinanc dtinicio dtfinal
txjfixa txjvar txjtotal aliqir vlme vlir txtinf
APPENDING TABLE itab_zycbt113
FROM /pws/zycbt113
WHERE ( dtpagto EQ '00000000' OR dtpagto EQ ' ' )
* >> Início da exclusão: FORM SELECIONA_FINANCI
AND dtfinal IN data
* << Fim da exclusão
AND dtfinal IN data
AND status NE 'E'
AND tpparc NE 'C'
AND nrseq IN financi.
ENDIF.
IF data-high IS INITIAL.
SELECT nrseq tpparc nrparc nrfinanc dtinicio dtvecto
txjfixa txjvar txjtotal aliqir vlme vlir txtinf
APPENDING TABLE itab_zycbt113
FROM /pws/zycbt113
...