CE PLUS - Nota 004005
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 21/06/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 10:00:53
Descrição da Nota: OS VALORES DOS IMPOSTOS SE MODIFICAM DEVIDO AO REGIME ESTAR EM BRANCO
Sintoma
Entrando na DI, detalhe do item, navegando em todos os itens e voltando para a pasta carga 3,
os valores dos impostos se modificam.
Solução
Realizado ajustes para preencher o regime tributario caso este esteja em branco.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04005 Data: 21/06/2007 Hora: 17:09:34
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04005
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00001
Agrupamento : 00171
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
OS VALORES DOS IMPOSTOS SE MODIFICAM DEVIDO AO REGIME ESTAR EM BRANCO
----------------------------------------------------------------------------------------------------
Palavras Chave:
ITAB_IT-CODREGTRIPISCOFI, ITAB_IT-CODREGTRI, ITAB_IT-CODREGTRIIPI,
ITAB_IT-CODREGTRIICMS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
ENDIF.
ENDIF.
ELSE.
IF NOT v_tval3 IS INITIAL.
itab_it-vlfob = ( ( itab_it-qtd_iten * itab_it-vlreal )
/ v_tval3 ) * v_tval.
ENDIF.
ENDIF.
v_aux_rateio = v_aux_rateio + itab_it-vlfob.
ENDIF.
* >> Início da inclusão: FORM CALC_ITAB
IF itab_it-codregtripiscofi IS INITIAL.
itab_it-codregtripiscofi = '1'.
ENDIF.
IF itab_it-codregtri IS INITIAL.
MOVE 1 TO itab_it-codregtri.
ENDIF.
IF itab_it-codregtriipi IS INITIAL.
MOVE 3 TO itab_it-codregtriipi.
ENDIF.
IF itab_it-codregtriicms IS INITIAL.
IF itab_it-modalidade NE 'I'.
itab_it-codregtriicms = itab_it-codregtri.
ELSE.
itab_it-codregtriicms = '1'.
ENDIF.
ENDIF.
* << Fim da inclusão
MOVE itab_it TO wa_it.
MOVE-CORRESPONDING: itab_it TO /pws/zycie100a,
itab_it TO /pws/zycie003.
IF /pws/zycie085-mdadicao = 'N'.
IF /pws/zycie085-vlfob IS INITIAL.
/pws/zycie085-vlfob = v_tval.
ENDIF.
ENDIF.
IF s_fbvr IS INITIAL.
PERFORM load_fbvl.
...