Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 06/12/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:50:48
Descrição da Nota: NA FATURA 04 DÁ MENSAGEM COM DECIMAIS ERRADA.
Sintoma
Ao criar a fatura de despesa e preencher o campo valor aparece uma mensagem para preenchimento da
pasta despesa, este valor que aparece está incorreto.
Solução
Fazer o tratamento de moeda/casas decimais antes de emitir mensagem.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02613 Data: 06/12/2006 Hora: 15:41:57
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02613
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00142
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NA FATURA 04 DÁ MENSAGEM COM DECIMAIS ERRADA.
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA 04 - MENSAGEM INCORRETA - FATURA DE DESPESAS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
ENDIF.
IF /pws/zycie006-tpfatura EQ '04'.
PERFORM verifica_despesas.
ENDIF.
ENDFORM.
FORM trata_ente.
IF /pws/zycie006-tpfatura = '04'.
PERFORM soma_despesa.
IF v_tot_desp <> /pws/zycie006-vltotal.
v_tot_desp = /pws/zycie006-vltotal - v_tot_desp.
* >> Início da exclusão: FORM TRATA_ENTE
MOVE v_tot_desp TO v_total_desp.
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_ENTE
WRITE v_tot_desp TO v_total_desp CURRENCY /pws/zycie006-waers.
* << Fim da inclusão
MESSAGE s061 WITH text-051 v_total_desp text-020 .
ENDIF.
ENDIF.
PERFORM move_pais.
PERFORM trata_fabricante.
ENDFORM.
FORM consiste_fabr.
IF '02' CA /pws/zycie006-fabricante .
READ TABLE itab_mfrnr WITH KEY ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
...