Page History

...

Produto:

Sistema Credimaster

Versões:

Não se aplica

Ocorrência:

O Banco Central do Brasil, no dia 23 de Fevereiro de 2017, publicou a Resolução 4.558, que regulamenta a cobrança de encargos por parte das instituições financeiras e das sociedades de arrendamento mercantil nas situações de atraso de pagamentos de obrigações por clientes, entrando em vigor a partir de 1º de Setembro de 2017.

A partir dessa data a instituição poderá cobrar de seus clientes apenas a taxa de juros remuneratórios igual à taxa pactuada no contrato para o período de adimplência da respectiva operação de crédito.

Com o objetivo de adequarmos o sistema a Resolução acima, estamos disponibilizando script que deverá ser executado no banco Credimaster de produção, após término do fechamento diário do dia 31/08/2017, assim como procedimento que deverá ser realizado para adequação das configurações de Mora.

Ambiente:

Produção

Passo a passo:

Pré-requisito indispensável:

Realizar o fechamento do dia 31/08/2017, utilizando o Sistema Credimaster;
Executar o script enviado para fixação das configurações de mora sobre as operações emitidas com data igual ou inferior à 31/08/2017. O script deverá ser executado de acordo com o Banco de Dados utilizado por cada cliente:

Expand

title	Banco Oracle

Code Block

language	sql

/************************************************************************************/
CREATE TABLE T402TITU_PRM
AS
SELECT A.CD_EMP,
       A.CD_UND,
       A.CD_CLI,
       A.NR_CTR,
       A.NR_ADL,
       A.SG_MOD,
       A.NR_NOS_NR,
       C.ID_CRT_OPE,
       C.ID_FMA_A30,
       C.ID_DD_A30,
       C.TX_PRM_A30,
       C.SG_MON_A30,
       C.SG_MON_M30,
       C.ID_FMA_M30,
       C.ID_DD_M30,
       C.TX_PRM_M30,
       C.TX_SPR_OPE
  FROM T402TITU A, T402MODA B, T402ENTX C
 WHERE A.SG_MOD = B.SG_MOD
   AND A.SG_LIN_OPE = B.SG_LIN_OPE
   AND B.SG_ECG = C.SG_ECG
   AND A.id_sit_lqd in ('PA', 'PP')
   and A.id_crt_prm = 'C'
   AND A.DT_EMS <= to_date('31/08/2017','dd/mm/yyyy');
UPDATE T402TITU A
   SET ID_CRT_PRM = 'T',
       ID_CRT_OPE =
       (SELECT ID_CRT_OPE
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       ID_DD_A30 =
       (SELECT ID_DD_A30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       TX_PRM_A30 =
       (SELECT TX_PRM_A30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       SG_ID_A30 =
       (SELECT SG_ID_A30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       ID_FMA_A30 =
       (SELECT ID_FMA_A30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       ID_DD_M30 =
       (SELECT ID_DD_M30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       TX_PRM_M30 =
       (SELECT TX_PRM_M30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       SG_ID_M30 =
       (SELECT SG_ID_M30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR),
       ID_FMA_M30 =
       (SELECT ID_FMA_M30
          FROM T402TITU_PRM B
         WHERE A.CD_EMP = B.CD_EMP
           AND A.CD_UND = B.CD_UND
           AND A.CD_CLI = B.CD_CLI
           AND A.SG_MOD = B.SG_MOD
           AND A.NR_CTR = B.NR_CTR
           AND A.NR_ADL = B.NR_ADL
           AND A.NR_NOS_NR = B.NR_NOS_NR)
 WHERE A.id_sit_lqd in ('PA', 'PP')
   and A.id_crt_prm = 'C'
   AND EXISTS (SELECT 1
          FROM T402TITU_PRM C
         WHERE A.CD_EMP = C.CD_EMP
           AND A.CD_UND = C.CD_UND
           AND A.CD_CLI = C.CD_CLI
           AND A.SG_MOD = C.SG_MOD
           AND A.NR_CTR = C.NR_CTR
           AND A.NR_ADL = C.NR_ADL
           AND A.NR_NOS_NR = C.NR_NOS_NR);
Commit;	   
		   
UPDATE T402TIAB A
   SET A.ID_CRT_PRM = 'T'
 WHERE EXISTS (SELECT 1
          FROM T402TITU_PRM C
         WHERE A.CD_EMP = C.CD_EMP
           AND A.CD_UND = C.CD_UND
           AND A.CD_CLI = C.CD_CLI
           AND A.SG_MOD = C.SG_MOD
           AND A.NR_CTR = C.NR_CTR
           AND A.NR_ADL = C.NR_ADL
           AND A.NR_NOS_NR = C.NR_NOS_NR);
Commit;	
		   
/************************************************************************************/
CREATE TABLE T402ENTX_RES4558
AS
SELECT * FROM T402ENTX;

Expand

title	Banco SQLServer

Code Block

language	sql

/************************************************************************************/
SELECT A.CD_EMP,
       A.CD_UND,
       A.CD_CLI,
       A.NR_CTR,
       A.NR_ADL,
       A.SG_MOD,
       A.NR_NOS_NR,
       C.ID_CRT_OPE,
       C.ID_FMA_A30,
       C.ID_DD_A30,
       C.TX_PRM_A30,
       C.SG_MON_A30,
       C.SG_MON_M30,
       C.ID_FMA_M30,
       C.ID_DD_M30,
       C.TX_PRM_M30,
       C.TX_SPR_OPE
  INTO T402TITU_PRM
  FROM T402TITU A, T402MODA B, T402ENTX C
 WHERE A.SG_MOD = B.SG_MOD
   AND A.SG_LIN_OPE = B.SG_LIN_OPE
   AND B.SG_ECG = C.SG_ECG
   AND A.id_sit_lqd in ('PA', 'PP')
   and A.id_crt_prm = 'C'
   AND A.DT_EMS <= '20170831'
UPDATE T402TITU
   SET ID_CRT_PRM = 'T',
       ID_CRT_OPE =
       (SELECT ID_CRT_OPE
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       ID_DD_A30 =
       (SELECT ID_DD_A30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       TX_PRM_A30 =
       (SELECT TX_PRM_A30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       SG_ID_A30 =
       (SELECT SG_ID_A30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       ID_FMA_A30 =
       (SELECT ID_FMA_A30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       ID_DD_M30 =
       (SELECT ID_DD_M30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       TX_PRM_M30 =
       (SELECT TX_PRM_M30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       SG_ID_M30 =
       (SELECT SG_ID_M30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR),
       ID_FMA_M30 =
       (SELECT ID_FMA_M30
          FROM T402TITU_PRM B
         WHERE T402TITU.CD_EMP = B.CD_EMP
           AND T402TITU.CD_UND = B.CD_UND
           AND T402TITU.CD_CLI = B.CD_CLI
           AND T402TITU.SG_MOD = B.SG_MOD
           AND T402TITU.NR_CTR = B.NR_CTR
           AND T402TITU.NR_ADL = B.NR_ADL
           AND T402TITU.NR_NOS_NR = B.NR_NOS_NR)
 WHERE T402TITU.id_sit_lqd in ('PA', 'PP')
   and T402TITU.id_crt_prm = 'C'
   AND EXISTS (SELECT 1
          FROM T402TITU_PRM C
         WHERE T402TITU.CD_EMP = C.CD_EMP
           AND T402TITU.CD_UND = C.CD_UND
           AND T402TITU.CD_CLI = C.CD_CLI
           AND T402TITU.SG_MOD = C.SG_MOD
           AND T402TITU.NR_CTR = C.NR_CTR
           AND T402TITU.NR_ADL = C.NR_ADL
           AND T402TITU.NR_NOS_NR = C.NR_NOS_NR)
UPDATE T402TIAB
   SET ID_CRT_PRM = 'T'
 WHERE EXISTS (SELECT 1
          FROM T402TITU_PRM C
         WHERE T402TIAB.CD_EMP = C.CD_EMP
           AND T402TIAB.CD_UND = C.CD_UND
           AND T402TIAB.CD_CLI = C.CD_CLI
           AND T402TIAB.SG_MOD = C.SG_MOD
           AND T402TIAB.NR_CTR = C.NR_CTR
           AND T402TIAB.NR_ADL = C.NR_ADL
           AND T402TIAB.NR_NOS_NR = C.NR_NOS_NR)
/************************************************************************************/
SELECT * INTO T402TITU_PRM
FROM T402ENTX

teste

1. Realizar o fechamento do dia 31/08/2017, utilizando a ferramenta Credimaster;
2. Executar o script enviado para fixação das configurações de mora sobre as operações emitidas com data igual ou inferior à 31/08/2017;
O script deverá ser executado de acordo com o Banco de Dados utilizado por cada cliente:

Configuração do Critério de Mora:

Acesse o sistema Credimaster, utilizando usuário com privilégios suficientes para execução das alterações nas configurações de Mora:
Image Added
Defina a abrangência desejada.
Image Added
Acesse a barra de ferramentas Documentos, selecionando a opção Operacionais ou, se preferir, clique sobre o botão Image Added localizado no canto direito da tela inicial do sistema Credimaster.
Image Added
Clique sobre a aba Mora.
Image Added
Localize o critério de mora desejado.
Image Added
Clique sobre o botão alterar.
Image Added
Altere a forma de cobrança dos encargos de mora “Até 30 dias” e “Mais de 30 dias”, conforme figura abaixo.
Image Added

8. Clique sobre o botão Salvar.

Warning

Caso a configuração de mora, apresente opção de Spread contendo a variável Segundo Critério, o usuário deverá alterá-la para variável Critério Único, redefinindo a Taxa Spread conforme as políticas da instituição de Crédito.

Image Added

Observações:

Child pages

Versions Compared

Old Version 2

New Version 3

Key