-- Parametrización de tasa de usura
-- TGRUPOCATEGORIASUBSISTEMAMORA
delete from tgrupocategoriasubsistemamora where cpersona_compania=2 and fhasta=fncfhasta and categoria='INTPRO' and cgrupobalance='1'
Insert into TGRUPOCATEGORIASUBSISTEMAMORA (CATEGORIA_MORA,CGRUPOBALANCE_MORA,CPERSONA_COMPANIA,CSUBSISTEMA,FHASTA,FDESDE,CATEGORIA,CGRUPOBALANCE,GRACIAENMORA,RELACIONMATEMATICA,MARGEN,TIENETARIFARIO,VERSIONCONTROL) values ('INTMOR','82',2,'06',fncfhasta,fncsysdate,'INTPRO','1','1','+',0,'1',0);

-- TPRODUCTOTASAS
-- de ejemplo (se ingresan en la transacción 00-0274 para cada producto)
Insert into TPRODUCTOTASAS (CPERSONA_COMPANIA,CSUBSISTEMA,CGRUPOPRODUCTO,CPRODUCTO,CATEGORIA,CGRUPOBALANCE,CMONEDA,SECUENCIA,FHASTA,FDESDE,CTASAREFERENCIAL,CFRECUENCIA,PLAZOMINIMO,PLAZOMAXIMO,MONTOMINIMO,MONTOMAXIMO,MARGEN,RELACIONMATEMATICA,VERSIONCONTROL,MARGENMAXIMO,MARGENMINIMO) values (2,'06','02','201','INTMOR','82','COP',1,fncfhasta,fncsysdate,'REF',5,30,99999,100000,99999999,5,'+',0,null,null);


-- Parametrización de comando que valida que la tasa del préstamo no sea mayor a
-- la tasa de usura vigente.
-- TCOMANDOSID
insert into TCOMANDOSID (COMANDO, TIPOCOMANDO) values ('com.fitbank.loan.validate.VerifyCurrentDefaultRate', 'MAN');

-- TCOMANDOS
insert into TCOMANDOS (COMANDO, TIPOCOMANDO, FHASTA, CIDIOMA, FDESDE, DESCRIPCION, VERSIONCONTROL) values ('com.fitbank.loan.validate.VerifyCurrentDefaultRate', 'MAN', FNCFHASTA, 'ES', FNCSYSDATE, 'Verifica que la tasa de una solicitud de préstamo no supere la tasa de usura', 0);

-- Se debe parametrizar en la solicitud, aprobación, desembolso y mantenimiento 
-- de tasa del préstamo.
-- TCOMANDOSMANTENIMIENTO
-- Solicitud: (06-2020)
delete from TCOMANDOSMANTENIMIENTO where csubsistema='06' and ctransaccion='2020';
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',1,'I','com.fitbank.solicitude.helper.GetRatesProduct',1,'0','CON','0',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',2,'I','com.fitbank.processor.query.QueryProcessor',2,'0','CON','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',3,'I','com.fitbank.loan.query.ObtainInterestRate',3,'0','CON','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',4,'I','com.fitbank.person.validate.ofac.SolicitudeBasicInformationLoan',4,'0','MAN','0',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',5,'I','com.fitbank.person.validate.ofac.OFACClient',5,'0','MAN','0',null,null,0,null);

Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',6,'I','com.fitbank.loan.validate.VerifyCurrentDefaultRate',6,'0','MAN','1',null,null,0,null);

Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',7,'I','com.fitbank.person.sequence.DocumentPerson',7,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',8,'I','com.fitbank.person.PersonImageManagement',8,'0','MAN','0',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',9,'I','com.fitbank.solicitude.CommonSolicitude',9,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',10,'I','com.fitbank.term.solicitude.DeleteQuota',10,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',11,'I','com.fitbank.loan.maintenance.ExpireSolicitudeLiquidation',11,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',12,'I','com.fitbank.loan.maintenance.CustomerDocuments',12,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',13,'I','com.fitbank.processor.maintenance.MaintenanceProcessor',13,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',14,'I','com.fitbank.loan.maintenance.CompleteRevision',14,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',15,'I','com.fitbank.solicitude.authorization.ExpireSolicitudeInAuthorization',15,'0','MAN','0',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',16,'I','com.fitbank.solicitude.authorization.ExpireSolicitudeInAuthorization',16,'0','MAN','0',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','2020','01',17,'I','com.fitbank.bpm.command.BPMInitFlow',17,'0','MAN','0',null,'colApplication',0,null);

--Aprobación: (06-3004)
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','3004','01',1,'I','com.fitbank.loan.validate.VerifyCurrentDefaultRate',1,'0','MAN','1',null,null,0,null);

Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','3004','01',2,'I','com.fitbank.loan.maintenance.CheckDocumentationApproval',2,'0','MAN','1',null,null,0,null);
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','3004','01',3,'I','com.fitbank.processor.maintenance.MaintenanceProcessor',3,'0','MAN','1',NULL,NULL,0,NULL);

--Desembolso: (06-6013)
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',1,'I','com.fitbank.loan.validate.VerifyCurrentDefaultRate',1,'0','MAN','1',null,null,0,null);

Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',2,'I','com.fitbank.term.solicitude.UpdateAccountDisbursement',2,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',3,'I','com.fitbank.processor.maintenance.MaintenanceProcessor',3,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',4,'I','com.fitbank.loan.maintenance.ContinueInstrumentation',4,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',5,'I','com.fitbank.term.solicitude.TermOpeningAutomatic',5,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',6,'I','com.fitbank.solicitude.CommonOpeningAutomatic',6,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',7,'I','com.fitbank.loan.solicitude.LoanOpening',7,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',8,'I','com.fitbank.solicitude.CommonOpening',8,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',9,'I','com.fitbank.term.maintenance.BlockedBalancedinLoan',9,'0','MAN','1',null,null,0,null);
Insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) values ('06','6013','01',10,'I','com.fitbank.loan.query.ObtainTotalLiquidationDiscount',10,'0','CON','1',null,null,0,null);
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','6013','01',11,'I','com.fitbank.processor.query.QueryProcessor',11,'0','CON','1',NULL,NULL,0,NULL);

--Mantenimiento de tasa: (06-3039)