Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 31/05/2011 00:00:00
Data/Hora Última Alteração: 31/05/2011 17:10:40
Descrição da Nota: NÃO RECALCULAR A TAXA SISCOMEX SE A DI POSSUIR REGISTRO
Sintoma
O valor da taxa siscomex está sendo recalculado com o valor novo mesmo para DIs antigas.
Solução
Não recalcular a taxa siscomex se a DI possui registro
8.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11193 Data: 31/05/2011 Hora: 16:36:40
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11193
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00073
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
----------------------------------------------------------------------------------------------------
NÃO RECALCULAR A TAXA SISCOMEX SE A DI POSSUIR REGISTRO
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - TAXA SISCOMEX - CALCULO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
FORM fill_taxasiscomex USING p_adics.
* >> Início da inclusão: FORM FILL_TAXASISCOMEX
IF /pws/zycie085-nrdi IS INITIAL AND
/pws/zycie085-dtreg IS INITIAL.
* << Fim da inclusão
...
...
itab_zycit049-waers = /pws/zycie093-waersfre.
PERFORM trata_decimais USING itab_zycit049-vlreal
CHANGING itab_zycit049-vldp.
PERFORM: calc_conv_moeda:
USING /pws/zycie093-waersfre wa_zycbt007-waersb
CHANGING itab_zycit049-vlreal.
ELSE.
itab_zycit049-vlreal = /pws/zycie093-ternacion.
ENDIF.
MODIFY itab_zycit049 INDEX v_tabix TRANSPORTING vldp vlreal waers.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM FILL_TAXASISCOMEX
ELSE.
READ TABLE itab_zycit095 WITH KEY receita = '7811' .
IF sy-subrc EQ 0.
s_wsisco = itab_zycit095-valor .
ENDIF.
ENDIF.
* << Fim da inclusão
...