Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 22/06/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 13:42:32
Descrição da Nota: BASE DE CÁLCULO DE PIS E COFINS FICA ERRADO COM II ISENTO
Sintoma
valor errado na base de cálculo do pis e cofins.
Solução
Atualização do programa da DI para não levar a alíquota de II para a base de pis e cofins quando for
um processo com isenção de II.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04020 Data: 22/06/2007 Hora: 16:28:18
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04020
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00001
Agrupamento : 00171
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01602 - 00001 - 6.0 - 00023 - AJUSTES HOMOLOGAÇÃO DI - CÁLCULOS, DESPESAS, REGIMES
----------------------------------------------------------------------------------------------------
BASE DE CÁLCULO DE PIS E COFINS FICA ERRADO COM II ISENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
BASE DE CÁLCULO - PIS - COFINS - II - REGIME TRIBUTÁRIO - ISENÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
/pws/zycie100a-basredpis = '0'.
ENDIF.
IF /pws/zycie100a-basredcof >= '100'.
/pws/zycie100a-basredcof = '0'.
ENDIF.
IF /pws/zycie100a-codregtri EQ '4'.
v_advii = /pws/zycie100a-reduzida / 100 .
IF /pws/zycie100a-reduzida IS INITIAL.
v_advii = /pws/zycie003-advalii / 100 .
ENDIF.
* >> Início da inclusão: FORM MP_NOVA
elseif /pws/zycie100a-codregtri eq '3' .
clear v_advii.
* << Fim da inclusão
ENDIF.
IF /pws/zycie100a-codregtriipi EQ '2'.
v_advipi = /pws/zycie100a-reduzidaipi / 100.
IF /pws/zycie100a-reduzidaipi IS INITIAL.
v_advipi = /pws/zycie003-advalipi / 100.
ENDIF.
ELSEIF /pws/zycie100a-codregtriipi EQ '4' AND
/pws/zycie003-advalipi IS INITIAL.
v_advipi = itab_it-ipi_recolher / itab_it-baseipi .
ELSEIF /pws/zycie100a-codregtriipi EQ '1' .
...
...
...
...