CE PLUS - Nota 005046
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 22/10/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 10:48:12
Descrição da Nota: NO REGIME 05 ADMISSÃO TEMPORÁRIA O REGIME TRIBUTÁRIO NA DI SERA SUSPENSO
Sintoma
Não verificava se o regime é de admissão temporária para fazer o tratamento do Regime tributário
como Suspenso e a alteração do ad valorem alterava o no II
Solução
Verificava se o regime é de admissão temporária para fazer o tratamento do Regime tributário como
Suspenso e não alteração do ad valorem no II
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05046 Data: 22/10/2007 Hora: 16:47:04
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05046
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00018
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NO REGIME 05 ADMISSÃO TEMPORÁRIA O REGIME TRIBUTÁRIO NA DI SERA SUSPENSO
----------------------------------------------------------------------------------------------------
Palavras Chave:
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI023 0400
DYNP /PWS/SAPMZYCI023 0430
DYNP /PWS/SAPMZYCI023 0431
REPS /PWS/MZYCI023F01
REPS /PWS/MZYCI023I01
REPS /PWS/MZYCI023O01
REPS /PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023I01
...
/pws/zycie085-ntimp '1'
CHANGING t_regdes.
ELSEIF v_dit = 'N'.
CLEAR: /pws/zycie085-ntimp.
PERFORM: load_regt USING /pws/zycie100a-codregtri
/pws/zycie085-ntimp '1'
CHANGING t_regdes.
ENDIF.
CLEAR: /pws/zycie100a-codfunleg, t_fundes.
IF ' 269' NA /pws/zycie100a-codregtri.
* >> Início da exclusão: MODULE CALC_VII
IF NOT /pws/zycie003-aliqii IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: MODULE CALC_VII
IF NOT /pws/zycie003-aliqii IS INITIAL
AND /pws/zycie003-advalii IS INITIAL.
* << Fim da inclusão
/pws/zycie003-advalii = /pws/zycie003-aliqii.
ENDIF.
ENDIF.
IF /pws/zycie100a-codregtri EQ '6'.
CLEAR /pws/zycie003-advalii.
ENDIF.
ENDIF.
ENDMODULE.
MODULE calc_vipi INPUT.
MOVE-CORRESPONDING /pws/zycie100a TO itab_it.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023O01
...
ebeln = itab_it-ebeln
ebelp = itab_it-ebelp.
itab_it-pproc = /pws/zycie100a-pproc = itab_zycit003-paisfab.
ENDIF.
IF itab_it-codregtri IS INITIAL.
itab_it-codregtri = /pws/zycie100a-codregtri = '1'.
ENDIF.
IF /pws/zycie100a-codregtriipi IS INITIAL.
/pws/zycie100a-codregtriipi = '3'.
ENDIF.
* >> Início da inclusão: MODULE LOAD_DATA_BLITEM
if sy-tcode = '/PWS/ZYCI023_C'.
if itab_zycit001-regime = '05' and
itab_zycit001-tpdecl = 'DI'.
itab_it-codregtri = '5'.
itab_it-codregtripiscofi = '5'.
itab_it-codregtriipi = '5'.
itab_it-codregtriicms = '5'.
endif.
endif.
* << Fim da inclusão
MOVE itab_it TO wa_it.
MOVE-CORRESPONDING: itab_it TO /pws/zycie100a,
itab_it TO /pws/zycie003.
v_idx = v_ip.
v_tipop = 'T' .
PERFORM: load_ifre USING v_tipop,
load_itax USING v_tipop.
PERFORM calcula_impostos USING v_tipop .
IF v_dit = 'N'.
PERFORM fill_it115b.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/SAPMZYCI023