CE PLUS - Nota 008937
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Seguro
Data/Hora da Publicação: 02/09/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:25:14
Descrição da Nota: NÃO CONTABILIZA FATURA DE SEGURO COM INCOTERM CFR, CIF
Sintoma
Não esta contabilizando Fatura de Seguro com Incoterm CFR e CIF
Solução
Verficar se o Incoterm e caso seja FOB e não tenha gerado Custo de Frete não gerar a contabilização
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08937 Data: 02/09/2009 Hora: 10:49:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08937
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00010
Agrupamento : 00112
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08834 - 00001 - 7.0 - 00010 - AO SALVAR FATURA DE SEGURO OCORRE DUMP.
----------------------------------------------------------------------------------------------------
NÃO CONTABILIZA FATURA DE SEGURO COM INCOTERM CFR, CIF
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - SEGURO - CONTABILIZAÇÃO - INCOTERM - CFR - CIF
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
IF sy-subrc EQ 0.
IF NOT itab_zyglt100-zexit_ativa IS INITIAL.
v_ml = 'F43'.
PERFORM (itab_zyglt100-formulario) IN PROGRAM
(itab_zyglt100-programa) IF FOUND.
ENDIF.
ENDIF.
IF e_subrc EQ '0'.
PERFORM multiplos_lancamentos.
ENDIF.
* >> Início da exclusão: FORM FILL_DATE_F-43_F-02
IF /pws/zycie006-tpfatura EQ '03' AND v_fretei_custo IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM FILL_DATE_F-43_F-02
IF /pws/zycie006-tpfatura EQ '03' AND v_fretei_custo IS INITIAL
AND /pws/zycit031-inco1_ci = 'FOB'.
* << Fim da inclusão
EXIT.
ENDIF.
PERFORM get_parameters_f-43_f-02.
itab_zycbe033-mandt = sy-mandt.
itab_zycbe033-tcode = v_trans.
itab_zycbe033-tabela = '/PWS/ZYCIT006'.
IF v_parcela = 'X'.
itab_zycbe033-tabela = '/PWS/ZYCIT132'.
ELSE.
itab_zycbe033-tabela = '/PWS/ZYCIT006'.
...