Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 14/01/2010 00:00:00
Data/Hora Última Alteração: 21/02/2011 10:23:02
Descrição da Nota: VINCULAÇÃO FATURA EXPORTAÇÃO, FLAG DEDUZ JUROS
Sintoma
O Programa está calculando de forma incorreta o Valor dos Juros Dentro da Captação para contratos de
PT e ST.
Solução
O Campo Flag Deduz Juros estará sempre fechado para edição. O Programa irá identificar se a data de
Pagamento no Exterior está preenchida, caso sim o Flag também ficará preenchido, caso não, o Flag
não ficará preenchido.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 09694 Data: 14/01/2010 Hora: 17:40:25
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 09694
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00002
Agrupamento : 00004
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08164 - 00001 - 7.0 - 00008 - DA - DATA CREDITO NO EXTERIOR NA VINCULAÇÃO- PRÉ-PAGAMENTO SECURI
----------------------------------------------------------------------------------------------------
VINCULAÇÃO FATURA EXPORTAÇÃO, FLAG DEDUZ JUROS
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO FATURA EXPORTAÇÃO, FLAG DEDUZ JUROS, DATA PAGAMENTO EXTERIOR
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCB009 0100
REPS /PWS/MZYCB009F05
REPS /PWS/MZYCB009I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCB009 0100
MODIFICAR LÓGICA DE PROCESSAMENTO TELA 0100
...
with control tc_faturas
cursor tc_faturas-current_line.
module carrega_zycbe005.
module set_screen_vinc.
endloop.
module posiciona_cursor.
module: mensagem_tc_recurso_aux.
process after input.
module limpa_var.
call subscreen ss_html.
* >> Início da inclusão:
module flag_deduz_juros.
* << Fim da inclusão
field /pws/zycbe005-j_1bbranch module consiste_local_neg.
loop at itab_zycbt005.
field /pws/zycbe005-nrinvoic module verifica_condicoes.
module casas_decimais.
chain.
field /pws/zycbe005-vlslf.
field /pws/zycbe005-vlme_p.
field /pws/zycbe005-vlvinc.
endchain.
module verif_vincul.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F05
...
screen-input = 1.
screen-required = 0.
elseif screen-name = '/PWS/ZYCBE005-DEDUZ_JUROS' or
screen-name = 'TXT_DEDUZ_JUROS'.
if sy-tcode ne c_transacao_a.
screen-invisible = 0.
if /pws/zycbe001-ffrcalc = 'C'.
screen-input = 0.
else.
if not /pws/zycbe006-dtpagext is initial.
* >> Início da exclusão: FORM EXIBE_DATAS
screen-input = 1.
* << Fim da exclusão
* >> Início da inclusão: FORM EXIBE_DATAS
screen-input = 0.
/pws/zycbe005-deduz_juros = 'X'.
* << Fim da inclusão
else.
screen-input = 0.
clear /pws/zycbe005-deduz_juros.
endif.
endif.
else.
if /pws/zycbe001-ffrcalc = 'C'.
screen-input = 0.
endif.
endif.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009I01
...
dyname = sy-cprog
dynumb = '0301'
tables
dynpfields = tdynpread
exceptions
others = 8.
endmodule.
module altera_0401 input.
perform altera_conta_contabil_0401.
endmodule.
* >> Início da inclusão:
module flag_deduz_juros input.
if /pws/zycbe001-tpcontr(1) = 'P' or
/pws/zycbe001-tpcontr(1) = 'S'.
if not /pws/zycbe006-dtpagext is initial.
/pws/zycbe005-deduz_juros = 'X'.
else.
clear /pws/zycbe005-deduz_juros.
endif.
endif.
endmodule.
* << Fim da inclusão