Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 09/03/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 13:40:35
Descrição da Nota: ESTÁ RECOLHENDO VALOR DO ICMS MESMO QUANDO ISENÇÃO NA DI.
Sintoma
está recolhendo valor do icms mesmo quando isenção.
Solução
verificar se regime tributário do icms for isenção, não recolher o valor.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03226 Data: 09/03/2007 Hora: 17:25:54
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03226
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00156
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02325 - 00001 - 6.0 - 00025 - TRATAMENTO PARA SUSPENSÃO DE ICMS NA DI POR REGIÃO
03113 - 00002 - 6.0 - 00026 - EM DI VINCULADA COM DRAWBACK LEVA O VALOR A RECOLHER DO ICMS PARA
03158 - 00003 - 6.0 - 00026 - DI E DA COM PARAMETRO DA 062
----------------------------------------------------------------------------------------------------
ESTÁ RECOLHENDO VALOR DO ICMS MESMO QUANDO ISENÇÃO NA DI.
----------------------------------------------------------------------------------------------------
Palavras Chave:
VALOR DO ICMS - VALOR A RECOLHER - ISENÇÃO - DI
REGIME TRIBUTÁRIO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
t_icmsbs - a_piscalc - a_cofcalc.
ENDIF.
IF /pws/zycie100a-codregtriicms EQ '5'.
t_icmsbs_d2 = t_icmsbs =
t_icmsbs - t_icms.
ENDIF.
IF /pws/zycie100a-baseicms LT 0.
CLEAR itab_zycit100-baseicms.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM LOAD_IICMS
IF '35' ca /pws/zycie100a-codregtriicms .
* << Fim da inclusão
* >> Início da exclusão: FORM LOAD_IICMS
IF /pws/zycie100a-codregtriicms EQ '5'.
* << Fim da exclusão
CLEAR: t_icmsx, t_icms_d2, t_icms.
ENDIF.
ELSE.
t_icms_d2 = t_icms = ( /pws/zycie003-advalicms / 100 ) *
t_icmsbs.
* >> Início da exclusão: FORM LOAD_IICMS
IF /pws/zycie100a-codregtriicms EQ '5'.
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_IICMS
IF '35' ca /pws/zycie100a-codregtriicms .
* << Fim da inclusão
CLEAR: t_icmsx, t_icms_d2, t_icms.
ENDIF.
ENDIF.
IF p_tipo = 'I' OR p_tipo = 'T' .
s_wicdevi = s_wicdevi + t_icms .
s_wpisreco = s_wpisreco + t_pis .
s_wcofreco = s_wcofreco + t_cofins.
IF NOT /pws/zycie003-nrseqd IS INITIAL OR
NOT v_nratoc IS INITIAL.
* >> Início da exclusão: FORM LOAD_IICMS
IF /pws/zycie100a-codregtriicms EQ '5'.
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_IICMS
IF '35' ca /pws/zycie100a-codregtriicms .
* << Fim da inclusão
CLEAR: t_icms.
screen-input = '0'.
ELSE.
ENDIF.
ELSEIF /pws/zycie003-nrseqd IS INITIAL.
ENDIF.
s_wicreco = s_wicreco + t_icms .
ELSEIF p_tipo = 'A'.
a_icdevi = a_icdevi + t_icms.
a_icreco = a_icreco + a_icdevi.
...