Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 08/04/2010 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:21:57
Descrição da Nota: CORRIGIDO CONTABILIZAÇÃO(MIRO) DE PROCESSOS CIF
Sintoma
A fatura de mercadorias não está contabilizando processos CIF quando é informado valor para frete e
seguro.
Solução
Ajustada montagem dos registros para a contabilização da fatura de mercadorias.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10044 Data: 08/04/2010 Hora: 10:25:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10044
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00003
Agrupamento : 00016
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10030 - 00001 - 8.0 - 00003 - AJUSTES AMÉRICA LATINA
----------------------------------------------------------------------------------------------------
CORRIGIDO CONTABILIZAÇÃO(MIRO) DE PROCESSOS CIF
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - MERCADORIA - TEXTO - ERRO - VALOR - FRETE - SEGURO - CIF
/PWS/SAPMZYCI003.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
CLEAR itab_konv.
LOOP AT itab_zycit030 WHERE codigo = 'SEGURO'.
READ TABLE itab_konv WITH KEY knumv = itab_ekko_a-knumv
kposn = v_ebelp
kschl = itab_zycit030-kschl.
IF sy-subrc EQ 0.
EXIT.
ENDIF.
ENDLOOP.
IF itab_konv-kschl IS INITIAL.
* >> Início da exclusão: FORM MIRO_AM_LA
CLEAR: v_vlfr.
* << Fim da exclusão
* >> Início da inclusão: FORM MIRO_AM_LA
CLEAR: v_vlsg.
* << Fim da inclusão
ENDIF.
CLEAR itab_konv.
* >> Início da exclusão: FORM MIRO_AM_LA
LOOP AT itab_zycit030 WHERE codigo = 'SEGURO'.
* << Fim da exclusão
* >> Início da inclusão: FORM MIRO_AM_LA
LOOP AT itab_zycit030 WHERE codigo = 'FRETEI'.
* << Fim da inclusão
READ TABLE itab_konv WITH KEY knumv = itab_ekko_a-knumv
kposn = v_ebelp
kschl = itab_zycit030-kschl.
IF sy-subrc EQ 0.
* >> Início da exclusão: FORM MIRO_AM_LA
itab_zycit031-lgort = itab_zycit030-kschl.
* << Fim da exclusão
EXIT.
ENDIF.
ENDLOOP.
IF itab_konv-kschl IS INITIAL.
CLEAR: v_vlfr.
ENDIF.
itab_zycit031-wrbtr = itab_zycit031-wrbtr - v_vlfr.
IF /pws/zycit031-inco1_ci EQ 'CIF'.
itab_zycit031-wrbtr = itab_zycit031-wrbtr - v_vlsg.
ENDIF.
...