CE PLUS - Nota 007709
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Despesas
Data/Hora da Publicação: 04/12/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 16:54:57
Descrição da Nota: DESPESA - CONTRATO DE EXPORTAÇÃO -CAMBIO FECHADO - TX INCORRETA
Sintoma
Não usa a taxa de cambio da tela na contabilizaçao e sim busca da OB08.
Solução
se o campo da taxa tiver preenchido, usar a taxa da tela, senão estiver preenchido,então buscar da
OB08.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07709 Data: 04/12/2008 Hora: 11:04:20
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07709
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00007
Agrupamento : 00076
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03371 - 00003 - 6.0 - 00026 - PROCESSAR BOLETO - DESPESAS - VALOR MI - JPY
03827 - 00002 - 7.0 - 00001 - DESPESAS IMPORTAÇÃO/FINANCEIRO - ROTINA DE PAGAMENTO - FILIAL
06077 - 00001 - 7.0 - 00004 - DESPESAS DE EXPORTAÇÃO
----------------------------------------------------------------------------------------------------
DESPESA - CONTRATO DE EXPORTAÇÃO -CAMBIO FECHADO - TX INCORRETA
----------------------------------------------------------------------------------------------------
Palavras Chave:
DESPESA - CONTRATO DE EXPORTAÇÃO -REGIME FECHA NÃO TAXA INCORRETA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCBN102
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCBN102
...
text-007.
itab_zycbe033-bukrs = p_wa_despesa-bukrs.
PERFORM verify_null_field USING p_wa_despesa-waers
'WAERS'
text-008.
itab_zycbe033-waers = p_wa_despesa-waers.
IF wa_despesa-tabela = text-036 OR
wa_despesa-tabela = text-037 OR
wa_despesa-tabela = text-153.
IF NOT p_wa_despesa-txcneg IS INITIAL.
* >> Início da exclusão: FORM DADOS_BATCH_DESPESA
PERFORM seleciona_fator_taxa USING p_wa_despesa-waers
wa_zycbt011-ctmoed
v_datalanc
p_wa_despesa-txcneg
wa_zycbt011-bukrs
CHANGING v_taxa
v_sai.
IF v_sai EQ 'X'.
EXIT.
ENDIF.
itab_zycbe033-kursf = v_taxa.
v_taxacambial = v_taxa.
v_ftaxa = wa_zycbt011-ctmoed.
* << Fim da exclusão
* >> Início da inclusão: FORM DADOS_BATCH_DESPESA
itab_zycbe033-kursf = p_wa_despesa-txcneg.
v_taxacambial = p_wa_despesa-txcneg.
v_ftaxa = wa_zycbt011-ctmoed.
* << Fim da inclusão
ELSE.
SELECT SINGLE * FROM /pws/zycbt009
WHERE codpadr EQ p_wa_despesa-ftaxa.
v_ftaxa = /pws/zycbt009-kurst.
PERFORM obtem_taxa_cambial.
itab_zycbe033-kursf = v_taxacambial.
v_ftaxa = p_wa_despesa-ftaxa.
ENDIF.
ELSE.
IF NOT p_wa_despesa-kursf IS INITIAL.
...