CE PLUS - Nota 009626
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 23/12/2009 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:02:08
Descrição da Nota: AO CRIAR FATURA TIPO P NAO GRAVA VALOR CONVERTIDO COM TAXA DA DI.
Sintoma
Ao criar fatura tipo P após a DI nao grava na tabela /PWS/ZYCIT036, valor convertido com taxa da di.
Solução
Verificar se a fatura P já possui DI e converter valor com taxa da /PWS/ZYCIT085
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 09626 Data: 23/12/2009 Hora: 16:49:29
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 09626
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00002
Agrupamento : 00001
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04574 - 00001 - 7.0 - 00002 - TRATAMENTO DE CASAS DECIMAIS PARA A MOEDA DA FATURA DE DESPESAS
----------------------------------------------------------------------------------------------------
AO CRIAR FATURA TIPO P NAO GRAVA VALOR CONVERTIDO COM TAXA DA DI.
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA DE DESPESA TIPO P - DI - CONVERSÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
MOVE-CORRESPONDING itab_zycit003 TO itab_item_funcao.
APPEND itab_item_funcao.
ENDLOOP.
CLEAR v_erro_tax.
IF /pws/zycie006-tpfatura EQ '04'.
LOOP AT itab_zycit047.
MOVE: itab_zycit047-tpdesp TO itab_desp_funcao-tpdesp,
itab_zycit047-vldp TO itab_desp_funcao-netpr,
itab_zycit047-waers TO itab_desp_funcao-waers.
IF /pws/zycie006-waers NE /pws/zycbt007-waersb.
* >> Início da inclusão: FORM VISUALIZA_RATEIO
IF /pws/zycie006-frpagto EQ 'P' AND
NOT /pws/zycit085 IS INITIAL.
PERFORM busca_taxas.
IF v_kursf IS INITIAL.
MESSAGE e015 WITH text-001.
v_erro_tax = 'X'.
endif.
itab_desp_funcao-netpr =
( itab_desp_funcao-netpr * v_kursf ) .
ELSE.
* << Fim da inclusão
PERFORM busca_taxa_dia.
IF v_kursf IS INITIAL.
MESSAGE e015 WITH text-001.
v_erro_tax = 'X'.
ELSE.
itab_desp_funcao-netpr =
( ( itab_desp_funcao-netpr * v_kursf ) / v_parafator )
/ v_defator.
* >> Início da inclusão: FORM VISUALIZA_RATEIO
ENDIF.
* << Fim da inclusão
ENDIF.
ENDIF.
APPEND itab_desp_funcao.
ENDLOOP.
ENDIF.
...