--------------------------------------
-- Creado por: Ing. Galo Cuzco / 10-ABRIL-2014
-- Descripcion: Parametrizacion de transaccion
---------------------------------------

spool act0013315.log

/*======================================================================================================================================================*/
/* SE AGREGA PARAMETRO PARA VERIFICAR SI DEBE O NO SEPARAR EL INTERES VENCIDO (ISVPR) DEL DEFAULT INTERES (INTMOR) Y SUMARLO AL INTERES NORMAL (INTPRO)	*/
/*======================================================================================================================================================*/
DELETE FROM TCOMPANIAPARAMETROSSISTEMA WHERE CPARAMETROSISTEMA = 'DIV_DEFAULT_INTEREST';
DELETE FROM TPARAMETROSSISTEMA WHERE CPARAMETROSISTEMA = 'DIV_DEFAULT_INTEREST';
DELETE FROM TPARAMETROSSISTEMAID WHERE CPARAMETROSISTEMA = 'DIV_DEFAULT_INTEREST';

INSERT INTO TPARAMETROSSISTEMAID (CPARAMETROSISTEMA, TIPODATO) VALUES ('DIV_DEFAULT_INTEREST', 'N');
INSERT INTO TPARAMETROSSISTEMA (CIDIOMA, CPARAMETROSISTEMA, FHASTA, FDESDE, DESCRIPCION, VERSIONCONTROL) VALUES ('ES', 'DIV_DEFAULT_INTEREST', TO_TIMESTAMP('31/12/2999', 'DD/MM/YYYY'), SYSTIMESTAMP, 'INDICA SI SE DEBE DIVIDIR EL INTERES DEFAULT', 0);
INSERT INTO TCOMPANIAPARAMETROSSISTEMA (CPERSONA_COMPANIA, CPARAMETROSISTEMA, FHASTA, FDESDE, VALORNUMERICO, VERSIONCONTROL) VALUES (2, 'DIV_DEFAULT_INTEREST', TO_TIMESTAMP('31/12/2999', 'DD/MM/YYYY'), SYSTIMESTAMP, 1, 0);

/*============================================================================================*/
/* SE AGREGA PARAMETRIZACION PARA FORMULARIO ADJUNTO CON LINK A TRANSACCIONES EN TXN 066014   */
/*============================================================================================*/
INSERT INTO TSUBSISTEMATRANSACCIONESID (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,ORDENMENU,PRESENTARENMENU,INTERNA,FORMULARIOBASE,AFECTAINMOVILIZACION,CGRUPOTRANSACCION,PRESENTARENREVERSO,CNIVELMENU,LISTAVALOR,USACACHE,SUMACOMPONENTES,PROVISION,COMPLETARRUBROS,LOTEGENERICO,VERIFICANIVELSEGURIDAD,CUSUARIO_INGRESO,FINGRESO,ACUMULACONTADOR,PAGINA,ORIGENDESTINO,CONTROLAEFECTIVO,REQUIEREAUTORIZACION,EJECUTAENAUTORIZACION) VALUES ('06','8031','01',NULL,'1','1','0','0',NULL,'1',NULL,'1','0','0','0','0','0','0',NULL,NULL,'0',NULL,NULL,'0','0','0');
INSERT INTO TCOMPANIATRANSACCIONES (CPERSONA_COMPANIA,CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,VERSIONCONTROL) VALUES (2,'06','8031','01',0);
INSERT INTO TSUBSISTEMATRANSACCIONES (CIDIOMA,CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,FHASTA,FDESDE,DESCRIPCION,SIGLAS,VERSIONCONTROL) VALUES ('ES','06','8031','01',TO_TIMESTAMP('31/12/2999','DD/MM/YYYY'),SYSTIMESTAMP,'FORMULARIO ADJUNTO',NULL,0);

/*============================================================================================*/
/* SE AGREGA PARAMETRIZACION PARA LISTA DE VALORES DE PERSONAS CON CREDITOS COMO DEUDOR       */
/*============================================================================================*/
INSERT INTO TSUBSISTEMATRANSACCIONESID (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,ORDENMENU,PRESENTARENMENU,INTERNA,FORMULARIOBASE,AFECTAINMOVILIZACION,CGRUPOTRANSACCION,PRESENTARENREVERSO,CNIVELMENU,LISTAVALOR,USACACHE,SUMACOMPONENTES,PROVISION,COMPLETARRUBROS,LOTEGENERICO,VERIFICANIVELSEGURIDAD,CUSUARIO_INGRESO,FINGRESO,ACUMULACONTADOR,PAGINA,ORIGENDESTINO,CONTROLAEFECTIVO,REQUIEREAUTORIZACION,EJECUTAENAUTORIZACION) VALUES ('06','9007','01',null,'0','1','1','1',null,'1',null,'0','0','0','0','0','0','0',null,null,'0',null,null,'0','0','0');
INSERT INTO TSUBSISTEMATRANSACCIONES (CIDIOMA,CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,FHASTA,FDESDE,DESCRIPCION,SIGLAS,VERSIONCONTROL) VALUES ('ES','06','9007','01',to_timestamp('31/12/2999','DD/MM/YYYY'),SYSTIMESTAMP,'LISTA DE VALORES PERSONAS CON CREDITOS COMO DEUDOR',null,0);
INSERT INTO TCOMPANIATRANSACCIONES (CPERSONA_COMPANIA,CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,VERSIONCONTROL) VALUES (2,'06','9007','01',0);

INSERT INTO TCOMANDOSID (COMANDO,TIPOCOMANDO) values ('com.fitbank.loan.query.LovPersonCredit','CON');
INSERT INTO TCOMANDOS (COMANDO,TIPOCOMANDO,FHASTA,CIDIOMA,FDESDE,DESCRIPCION,VERSIONCONTROL) VALUES ('com.fitbank.loan.query.LovPersonCredit','CON', to_timestamp('31/12/2999','DD/MM/YYYY'),'ES',SYSTIMESTAMP,'CLASE PARA LISTA DE PERSONAS CON CREDITOS COMO DEUDOR',0);
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','9007','01','1','I','com.fitbank.loan.query.LovPersonCredit','1','0','CON','1',null,null,'0',null);

/*==================================================================================================*/
/* SE AGREGA PARAMETRIZACION DE COMANDO PARA VERIFICAR NUMERO DE CUOTA EXTRAORDINARIA A PAGAR       */
/* PARA LA TXN 06-6014, 06-6020		 							    */
/*==================================================================================================*/
INSERT INTO TCOMANDOSID (COMANDO,TIPOCOMANDO) VALUES ('com.fitbank.loan.query.VerifyExtraPaymentQuota','CON');
INSERT INTO TCOMANDOS (COMANDO,TIPOCOMANDO,FHASTA,CIDIOMA,FDESDE,DESCRIPCION,VERSIONCONTROL) VALUES ('com.fitbank.loan.query.VerifyExtraPaymentQuota','CON',to_timestamp('31/12/2999','DD/MM/YYYY'),'ES',SYSTIMESTAMP,'COMANDO PARA VALIDAR NUMERO DE CUOTAS EXTRAORDINARIOS A PAGAR',0);

DELETE FROM TCOMANDOSMANTENIMIENTO WHERE CSUBSISTEMA='06' AND CTRANSACCION='6014';
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','6014','01','1','I','com.fitbank.fin.query.ThreadLocalStart','1','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','6014','01','2','I','com.fitbank.loan.query.ObtainQuotasForPayment','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','6014','01','3','I','com.fitbank.loan.query.VerifyExtraPaymentQuota','3','0','CON','1',null,null,0,'F');
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','6014','01','4','I','com.fitbank.fin.query.ThreadLocalClose','4','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','6014','01','5','I','com.fitbank.processor.query.QueryProcessor','5','0','CON','1',null,null,'0','F');
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA,CTRANSACCION,VERSIONTRANSACCION,SCOMANDO,EVENTO,COMANDO,ORDEN,USACACHE,TIPOCOMANDO,ACTIVADO,CANALESEXCLUIDOS,PARAMETRO,VERSIONCONTROL,EJECUTADOPOR) VALUES ('06','6014','01','6','I','com.fitbank.loan.acco.payment.maintenance.BeginPayment','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','6014','01','7','I','com.fitbank.fin.maintenance.FinancialFromExchange','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','6014','01','8','I','com.fitbank.loan.acco.payment.maintenance.NormalPayment','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','6014','01','9','I','com.fitbank.loan.acco.payment.maintenance.EndPayment','9','0','MAN','1',null,null,'0',null);

DELETE FROM TCOMANDOSMANTENIMIENTO WHERE CSUBSISTEMA='06' AND CTRANSACCION='6020';
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 1, 'I', 'com.fitbank.fin.query.ThreadLocalStart', 1, '0', 'CON', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 2, 'I', 'com.fitbank.loan.query.ObtainQuotasForPayment', 2, '0', 'CON', '1', null, null, 0, 'F');
INSERT INTO TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) VALUES ('06', '6020', '01', 3, 'I', 'com.fitbank.loan.query.VerifyExtraPaymentQuota',3,'0','CON','1',null,null,0,'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 4, 'I', 'com.fitbank.fin.query.ThreadLocalClose', 4, '0', 'CON', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 5, 'I', 'com.fitbank.loan.acco.payment.maintenance.BeginPayment', 5, '0', 'MAN', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 6, 'I', 'com.fitbank.fin.maintenance.FinancialFromExchange', 6, '0', 'MAN', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 7, 'I', 'com.fitbank.loan.acco.payment.maintenance.EarlyCancellation', 7, '0', 'MAN', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 8, 'I', 'com.fitbank.loan.acco.payment.maintenance.EndPayment', 8, '0', 'MAN', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 9, 'I', 'com.fitbank.processor.maintenance.MaintenanceProcessor', 9, '0', 'MAN', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 10, 'F', 'com.fitbank.processor.query.QueryProcessor', 10, '0', 'CON', '1', null, null, 0, 'F');
insert into TCOMANDOSMANTENIMIENTO (CSUBSISTEMA, CTRANSACCION, VERSIONTRANSACCION, SCOMANDO, EVENTO, COMANDO, ORDEN, USACACHE, TIPOCOMANDO, ACTIVADO, CANALESEXCLUIDOS, PARAMETRO, VERSIONCONTROL, EJECUTADOPOR) values ('06', '6020', '01', 11, 'I', 'com.fitbank.loan.query.AccumulatedBalanceToDate', 11, '0', 'CON', '1', null, null, 0, 'F');

commit;         
prompt Done. 
spool off