Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Custo Efetivo
Data/Hora da Publicação: 18/04/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:25:25
Descrição da Nota: SISTEMA ESTA SE PERDENDO NA COMPOSIÇÃO DO VALOR TOTAL DA PASTA ITEM NO D
Sintoma
Sistema está se perdendo na composição do valor Total da pasta Item, no detalhe da Nota Fiscal
Global.
Solução
Ajustado calculo incorreto no FORM CALCULAR_OUTROS_CUSTOS.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01215 Data: 18/04/2006 Hora: 10:27:10
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01215
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00109
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
SISTEMA ESTA SE PERDENDO NA COMPOSIÇÃO DO VALOR TOTAL DA PASTA ITEM NO D
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPOSIÇÃO - VALOR - TOTAL - NFG
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCIR006
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR006
...
v_valor = itab_zycit036-vlreal.
ENDIF.
v_val_tots = v_val_tots + v_valor.
MOVE v_valor TO v_val.
ELSE.
* >> Início da exclusão: FORM CALCULAR_OUTROS_CUSTOS
IF NOT v_val_tots IS INITIAL AND itab_zycit036-origem = 'NF'
* << Fim da exclusão
.
* >> Início da exclusão: FORM CALCULAR_OUTROS_CUSTOS
v_val = ( /pws/zycit085-vlseg * /pws/zycit085-ukursseg )
- v_val_tots .
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS
if not v_val_tots is initial and itab_zycit036-origem = 'NF'.
v_val = ( /pws/zycit085-vlseg * /pws/zycit085-ukursseg ) .
perform retorna_decimais using /pws/zycit085-waersseg
changing v_val.
v_val = v_val - v_val_tots.
* << Fim da inclusão
ELSE.
IF itab_zycit036-origem = 'NF'.
IF t001-land1 = 'BR'.
v_valor = itab_zycit100-vlseg.
ELSE.
...
...
ENDIF.
IF v_tot_lins = 1 .
v_val = ( /pws/zycit085-vlseg *
/pws/zycit085-ukursseg ) .
ELSE.
* >> Início da exclusão: FORM CALCULAR_OUTROS_CUSTOS
v_val = ( /pws/zycit085-vlseg *
/pws/zycit085-ukursseg ) -
v_valor .
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS
v_val = ( /pws/zycit085-vlseg *
/pws/zycit085-ukursseg ) - v_valor .
* << Fim da inclusão
ENDIF.
ELSE.
v_valor = itab_zycit036-vlreal.
v_val = itab_zycit036-vlreal.
ENDIF.
...