Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 26/05/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 15:11:57
Descrição da Nota: LIQUIDAÇÃO DE FATURAS - ESTORNO
Sintoma
Quando vinculamos faturas usando a opção de determinar uma data para o credito no exterior no
momento da vinculação, o programa calcula o juros antes da liquidação, após pagar o Juros e tentar
liquidar as faturas, caso tenha a necessidade de excluir uma fatura da Table control da liquidação,
o programa não permite excliu-la, pois há uma consistencia onde o programa verifica na tabela 004 se
há Pagto de juros, como neste cenario é possível pagar juros antes da liquidação, o programa deverá
fazer uma consistencia verificando a tabela 006 ao invés da 004, caso seja necessario excluir
faturas da table control será necessario consistir para ver se os juros já tenha sido pago, o
programa não deixará excluir uma fatura com juros pagos.
Solução
Ajuste efetuado no Estorno da Liquidação,desfazendo a consistencia com a tabela /pws/zycbt004.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01435 Data: 26/05/2006 Hora: 16:22:50
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01435
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
Texto Rápido:
LIQUIDAÇÃO DE FATURAS - ESTORNO
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO DE FATURAS - ESTORNO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004I01
...
IF /pws/zycbe001-f_encerrado NE ' ' AND
/pws/zycbe001-f_encerrado NE 'I'.
MESSAGE i015 WITH text-171 text-172.
EXIT.
ENDIF.
* >> Início da inclusão: MODULE USER_COMMAND_0100
if sy-tcode ne c_transacao_c.
* << Fim da inclusão
LOOP AT itab_zycbt005 WHERE mark = 'X'.
v_index_1 = sy-tabix.
PERFORM busca_pgto_juros USING itab_zycbt005-nrseqc
itab_zycbt005-nrparc
itab_zycbt005-dtvincul
...
...
CLEAR itab_zycbt005.
ELSE.
MESSAGE i061 WITH text-155 itab_zycbt005-nrinvoic
text-157 text-156.
ENDIF.
* >> Início da inclusão: MODULE USER_COMMAND_0100
ENDLOOP.
else.
loop at itab_zycbt005 where mark = 'X'.
v_index_1 = sy-tabix.
delete itab_zycbt005 index v_index_1.
clear itab_zycbt005.
* << Fim da inclusão
ENDLOOP.
* >> Início da inclusão: MODULE USER_COMMAND_0100
endif.
* << Fim da inclusão
WHEN 'LISTA'.
...