Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 23/05/2014 09:56:47
Data/Hora Última Alteração: 23/05/2014 09:56:47
Descrição da Nota: AO NAO ENCONTRAR ALIQUOTAS NO PARÂMETRO, NÃO FAZ A BUSCA SEM REGIME.
Sintoma
Ao nao encontrar aliquotas no parâmetro, não faz a busca sem regime.
Solução
Corrigir o preenchimento do campo.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13948 Data: 22/05/2014 Hora: 10:21:52
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13948
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 9.0
Pacote : 00007
Agrupamento : 00170
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
13076 - 00001 - 9.0 - 00005 - ATUALIZAR ALÍQUOTAS NA DI - DESENVOLVIMENTO ADICIONAL
13226 - 00002 - 9.0 - 00006 - TABELAS DE ALIQUOTA DE PIS E COFINS NÃO VERIFICA VIGENCIA NA DI
13435 - 00003 - 9.0 - 00006 - NA CRIAÇÃO, NÃO GRAVA ALIQUOTA DE PIS E COFINS ALTERADA
----------------------------------------------------------------------------------------------------
AO NAO ENCONTRAR ALIQUOTAS NO PARÂMETRO, NÃO FAZ A BUSCA SEM REGIME.
----------------------------------------------------------------------------------------------------
Palavras Chave:
ALIQUOTAS - PARAMETRO - PIS - COFINS - DI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F05
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F05
...
itab_it-pis_alorig =
itab_it-advalpis = itab_zycit405-aliquotas.
ELSE.
READ TABLE itab_zycit407
WITH KEY tributos = 'PIS'
regime = itab_zycit001-regime.
IF sy-subrc EQ 0.
itab_it-basredpis = itab_zycit407-basred.
itab_it-pis_alorig =
itab_it-advalpis = itab_zycit407-aliquotas.
* >> Início da exclusão: FORM ATUALIZA_ALIQUOTAS
ELSE.
itab_it-basredpis = itab_it-advalpis.
CLEAR : itab_it-advalpis,
itab_it-vlpis .
* << Fim da exclusão
ENDIF.
ENDIF.
ENDIF.
ENDIF.
IF itab_it-basredpis IS INITIAL.
READ TABLE itab_zycit406 WITH KEY matnr = itab_it-matnr
tributos = 'PIS'.
IF sy-subrc EQ 0
AND itab_zycit406-vigencia LE /pws/zycie085-dttax
AND NOT itab_zycit406-vigencia IS INITIAL .
...
...
itab_it-cof_alorig =
itab_it-advalcofins = itab_zycit405-aliquotas.
ELSE.
READ TABLE itab_zycit407
WITH KEY tributos = 'COFINS'
regime = itab_zycit001-regime.
IF sy-subrc EQ 0.
itab_it-basredcof = itab_zycit407-basred.
itab_it-cof_alorig =
itab_it-advalcofins = itab_zycit407-aliquotas.
* >> Início da exclusão: FORM ATUALIZA_ALIQUOTAS
ELSE.
itab_it-basredcof = itab_it-advalcofins.
CLEAR : itab_it-advalcofins,
itab_it-vlcofins .
* << Fim da exclusão
ENDIF.
ENDIF.
ENDIF.
ENDIF.
IF itab_it-basredcof IS INITIAL.
READ TABLE itab_zycit406 WITH KEY matnr = itab_it-matnr
tributos = 'COFINS'.
IF sy-subrc EQ 0
AND itab_zycit406-vigencia LE /pws/zycie085-dttax.
itab_it-basredcof = itab_zycit406-basred.
...
...
itab_it-pis_alorig =
itab_it-advalpis = itab_zycit405-aliquotas.
ELSE.
READ TABLE itab_zycit407
WITH KEY tributos = 'PIS'
regime = itab_zycit001-regime.
IF sy-subrc EQ 0.
itab_it-basredpis = itab_zycit407-basred .
itab_it-pis_alorig =
itab_it-advalpis = itab_zycit407-aliquotas.
* >> Início da exclusão: FORM LOAD_ALIQPISCOF
ELSE.
itab_it-basredpis = itab_it-advalpis.
CLEAR : itab_it-advalpis,
itab_it-vlpis .
* << Fim da exclusão
ENDIF.
ENDIF.
ENDIF.
ENDIF.
IF itab_it-basredpis IS INITIAL.
READ TABLE itab_zycit406 WITH KEY matnr = itab_zycit003-matnr
tributos = 'PIS'.
IF sy-subrc EQ 0 AND
itab_zycit406-vigencia LE /pws/zycie085-dttax.
itab_it-basredpis = itab_zycit406-basred .
...
...
itab_it-cof_alorig =
itab_it-advalcofins = itab_zycit405-aliquotas.
ELSE.
READ TABLE itab_zycit407
WITH KEY tributos = 'COFINS'
regime = itab_zycit001-regime.
IF sy-subrc EQ 0.
itab_it-basredcof = itab_zycit407-basred .
itab_it-cof_alorig =
itab_it-advalcofins = itab_zycit407-aliquotas.
* >> Início da exclusão: FORM LOAD_ALIQPISCOF
ELSE.
itab_it-basredcof = itab_it-advalcofins.
CLEAR : itab_it-advalcofins,
itab_it-vlcofins .
* << Fim da exclusão
ENDIF.
ENDIF.
ENDIF.
ENDIF.
IF itab_it-basredcof IS INITIAL.
READ TABLE itab_zycit406 WITH KEY matnr = itab_zycit003-matnr
tributos = 'COFINS'.
IF sy-subrc EQ 0 AND
itab_zycit406-vigencia LE /pws/zycie085-dttax.
itab_it-basredcof = itab_zycit406-basred .
...