Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 29/06/2011 00:00:00
Data/Hora Última Alteração: 11/07/2011 15:53:15
Descrição da Nota: TAXA SISCOMEX NÃO ESTÁ ENTRANDO NO CALCULO DO ICMS
Sintoma
Ao preencher a data de registro ou o numero da DI o valor da TAXA SISCOMEX deixa de ser considerado
no calculo do ICMS.
Solução
Ajustado programa para preencher o valor da taxa siscomex na variável v_sisco3.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11283 Data: 29/06/2011 Hora: 14:32:26
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11283
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00008
Agrupamento : 00075
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11193 - 00001 - 8.0 - 00007 - NÃO RECALCULAR A TAXA SISCOMEX SE A DI POSSUIR REGISTRO
----------------------------------------------------------------------------------------------------
TAXA SISCOMEX NÃO ESTÁ ENTRANDO NO CALCULO DO ICMS
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - TAXA - SISCOMEX - CALCULO - ICMS - MODIFICANDO
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
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 inclusão: FORM FILL_TAXASISCOMEX
v_sisco3 =
* << Fim da inclusão
s_wsisco = itab_zycit095-valor .
ENDIF.
ENDIF.
e_subrc = 0.
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI023'
'DI019'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY zexit = 'DI019' BINARY SEARCH.
IF sy-subrc EQ 0.
...