CE PLUS - Nota 006156
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 12/03/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 13:53:06
Descrição da Nota: AJUSTE PARA PREENCHER VALOR NA PASTA CAMBIO PARA 360 DIAS
Sintoma
Quando preenche a pasta cambio da fatura com cambio acima de 360 dias, o valor não está sendo
preenchido na pasta de cambio para 360 dias na adição da DI.
Solução
Ajustado programa para preencher automático e permitir a alteração do valor.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06156 Data: 12/03/2008 Hora: 11:52:40
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06156
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00005
Agrupamento : 00040
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05591 - 00001 - 7.0 - 00004 - AJUSTES NO ANEXO DA DI PASTA CAMBIO->PAGAMENTO EM ATÉ 180 DIAS
----------------------------------------------------------------------------------------------------
AJUSTE PARA PREENCHER VALOR NA PASTA CAMBIO PARA 360 DIAS
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - PASTA - CAMBIO - ADIÇÃO - VALOR - 360 - DIAS
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI023 0354
REPS /PWS/MZYCI023I01
REPS /PWS/MZYCI023O01
REPS /PWS/MZYCI023TOP
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI023 0354
PROCESS BEFORE OUTPUT.
MODULE: set_screen_padrao.
PROCESS AFTER INPUT.
* >> Início da inclusão:
CHAIN.
FIELD /pws/zycie116-valtot MODULE modi_tl354 ON CHAIN-REQUEST.
ENDCHAIN.
* << Fim da inclusão
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023I01
...
ELSEIF /pws/zycie116-parcvar = 'X'.
a_radio1 = '2'.
ENDIF.
CLEAR: a_ucomm2.
MOVE: /pws/zycie116-parcfixas TO itab_zycit116-parcfixas,
/pws/zycie116-parcvar TO itab_zycit116-parcvar.
MODIFY itab_zycit116 TRANSPORTING parcfixas parcvar
WHERE nrseqdi EQ /pws/zycie116-nrseqdi
AND adicao EQ /pws/zycie116-adicao.
ENDMODULE.
* >> Início da inclusão:
MODULE modi_tl354 INPUT.
v_valtot_alt = /pws/zycie116-valtot.
ENDMODULE.
* << Fim da inclusão
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023O01
...
/pws/zycie116-indice = a_1indice.
/pws/zycie116-valtot = a_1valtot.
WHEN '2'.
/pws/zycie116-taxajuros = a_check2.
/pws/zycie116-codtxjuros = a_2codtxjuros.
/pws/zycie116-taxarate = a_2taxarate.
/pws/zycie116-parcnum = a_2parcnum.
/pws/zycie116-periodic = a_2periodic.
/pws/zycie116-indice = a_2indice.
/pws/zycie116-valtot = a_2valtot.
* >> Início da inclusão: MODULE RADIO_INIT1
WHEN '3'.
/pws/zycie116-taxajuros = a_check2.
/pws/zycie116-codtxjuros = a_2codtxjuros.
/pws/zycie116-taxarate = a_2taxarate.
/pws/zycie116-parcnum = a_2parcnum.
/pws/zycie116-periodic = a_2periodic.
IF /pws/zycie116-valtot IS INITIAL.
/pws/zycie116-valtot = a_2valtot.
ENDIF.
IF NOT v_valtot_alt IS INITIAL.
/pws/zycie116-valtot = v_valtot_alt.
ENDIF.
* << Fim da inclusão
WHEN '4'.
IF /pws/zycie006-motivo EQ '32'.
/pws/zycie116-taxajuros = a_check3.
/pws/zycie116-codtxjuros = a_3codtxjuros.
/pws/zycie116-taxarate = a_3taxarate.
/pws/zycie116-parcnum = a_3parcnum.
/pws/zycie116-periodic = a_3periodic.
/pws/zycie116-indice = a_3indice.
/pws/zycie116-valtot = a_3valtot.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023TOP
...
a_1parcnum LIKE /pws/zycie116-parcnum,
a_1periodic LIKE /pws/zycie116-periodic,
a_1indice LIKE /pws/zycie116-indice,
a_1valtot LIKE /pws/zycie116-valtot,
a_2codtxjuros LIKE /pws/zycie116-codtxjuros,
a_2taxarate LIKE /pws/zycie116-taxarate,
a_2parcnum LIKE /pws/zycie116-parcnum,
a_2periodic LIKE /pws/zycie116-periodic,
a_2indice LIKE /pws/zycie116-indice,
a_2valtot LIKE /pws/zycie116-valtot,
* >> Início da inclusão:
v_valtot_alt LIKE /pws/zycie116-valtot,
* << Fim da inclusão
a_3codtxjuros LIKE /pws/zycie116-codtxjuros,
a_3taxarate LIKE /pws/zycie116-taxarate,
a_3parcnum LIKE /pws/zycie116-parcnum,
a_3periodic LIKE /pws/zycie116-periodic,
a_3indice LIKE /pws/zycie116-indice,
a_3valtot LIKE /pws/zycie116-valtot,
rimc1 LIKE indx-srtfd VALUE 'NRSEQDI',
rimc2 LIKE indx-srtfd VALUE 'NRBL',
rimc4 LIKE indx-srtfd VALUE 'WA085',
rimc7 LIKE indx-srtfd VALUE 'NRSEQ',
...