CE PLUS - Nota 011156
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 13/05/2011 00:00:00
Data/Hora Última Alteração: 30/05/2011 15:15:18
Descrição da Nota: NÃO ESTÁ LANÇANDO O VALOR DA TAXA SISCOMEX NAS DESPESAS DA NOTA FISCAL
Sintoma
Ao gerar a nota fiscal global o valor da taxa SISCOMEX não está sendo somada as despesas da nota
fiscal.
Solução
Atualizada verificação do parametro de rateio para a taxa SISCOMEX nas mensagens da NF.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11156 Data: 13/05/2011 Hora: 13:56:27
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11156
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00070
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10748 - 00001 - 8.0 - 00005 - AO CRIAR NF DE CENÁRIO COM ERRO DÁ DUMP.
10894 - 00002 - 8.0 - 00006 - VALOR TOTAL DA NF ESTÁ INCORRETO.
11137 - 00003 - 8.0 - 00007 - RATEIO TAXA SISCOMEX NAS MENSAGENS DA NOTA FISCAL
----------------------------------------------------------------------------------------------------
NÃO ESTÁ LANÇANDO O VALOR DA TAXA SISCOMEX NAS DESPESAS DA NOTA FISCAL
----------------------------------------------------------------------------------------------------
Palavras Chave:
TAXA - SISCOMEX - DESPESAS - NOTA - FISCAL -
/PWS/SAPMZYCI016
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
/pws/zycit062-rateio_tx_sisc = 'X' ).
IF itab_zycit042_sisc[] IS INITIAL.
CLEAR: itab_zycit042_sisc.
MOVE: itab_zycit042_d[] TO itab_zycit042_sisc[].
MODIFY itab_zycit042_sisc TRANSPORTING vldp
WHERE vldp NE itab_zycit042_sisc-vldp.
ENDIF.
ENDIF.
IF ( ( itab_zycit049_a-tpdesp NE /pws/zycit000-cod_sisc OR
( itab_zycit049_a-tpdesp EQ /pws/zycit000-cod_sisc AND
* >> Início da exclusão: FORM SELECIONA_DESPESAS
/pws/zycit062-rateio_tx_sisc = 'X' AND
* << Fim da exclusão
/pws/zycit000-flag_txsisc IS INITIAL ) ) AND
itab_zycit049_a-tpdesp NE /pws/zycit000-cod_antidump ) OR
/pws/zycit001-tpdecl = 'DSI'.
IF itab_zycit049_a-tpdesp EQ /pws/zycit000-cod_antidump AND
/pws/zycit001-tpdecl NE 'DSI'.
CONTINUE.
ENDIF.
CLEAR: v_tot_vldp, v_vldp.
LOOP AT itab_zycit042_d.
MOVE sy-tabix TO v_tabix.
...
...
ELSE.
IF NOT v_tot_real IS INITIAL.
v_vldp = itab_zycit049_a-vldp *
( itab_zycit003-vlreal *
itab_zycit003-qtd_iten / v_tot_real ).
ENDIF.
ENDIF.
ENDIF.
v_tot_vldp = v_tot_vldp + v_vldp.
itab_zycit042_d-vldp = itab_zycit042_d-vldp + v_vldp.
* >> Início da inclusão: FORM SELECIONA_DESPESAS
CLEAR v_vldp.
ENDIF.
* << Fim da inclusão
IF ( itab_zycit049_a-tpdesp EQ /pws/zycit000-cod_sisc AND
/pws/zycit062-rateio_tx_sisc = 'X' ).
itab_zycit042_sisc-vldp = itab_zycit042_sisc-vldp + v_vldp.
MODIFY itab_zycit042_sisc TRANSPORTING vldp
WHERE nrseqnf = itab_zycit042_d-nrseqnf
AND nrseq = itab_zycit042_d-nrseq
AND nfglobal = itab_zycit042_d-nfglobal
AND ebeln = itab_zycit042_d-ebeln
AND ebelp = itab_zycit042_d-ebelp.
ENDIF.
* >> Início da exclusão: FORM SELECIONA_DESPESAS
CLEAR v_vldp.
ENDIF.
* << Fim da exclusão
MODIFY itab_zycit042_d.
ENDIF.
ENDLOOP.
ENDIF.
ENDLOOP.
LOOP AT itab_zycit042_d.
v_totitem = v_totitem + ( itab_zycit042_d-netpr *
itab_zycit042_d-qtd_iten ).
ENDLOOP.
...