CE PLUS - Nota 005516
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 21/12/2007 00:00:00
Data/Hora Última Alteração: 10/03/2010 17:44:54
Descrição da Nota: LIQUIDAÇÃO DE FATURAS
Sintoma
O programa não estava levando corretamente a taxa de câmbio das faturas.
Solução
Alterada include /PWS/MZYCB004F02, verificando se o campo BELNR6 da fatura está em branco,
caso esteja, considera o campo BELNR para pesquisa que busca o valor de taxa de câmbio.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05516 Data: 21/12/2007 Hora: 16:37:45
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05516
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00026
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
LIQUIDAÇÃO DE FATURAS
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO DE FATURAS - TAXA DO FATURAM.2ª FAT DESM CLIENTE
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
AND wa_zycbt007-liq_trans EQ 'T'.
EXIT.
ENDIF.
IF itab_zycbt030-belnr IS INITIAL.
IF v_docto NE itab_zycbt030-nrinvoic.
v_docto = itab_zycbt030-nrinvoic.
MESSAGE i265 WITH itab_zycbt030-nrinvoic.
ENDIF.
v_belnr = itab_zycbt030-belnr.
ELSE.
* >> Início da inclusão: FORM LANCAMENTO_PROVISAO2
IF itab_zycbt030-belnr6 IS INITIAL.
v_belnr = itab_zycbt030-belnr.
ELSE.
* << Fim da inclusão
v_belnr = itab_zycbt030-belnr6.
* >> Início da inclusão: FORM LANCAMENTO_PROVISAO2
ENDIF.
* << Fim da inclusão
ENDIF.
SELECT kursf FROM bkpf
INTO v_kursf6
WHERE bukrs = itab_zycbt005-bukrs AND
belnr = v_belnr AND
gjahr = itab_zycbt030-budat(4).
...
...
AND wa_zycbt007-liq_trans EQ 'T'.
EXIT.
ENDIF.
IF itab_zycbt030-belnr IS INITIAL.
IF v_docto NE itab_zycbt030-nrinvoic.
v_docto = itab_zycbt030-nrinvoic.
MESSAGE i265 WITH itab_zycbt030-nrinvoic.
ENDIF.
v_belnr = itab_zycbt030-belnr.
ELSE.
* >> Início da inclusão: FORM LANCAMENTO_PROVISAO3
IF itab_zycbt030-belnr6 IS INITIAL.
v_belnr = itab_zycbt030-belnr.
ELSE.
* << Fim da inclusão
v_belnr = itab_zycbt030-belnr6.
* >> Início da inclusão: FORM LANCAMENTO_PROVISAO3
ENDIF.
* << Fim da inclusão
ENDIF.
SELECT kursf FROM bkpf
INTO v_kursf6
WHERE bukrs = itab_zycbt005-bukrs AND
belnr = v_belnr AND
gjahr = itab_zycbt030-budat(4).
...