CE PLUS - Nota 006914
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 04/07/2008 00:00:00
Data/Hora Última Alteração: 11/03/2010 09:55:05
Descrição da Nota: LIQUIDAÇÃO - TAXAS CONTÁBEIS DE ACORDO COM /PWS/ZYGL007
Sintoma
N liquidação de câmbio pronto sem liquidação automática, no desmembramento do contrato o sistema
está buscando a "Taxa do Desmembramento do ACE" da /pws/zygl007, enquanto o correto é buscar
a "Taxa Cambial de Liquidação CP" da empresa do contrato. No clearing do contrato o sistema está
buscando a "Taxa Cambial de Liquidação CP" da /pws/zygl007, enquanto o correto é buscar a
"Taxa Cambial de Liquidação." da empresa do contrato. Para as captações de tipo E, da mesma forma,
no desmembramento do contrato, o sistema está buscando a "Taxa do Desmembramento do ACE" da
/pws/zygl007, enquanto o correto é buscar a "Taxa Cambial de Liquidação CP" da empresa do
contrato. No clearing o sistema está buscando a taxa correta.
Solução
Verificar campo/parâmetro correto de taxa, na /pws/zygl007, para buscar as mesmas.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06914 Data: 04/07/2008 Hora: 11:12:58
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06914
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
Texto Rápido:
LIQUIDAÇÃO - TAXAS CONTÁBEIS DE ACORDO COM /PWS/ZYGL007
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO - TAXAS CONTÁBEIS DE ACORDO COM /PWS/ZYGL007
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
ENDCASE.
v_dtliquid+6(2) = '01'.
v_dtcontr+6(2) = '01'.
IF v_dtliquid EQ v_dtcontr.
CLEAR /pws/zycbt089-tx_desm_cli.
/pws/zycbt089-tx_desm_ace = 'DTCONTR'.
ENDIF.
ENDIF.
PERFORM verifica_data2 USING /pws/zycbt089-tx_desm_ace
itab_zycbt006-dtpagto.
* >> Início da inclusão: FORM DESMEMBRA_ACE
IF /pws/zycbt001-tpcontr(1) EQ 'E' OR
/pws/zycbt001-tpcontr(1) EQ 'C'.
PERFORM verifica_data2 USING wa_zycbt007-dtliqcp
itab_zycbt006-dtpagto.
ENDIF.
* << Fim da inclusão
IF NOT v_databl IS INITIAL.
PERFORM define_cambio USING v_databl
itab_zycbt006-waers
wa_zycbt007-waersb
itab_zycbe033-kursf.
ENDIF.
CLEAR itab_zycbt012.
CONCATENATE '003' /pws/zycbe005-tpcontr INTO v_codeven.
CASE itab_zycbt006-tpcontr+0(1).
WHEN 'A' OR 'E' OR 'C'.
...
...
ENDIF.
ENDCASE.
ENDLOOP.
PERFORM get_parameters_003.
itab_zycbe033-d_gsber = itab_zycbt006-gsberf.
SELECT SINGLE dtemb kurrf_bl viatrans dtaverb dtcruze nrseq
FROM /pws/zycet001
INTO (v_dtemb, v_kurrf_bl, v_viatrans, v_dtaverb2, v_dtcruze,
v_nrseq)
WHERE nrseq EQ itab_zycbt006-nrinvoic.
* >> Início da exclusão: FORM BAIXA_CLIENTE_ACE
IF wa_zycbt007-dtliqcp EQ 'DTCONTR' AND
* << Fim da exclusão
* >> Início da inclusão: FORM BAIXA_CLIENTE_ACE
IF wa_zycbt007-dtliquid EQ 'DTCONTR' AND
* << Fim da inclusão
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
* >> Início da exclusão: FORM BAIXA_CLIENTE_ACE
ELSEIF wa_zycbt007-dtliqcp EQ 'TXCONTR' AND
* << Fim da exclusão
* >> Início da inclusão: FORM BAIXA_CLIENTE_ACE
ELSEIF wa_zycbt007-dtliquid EQ 'TXCONTR' AND
* << Fim da inclusão
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
...