CE PLUS - Nota 001559
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 12/06/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:48:49
Descrição da Nota: NOTA FISCAL NÃO ESTÁ ATUALIZANDO VALOR DO CUSTO EFETIVO.
Sintoma
Ao salvar a fatura com novo valor não está atualizando o custo efetivo.
Solução
Ajustada valor gravado na /PWS/ZYCIT036.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01559 Data: 12/06/2006 Hora: 10:04:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01559
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00117
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NOTA FISCAL NÃO ESTÁ ATUALIZANDO VALOR DO CUSTO EFETIVO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
IF okcode NE 'DELE'.
IF /pws/zycie006-ratval EQ '3'.
PERFORM trata_decimais USING /pws/zycie006-waers
CHANGING itab_zycit003-total.
ENDIF.
* >> Início da inclusão: FORM CUSTEANDO_DESPESA_INCO
IF sy-tcode = '/PWS/ZYCI003_L'.
/pws/zycie036-vlreal = /pws/zycie006-vlmerc.
ELSE.
* << Fim da inclusão
/pws/zycie036-vlreal = itab_zycit003-total +
itab_zycit036-vlreal.
* >> Início da inclusão: FORM CUSTEANDO_DESPESA_INCO
ENDIF.
* << Fim da inclusão
ELSE.
READ TABLE itab_zycit003_ini WITH KEY
ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
IF sy-subrc EQ 0.
...