Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 12/04/2011 00:00:00
Data/Hora Última Alteração: 13/04/2011 14:49:05
Descrição da Nota: A DI CALCULA ERRADO AO RATEAR DESPESA DE DEDUÇÃO ENTRE AS ADIÇÕES
Sintoma
A DI calcula errado ao ratear despesas parametrizadas como dedução entre as adições com rateio por
tipo valor realizado.
Solução
Considerar mais de um item da adição ao fazer o rateio de despesas parametrizadas como dedução na
/PWS/ZYCIT019
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11087 Data: 12/04/2011 Hora: 16:46:09
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11087
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00066
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
06715 - 00001 - 7.0 - 00005 - VALORES DE ACRÉSCIMO E DEDUÇÃO DE DESPESAS ESTÃO INCORRETOS NA AD
----------------------------------------------------------------------------------------------------
A DI CALCULA ERRADO AO RATEAR DESPESA DE DEDUÇÃO ENTRE AS ADIÇÕES
----------------------------------------------------------------------------------------------------
Palavras Chave:
ERRO - CÁLCULO - ADIÇÕES - DI - DEDUÇÃO - /PWS/ZYCIT019
VALOR REALIZADO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023O01
...
ELSE.
IF /pws/zycit062-bs_rat_icms EQ 'CIF'.
IF NOT /pws/zycie085-vlfob IS INITIAL AND NOT
/pws/zycie085-ukursfre IS INITIAL.
* >> Início da exclusão: MODULE FILL_STRUCT049C
v_wa_vlrealc = ( itab_zycit049-vlreal *
* << Fim da exclusão
* >> Início da inclusão: MODULE FILL_STRUCT049C
LOOP AT itab_it WHERE adicao = wa_it-adicao.
v_wa_vlrealc = v_wa_vlrealc + ( ( itab_zycit049-vlreal *
* << Fim da inclusão
( itab_it-vlfob + ( itab_it-vlfre / /pws/zycie085-ukursfre )
+ ( itab_it-vlseg / /pws/zycie085-ukursseg ) )
* >> Início da exclusão: MODULE FILL_STRUCT049C
/ ( /pws/zycie085-vlfob + v_bltofat + v_sgtofat ) ) .
v_wa_vldpc = ( itab_zycit049-vldp *
* << Fim da exclusão
* >> Início da inclusão: MODULE FILL_STRUCT049C
/ ( /pws/zycie085-vlfob + v_bltofat + v_sgtofat ) ) ) .
v_wa_vldpc = v_wa_vldpc + ( ( itab_zycit049-vldp *
* << Fim da inclusão
( itab_it-vlfob + ( itab_it-vlfre / /pws/zycie085-ukursfre )
+ ( itab_it-vlseg / /pws/zycie085-ukursseg ) )
* >> Início da exclusão: MODULE FILL_STRUCT049C
/ ( /pws/zycie085-vlfob + v_bltofat + v_sgtofat ) ) .
* << Fim da exclusão
* >> Início da inclusão: MODULE FILL_STRUCT049C
/ ( /pws/zycie085-vlfob + v_bltofat + v_sgtofat ) ) ) .
ENDLOOP.
* << Fim da inclusão
ENDIF.
...