CE PLUS - Nota 001226
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Captação
Data/Hora da Publicação: 19/04/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 15:04:02
Descrição da Nota: CAPTAÇÃO - CONTRATOS DE PRÉ E SECURITIZAÇÃO CAMPO "FORMA DE CALCULO"
Sintoma
Será permitido para os contratos de pré e Securitização a conclusão da captação sem o preenchimento
do campo "forma de calculo".
Solução
Ajuste efetuado no programa de captação,onde permite criar Pré e Securitização sem preenchimento da
forma de cálculo. Se a mesma estiver vazia,limpa os juros e fecha os campos.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01226 Data: 19/04/2006 Hora: 13:29:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01226
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00110
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CAPTAÇÃO - CONTRATOS DE PRÉ E SECURITIZAÇÃO CAMPO "FORMA DE CALCULO"
----------------------------------------------------------------------------------------------------
Palavras Chave:
CAPTAÇÃO - CONTRATOS DE PRÉ E SECURITIZAÇÃO CAMPO "FORMA DE CALCULO"
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB001F01
REPS /PWS/MZYCB001O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F01
...
itab_zycbt002-bconegoc = /pws/zycbe001-bconegoc.
itab_zycbt002-bcofinan = /pws/zycbe001-bcofinan.
itab_zycbt002-tpparc = 'J'.
READ TABLE itab_zycbt002 WITH KEY nrseqc = itab_zycbt002-nrseqc
nrparc = itab_zycbt002-nrparc.
* >> Início da exclusão: FORM CREATE_ZYCBT002_P
IF sy-subrc <> 0.
* << Fim da exclusão
* >> Início da inclusão: FORM CREATE_ZYCBT002_P
IF sy-subrc <> 0
AND NOT /pws/zycbe001-ffrcalc IS INITIAL.
* << Fim da inclusão
APPEND itab_zycbt002.
ENDIF.
ELSE.
CLEAR: /pws/zycbe002, itab_zycbt002.
REFRESH itab_zycbt002.
...
...
ENDCASE.
IF /pws/zycbe001-tpcontr(1) NE 'C' AND
/pws/zycbe001-tpcontr(1) NE 'D' AND
/pws/zycbe001-tpcontr(1) NE 'T' AND
/pws/zycbe001-tpcontr(1) NE 'E' AND
* >> Início da inclusão: FORM SAVE_CHANGES
/pws/zycbe001-tpcontr(1) NE 'P' AND
/pws/zycbe001-tpcontr(1) NE 'S' AND
* << Fim da inclusão
/pws/zycbe001-ffrcalc IS INITIAL.
MESSAGE i015 WITH text-154.
EXIT.
ENDIF.
IF NOT v_ind_juros IS INITIAL.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001O01
...
ENDIF.
ENDIF.
MODIFY tc_perj-cols FROM wa_cols.
ENDLOOP.
ELSE.
* >> Início da exclusão: MODULE SET_SCREEN
IF /pws/zycbe001-tpcontr(1) = 'D' AND
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN
IF ( /pws/zycbe001-tpcontr(1) = 'D' OR
/pws/zycbe001-tpcontr(1) = 'P' OR
/pws/zycbe001-tpcontr(1) = 'S' ) AND
* << Fim da inclusão
/pws/zycbe001-ffrcalc EQ space.
* >> Início da inclusão: MODULE SET_SCREEN
CLEAR itab_zycbt002.
REFRESH itab_zycbt002.
* << Fim da inclusão
LOOP AT tc_perj-cols INTO wa_cols.
IF wa_cols-screen-group2 EQ 'PRE'.
IF wa_cols-screen-group1 NE 'NED'.
wa_cols-screen-input = '0'.
ENDIF.
...