CE PLUS - Nota 007331
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 18/09/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 12:42:51
Descrição da Nota: LIQUIDAÇÃO PERFORMANCE - CONTRATO E FATURA COM DIVISÃO DIFERENTE
Sintoma
1 - Ao liquidar uma fatura, com performance, onde também a divisão da fatura é diferente da divisão
do contrato, no desmembramento do contrato esta enviando a divisão incorreta, da fatura.
2 - Na baixa da performance esta enviando a divisão incorreta, do contrato.
Solução
1 - enviar o valor do campo /PWS/ZYCBT001-GSBER(divisão do contrato)
2 - enviar o valor do campo /PWS/ZYCBT006-GSBERF(divisão da fatura)
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07331 Data: 18/09/2008 Hora: 17:30:23
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07331
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00007
Agrupamento : 00065
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05920 - 00001 - 7.0 - 00004 - LIQUIDAÇÃO - DIVISÃO CONTRATO/DIVISÃO FATURA DIFERENTES - CÂMBIO
07290 - 00002 - 7.0 - 00006 - DUMP NO PROGRAMA DE LIQUIDAÇÃO - PRÉ PAGTO (LINEAR SOBRE CAMBIAIS
----------------------------------------------------------------------------------------------------
LIQUIDAÇÃO PERFORMANCE - CONTRATO E FATURA COM DIVISÃO DIFERENTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO PERFORMANCE CONTRATO E FATURA COM DIVISÃO DIFERENTE
CONTABILIZAÇÃO F-30 GSBER GSBERF
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
PERFORM verify_null_field USING wa_zycbt011_d-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011_d-blart.
ELSE.
PERFORM verify_null_field USING wa_zycbt011-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011-blart.
ENDIF.
* >> Início da exclusão: FORM DESMEMBRA_ACE
itab_zycbe033-d_gsber = itab_zycbt006-gsberf.
IF /pws/zycbt001-tpcontr(1) = 'C'.
* << Fim da exclusão
itab_zycbe033-d_gsber = /pws/zycbt001-gsber.
* >> Início da exclusão: FORM DESMEMBRA_ACE
ENDIF.
* << Fim da exclusão
itab_zycbe033-c_gsber = itab_zycbe033-d_gsber.
IF /pws/zycbt089-tx_desm_ace = 'DTFECH' OR
/pws/zycbt089-tx_desm_ace = 'DTFECH1' .
IF wa_zycbt007-dtjuros = 'DTPAGEXT'.
v_dtliquid = itab_zycbt006-dtpagext.
ELSEIF wa_zycbt007-dtliquid = 'DTPAGTO'.
...
...
PERFORM verify_null_field USING wa_zycbt011_d-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011_d-blart.
ELSE.
PERFORM verify_null_field USING wa_zycbt011-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011-blart.
ENDIF.
* >> Início da exclusão: FORM BAIXA_CLIENTE_PERFORMANCE
itab_zycbe033-d_gsber = itab_zycbt006-gsber.
itab_zycbe033-c_gsber = itab_zycbt006-gsber.
* << Fim da exclusão
* >> Início da inclusão: FORM BAIXA_CLIENTE_PERFORMANCE
itab_zycbe033-d_gsber = itab_zycbt006-gsberf.
itab_zycbe033-c_gsber = itab_zycbt006-gsberf.
* << Fim da inclusão
IF wa_zycbt007-dtliqcp EQ 'DTCONTR' AND
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
ELSEIF wa_zycbt007-dtliqcp EQ 'TXCONTR' AND
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
ELSE.
PERFORM verifica_data2 USING wa_zycbt007-dtliquid
itab_zycbt006-dtpagto.
IF NOT v_databl IS INITIAL.
...