CE PLUS - Nota 006635
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 28/05/2008 00:00:00
Data/Hora Última Alteração: 11/03/2010 09:49:45
Descrição da Nota: VINCULAÇÃO - HISTÓRICO CONTÁBIL DA CAPTAÇÃO
Sintoma
O programa de captação não mostra o pagamento de juros.
Solução
Adicionado código para que a data de pagamento no exterior seja gravada corretamente.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06635 Data: 28/05/2008 Hora: 13:25:52
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06635
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00005
Agrupamento : 00049
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
VINCULAÇÃO - HISTÓRICO CONTÁBIL DA CAPTAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - HISTÓRICO CONTÁBIL DA CAPTAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB009F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F03
...
/pws/zycbt004-vlir = itab_zycbt005-vlir.
/pws/zycbt004-aliqir = itab_zycbt005-aliqir.
/pws/zycbt004-waers = itab_zycbt005-waers_c.
IF NOT itab_zycbt005-dtcredext IS INITIAL.
/pws/zycbt004-dtliquid = itab_zycbt005-dtcredext.
ELSE.
/pws/zycbt004-dtliquid = '00000000'.
ENDIF.
IF /pws/zycbe001-tpcontr(1) EQ 'D' AND
/pws/zycbt089-f_cont_vinc NE 'A'.
* >> Início da exclusão: FORM ATUALIZA_ZYCBT004
MOVE itab_zycbt005-dtvincul TO /pws/zycbt004-dtliquid.
* << Fim da exclusão
* >> Início da inclusão: FORM ATUALIZA_ZYCBT004
MOVE:
/PWS/ZYCBE006-DTPAGTO TO /pws/zycbt004-dtliquid,
/PWS/ZYCBE006-DTPAGEXT TO /pws/zycbt004-dtpagext.
* << Fim da inclusão
ENDIF.
PERFORM grava_cco.
CLEAR:
/pws/zycbt004-percdesp,
/pws/zycbt004-txcneg,
/pws/zycbt004-belnr,
/pws/zycbt004-dtpagto.
MODIFY /pws/zycbt004.
COMMIT WORK.
ENDIF.
...