Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 23/07/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:10:11
Descrição da Nota: QUANDO HÁ REDUÇÃO EM PIS E COFINS, NÃO CONSIDERA VALOR REDUZIDO
Sintoma
Quando há redução em pis e cofins, não considera valor reduzido.
Solução
Quando o regime for redução, considerar valor reduzido mesmo zerado.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08719 Data: 23/07/2009 Hora: 13:53:07
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08719
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00010
Agrupamento : 00106
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03671 - 00001 - 7.0 - 00001 - ERRO NOS CÁLCULOS DA ADIÇÃO DA DI, DEPENDENDO DOS REGIMES TRIBUTÁ
07456 - 00002 - 7.0 - 00007 - AO VISUALIZAR RELATÓRIO DE RATEIO, DESPESA ANTIDUMP ESTÁ INCORRET
08356 - 00003 - 7.0 - 00009 - ADMISSÃO TEMPORÁRIA ARTIGO 373
----------------------------------------------------------------------------------------------------
QUANDO HÁ REDUÇÃO EM PIS E COFINS, NÃO CONSIDERA VALOR REDUZIDO
----------------------------------------------------------------------------------------------------
Palavras Chave:
REDUÇÃO - PIS/COFINS - VALOR REDUZIDO - DI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
CASE /pws/zycie100a-codregtripiscofi.
WHEN '4'.
* >> Início da exclusão: FORM MP_NOVA
IF /pws/zycie100a-basredpis IS INITIAL OR
* << Fim da exclusão
* >> Início da inclusão: FORM MP_NOVA
IF
* << Fim da inclusão
/pws/zycie100a-basredpis GT '100' .
v_pisred = ( /pws/zycie100a-advalpis / 100 ).
ELSE.
v_pisred = ( /pws/zycie100a-basredpis / 100 ).
ENDIF.
* >> Início da exclusão: FORM MP_NOVA
IF /pws/zycie100a-basredcof IS INITIAL OR
* << Fim da exclusão
* >> Início da inclusão: FORM MP_NOVA
IF
* << Fim da inclusão
/pws/zycie100a-basredcof GT '100'.
* >> Início da exclusão: FORM MP_NOVA
IF ( itab_zycit001-regime EQ '05' OR
itab_zycit001-regime EQ '12' ) AND
NOT /pws/zycie100a-cof_alorig IS INITIAL.
v_cofred = ( /pws/zycie100a-cof_alorig / 100 ).
ELSE.
* << Fim da exclusão
v_cofred = ( /pws/zycie100a-advalcofins / 100 ).
* >> Início da exclusão: FORM MP_NOVA
ENDIF.
* << Fim da exclusão
ELSE.
v_cofred = ( /pws/zycie100a-basredcof / 100 ).
ENDIF.
...
...
WHEN '4'.
* >> Início da exclusão: FORM CALC_PISCOFINS
IF /pws/zycie100a-basredpis IS INITIAL OR
* << Fim da exclusão
* >> Início da inclusão: FORM CALC_PISCOFINS
IF
* << Fim da inclusão
/pws/zycie100a-basredpis GT '100' .
IF itab_zycit001-regime EQ '05' OR
itab_zycit001-regime EQ '12'.
v_pisadm = a_pisdevi = a_pisredu =
( /pws/zycie100a-pis_alorig / 100 ) *
/pws/zycie100a-basepis.
ELSE.
t_pis = a_pisdevi = a_pisredu =
( /pws/zycie100a-advalpis / 100 ) *
/pws/zycie100a-basepis.
ENDIF.
ELSE.
t_pis = a_pisdevi = a_pisredu =
( /pws/zycie100a-basredpis / 100 ) *
/pws/zycie100a-basepis.
ENDIF.
* >> Início da exclusão: FORM CALC_PISCOFINS
IF /pws/zycie100a-basredcof IS INITIAL OR
* << Fim da exclusão
* >> Início da inclusão: FORM CALC_PISCOFINS
IF
* << Fim da inclusão
/pws/zycie100a-basredcof GT '100'.
t_cofins = a_cofredu = a_cofdevi =
( /pws/zycie100a-advalcofins / 100 ) *
/pws/zycie100a-basecofins.
ELSE.
...