CE PLUS - Nota 011402
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 04/01/2012 15:10:24
Data/Hora Última Alteração: 04/01/2012 15:10:24
Descrição da Nota: O VALOR DO ICMS ESTÁ SENDO RECALCULADO AO ALTERAR DI.
Sintoma
O valor do icms está sendo recalculado quando colocamos a data de registro e a declaração
Solução
Corrigir cálculo de Rateio de siscomex ao preencher data de registro e declaração da DI.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11402 Data: 22/08/2011 Hora: 10:27:49
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11402
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00008
Agrupamento : 00083
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11193 - 00002 - 8.0 - 00007 - NÃO RECALCULAR A TAXA SISCOMEX SE A DI POSSUIR REGISTRO
11283 - 00003 - 8.0 - 00008 - TAXA SISCOMEX NÃO ESTÁ ENTRANDO NO CALCULO DO ICMS
05477 - 00001 - 7.0 - 00003 - AJUSTADO RATEIO DO SEGURO PARA PROCESSOS CIF A GRANEL
----------------------------------------------------------------------------------------------------
O VALOR DO ICMS ESTÁ SENDO RECALCULADO AO ALTERAR DI.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - SISCOMEX - VALOR ICMS - TAXA SISCOMEX
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
CHANGING itab_zycit049-vlreal.
ELSE.
itab_zycit049-vlreal = /pws/zycie093-ternacion.
ENDIF.
MODIFY itab_zycit049 INDEX v_tabix TRANSPORTING vldp vlreal waers.
ENDIF.
ENDIF.
ELSE.
READ TABLE itab_zycit095 WITH KEY receita = '7811' .
IF sy-subrc EQ 0.
* >> Início da exclusão: FORM FILL_TAXASISCOMEX
v_sisco3 =
* << Fim da exclusão
s_wsisco = itab_zycit095-valor .
* >> Início da inclusão: FORM FILL_TAXASISCOMEX
IF v_pii EQ 'X'.
READ TABLE itab_zycit049 WITH KEY
tpdesp = /pws/zycit000-cod_sisc
baseii = 'X'.
CLEAR: v_pii.
IF sy-subrc NE 0.
EXIT.
ENDIF.
ELSE.
READ TABLE itab_zycit049 WITH KEY
tpdesp = /pws/zycit000-cod_sisc
baseicms = 'X'.
IF sy-subrc NE 0.
EXIT.
ENDIF.
ENDIF.
IF NOT p_adics IS INITIAL.
v_sisco1 = ( s_wsisco -
/pws/zycit000-txsis_fix ) / p_adics.
v_sisco2 = /pws/zycit000-txsis_fix / p_adics.
ENDIF.
v_sisco3 = v_sisco1 + v_sisco2.
* << Fim da inclusão
ENDIF.
ENDIF.
...