A continuación, en este documento citaremos los pasos necesarios a llevar a cabo para dar de alta una entidad emisora de tarjetas de crédito.
Dentro de la declaración de cabecera se declaran las variables a las cuales se le asignan los valores que se encuentran en el documento xlsx de alta de entidad provisto por los compañeros de entidades u operaciones, el cual menciona los valor a ser utilizados por la entidad para los parámetros de sus tarjetas de crédito.
declare
pi_emisor number;
pi_descripcion VARCHAR2(100);
pi_ruc_emisor VARCHAR2(16);
pi_direccion VARCHAR2(100);
pi_telefono VARCHAR2(100);
pi_contacto VARCHAR2(100);
pi_email_contacto VARCHAR2(100);
pi_debcta_s_n CHAR(1);
pi_seguro_vida_s_n CHAR(1);
pi_calc_impuesto_s_n CHAR(1);
pi_tasa_int_punit NUMBER;
pi_cuotas_financi_s_n CHAR(1);
pi_calculo_interes_s_n CHAR(1);
pi_decaimeinto_compulsi_s_n CHAR(1);
pi_apli_comis_mora_s_n CHAR(1);
pi_apli_comis_combus_s_n CHAR(1);
pi_apli_comis_super_s_n CHAR(1);
pi_apli_comis_adelefect_s_n CHAR(1);
pi_apli_comis_exceso_s_n CHAR(1);
pi_apli_entrega_extracto_s_n CHAR(1);
pi_apli_compra_ext_s_n CHAR(1);
pi_valida_mora_debaut_s_n CHAR(1);
pi_dias_perm_mora_debaut NUMBER;
pi_debita_cta_comercio_s_n CHAR(1);
pi_afinidad number := 0;
pi_cartera number := 0;
pi_tasa_interes_corriente number;
pi_tasa_plan_normal number;
pi_tasa_interes_moratorio number;
pi_tasa_interes_punitorio number;
pi_comision_ATM NUMBER;
pi_comision_Ventanilla NUMBER;
pi_aplica_s_n CHAR(1);
pi_monto_cargo number;
pi_cantidad_TRX_ATM NUMBER;
pi_cantidad number;
pi_aplica_seguro_fraude_s_n CHAR(1);
pi_aplica_seguro_vida_s_n CHAR(1);
pi_aplica_costo_emision NUMBER;
pi_montocostoemi_titu NUMBER;
pi_montocostoemi_adic NUMBER;
pi_cantcuotas_emision number;
pi_financiar_costorenov_s_n CHAR(1);
pi_cargo_anual_titular number;
pi_cargo_anual_adicional number;
po_retorno varchar2(512);
pi_aplica_costo_renovacion NUMBER;--1-AL GENERAR/2-AL ACTIVAR/0-NO APLICA
pi_montocostorenov_titu number;
pi_montocostorenov_adic number;
pi_cant_cuotas_renovacion number;
pi_financiar_costo_renov_s_n CHAR(1);
pi_porcentaje_pm number;
pi_importe_monto_pm number;
pi_aplica_comision_x_mora CHAR(1);
pi_aplica_cargo_x_exceso_s_n CHAR(1);
pi_aplica_cargo_com_exte_s_n CHAR(1);
pi_monto_cargo_com_exterior number;
pi_dias_mora_inhabilitar number;
pi_saldo_mora_inhabilitar number;
pi_dias_mora_bloq_auto number;
pi_saldo_mora_bloq_auto number;
pi_cargo_mora_inhabilitar number;
pi_porcen_cargo_excesolc number;
pi_usuario varchar2(8):= 'CEIBO';
vc_bandera varchar2(512);
VC_PROMOTOR varchar2(20);
VC_BIN VARCHAR2(16);
VC_BIN_CRIPTO VARCHAR2(16);
VC_BIN_EMISOR VARCHAR2(20);
VN_BIN_ID NUMBER(8);
vc_sftp_entidad varchar2(20);
vn_id_admin number;
vn_lc_minima number;
vn_lc_maximo number;
vc_linea_unificada char(1);
vc_descuenta_cuota char(1);
begin
pi_emisor :=125;
VC_PROMOTOR :='COOP. REDUCTO LTDA.';
VC_BIN := '604394';
VC_BIN_EMISOR := 'COOP. REDUCTO LTDA.';
VN_BIN_ID := 201;
vc_sftp_entidad := 'COOP. REDUCTO LTDA.';
vn_lc_minima := 500000;
vn_lc_maximo := 50000000;
vc_linea_unificada :='1';
vc_descuenta_cuota := '0';
pi_descripcion:='COOP. REDUCTO LTDA.';
pi_ruc_emisor:='80018850-0';
pi_direccion:='AV. LA VICTORIA C/ JUAN PABLO II';
pi_telefono:='21595000';
pi_contacto:='MG. ANGELA MARTINEZ';
pi_email_contacto:='amartinez@coopreducto.coop.py';
pi_debcta_s_n:='N';
pi_seguro_vida_s_n:='S';
pi_calc_impuesto_s_n:='N';
pi_tasa_int_punit:=30;
pi_cuotas_financi_s_n:='N';
pi_calculo_interes_s_n:='S';
pi_decaimeinto_compulsi_s_n:='N';
pi_apli_comis_mora_s_n:='S';
pi_apli_comis_combus_s_n:='N';
pi_apli_comis_super_s_n:='N';
pi_apli_comis_adelefect_s_n:='S';
pi_apli_comis_exceso_s_n:='S';
pi_apli_entrega_extracto_s_n:='N';
pi_apli_compra_ext_s_n:='N';
pi_valida_mora_debaut_s_n:='S';
pi_dias_perm_mora_debaut:=40;
pi_debita_cta_comercio_s_n:='N';
pi_tasa_interes_corriente :=17;
pi_tasa_plan_normal :=17;
pi_tasa_interes_moratorio :=17;
pi_tasa_interes_punitorio :=5.1;
pi_comision_ATM := 6;
pi_comision_Ventanilla := 8.5;
pi_aplica_s_n :='S';
pi_monto_cargo :=0;
pi_cantidad_TRX_ATM :=0;
pi_aplica_seguro_fraude_s_n := 'N';
pi_aplica_seguro_vida_s_n :='S';
pi_montocostoemi_titu :=0;
pi_montocostoemi_adic :=100000;
pi_cantcuotas_emision :=2;
pi_financiar_costorenov_s_n :='S';
pi_aplica_costo_emision := 2;
pi_cargo_anual_titular :=130000;
pi_cargo_anual_adicional :=130000;
pi_aplica_costo_renovacion :=2;
pi_montocostorenov_titu :=100000;
pi_montocostorenov_adic :=100000;
pi_cant_cuotas_renovacion :=2;
pi_financiar_costo_renov_s_n :='S';
pi_porcentaje_pm :=10;
pi_importe_monto_pm :=50000;
pi_aplica_comision_x_mora :='S';
pi_aplica_cargo_x_exceso_s_n := 'S';
pi_aplica_cargo_com_exte_s_n :='N';
pi_monto_cargo_com_exterior :=0;
pi_dias_mora_inhabilitar :=10;
pi_saldo_mora_inhabilitar :=1;
pi_dias_mora_bloq_auto :=30;
pi_saldo_mora_bloq_auto :=1;
pi_cargo_mora_inhabilitar :=15000;
pi_porcen_cargo_excesolc :=1.5;
SELECT FC_PAN2CRIPTO@bapy(RPAD(VC_BIN,16,'F')) bin
INTO VC_BIN_CRIPTO
from dual;
vn_id_admin:=79;
/*------------------------------------------
Luego aquí van los pasos expuestos mas abajo
------------------------------------------*/
end; |
En este paso, se utiliza el procedimiento almacenado ubicado en el paquete PKG_PARAMETROS llamado SP_ALTA_ENTIDAD y le pasamos los valores de las variables previamente mencionadas, luego se habilita el emisor asignando el valor 'A' en el campo BASE_PAGO_MINIMO de la tabla EMISORES ubicada en el esquema DEBCREDPY.
-- =============== 1. ALTA EMISOR ================ --
vc_bandera := '1. ALTA EMISOR';
pkg_entidades.sp_alta_entidad(pi_emisor,
pi_descripcion,
pi_ruc_emisor,
pi_direccion,
pi_telefono,
pi_contacto,
pi_email_contacto,
pi_debcta_s_n,
pi_seguro_vida_s_n,
pi_calc_impuesto_s_n,
pi_tasa_int_punit,
pi_cuotas_financi_s_n,
pi_calculo_interes_s_n,
pi_decaimeinto_compulsi_s_n,
pi_apli_comis_mora_s_n,
pi_apli_comis_combus_s_n,
pi_apli_comis_super_s_n,
pi_apli_comis_adelefect_s_n,
pi_apli_comis_exceso_s_n,
pi_apli_entrega_extracto_s_n,
pi_apli_compra_ext_s_n,
pi_valida_mora_debaut_s_n,
pi_dias_perm_mora_debaut,
pi_debita_cta_comercio_s_n,
pi_usuario);
UPDATE DEBCREDPY.EMISORES E SET E.BASE_PAGO_MINIMO = 'A' WHERE E.EMISOR = 125; |
En esta tabla de encuentran una gran cantidad de parámetros definidos por la entidad para sus tarjetas de crédito, los cuales estan definidos tambien por las variables previamente declaradas.
-- =============== 2. EMISORES PRODUCTOS ================ --
vc_bandera := '2. EMISORES PRODUCTOS';
DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';emisores_productos;Registrado!');
insert into debcredpy.emisores_productos
(EMISOR,
PRODUCTO,
GRUPO_AFINIDAD,
PROCESADOR,
SERIE_FACTURA,
NUMERO_FACTURA,
GRACIA_VENCIMIENTO,
PORC_SOBREGIRO_CONT,
PORC_SOBREGIRO_EFEC,
PORC_SOBREGIRO_PLAN,
PORC_LIMITE_EFECTIVO,
TIPO_MONEDA_PM,
PISO_PAGO_MINIMO,
CUOTAS_FINANCIACION,
TIPO_DE_TASA,
LAPSO,
DIAS_LAPSO_TASA,
COSTO_FRANQUEO,
ARANCEL,
FONDO_DE_GARANTIA,
ARANCEL_POR_RAMO,
GENERA_NROCTA_P_SUC,
MODO_ESTADO_CTA,
PORC_AGROCABAL,
CORREL_LIQ,
CARPETA_FRAUDE,
PORC_REFINAN,
GESTION_COBRO,
MIN_LINEA_CREDITO,
MAX_LINEA_CREDITO,
MIN_LINEA_CUOTA,
MAX_LINEA_CUOTA,
MIN_CARGO_MORA,
MIN_CARGO_EXCESO,
MIN_CARGO_LINEA,
COBERTURA_FRAUDE,
MIN_PAGO_MINIMO,
GASTOS_ADMIN,
FORMA_PAGO,
CIUDAD,
CODIGO_NACIONALIDAD,
CODIGO_OCUPACION,
CARTERA,
CODIGO_CAPTADOR,
CODIGO_CORRESPONDENCIA,
ENCARGADO_DE_CUENTA,
DURACION_TARJETA,
DOCUMENTO_OBLIG,
TELEFONO_OBLIG,
FECHA_NAC_OBLIG,
ESTADO_CIVIL_OBLIG,
CUENTA_BANCARIA_OBLIG,
NUMERO_INTERNO_OBLIG,
DIRECCION_ADIC_OBLIG,
DOCUMENTO_ADIC_OBLIG,
TELEFONO_ADIC_OBLIG,
FECHA_NAC_ADIC_OBLIG,
ESTADO_CIVIL_ADIC_OBLIG,
HABIL_ALTA,
HABIL_RENOVACION,
HABIL_REGRABACION,
TITULAR_TIPO_COSTO,
TITULAR_ACCION,
TITULAR_COSTO,
ADICIONAL_TIPO_COSTO,
ADICIONAL_ACCION,
ADICIONAL_COSTO,
GEN_CARGOS_FIN_DIAS,
GEN_CARGOS_FIN_OPCION,
TITULAR_CUOTA_ANUAL,
TITULAR_SEGURO_FRAUDE,
ADICIONAL_CUOTA_ANUAL,
ADICIONAL_SEGURO_FRAUDE,
ATM_COBRA_CARGO,
ATM_IMPORTE_CARGO,
ATM_CANT_TRANSACC,
ATM_ADELANTO_EFECTIVO,
ATM_CONSULTA_SALDOS)
values
(pi_emisor,
1,
pi_emisor || '001',
5001,
'A',
0,
10 --40¿?--***************************************************************************
,
10 --15
,
0.00 --¿?--***************************************************************************
,
0.00 --¿?--***************************************************************************
,
100 --17
,
1,
0.00 --14¿?
,
0,
2,
1,
365,
0.00,
0,
3.00,
0,
0,
1,
0.00,
5,
'1240001',
100.00,
'N',
vn_lc_minima,
vn_lc_maximo,
0,
0,
10000.00,
0.00,
0.00,
15000.00,
30000.00,
0.00,
'V',
2307,
600,
102,
1,
'1',
'D',
1,
24,
'S',
'N',
'S',
'S',
'N',
'N',
'N',
'S',
'N',
'S',
'S',
'N',
'N',
'N',
'1',
'N',
30000.00,
'1',
'N',
30000.00,
60,
'A',
20000.00,
15000.00,
10000.00,
15000.00,
'S',
5000.00,
1,
'S',
'S'); |
De acuerdo al ciclo de liquidación(Ciclo 1= 1°viernes Ciclo 2=2° viernes Ciclo 3= 3° viernes Ciclo 4= 4° viernes Ciclo 9= Cualquier fecha) de usuario que solicite el emisor, aquí debemos de cargar el ultimo periodo cerrado de dicho ciclo para que el nuevo emisor inicie con el periodo actual.
-- =============== 3. CIERRES ================ -- vc_bandera := '3. CIERRES'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';cierres;Registrado!'); insert into cierres (emisor, PRODUCTO, CIERRE, DIA, ultimo_periodo_cerrado) values (pi_emisor, 1, 4, 25, 202308); |
-- =============== 4. CIERRES_HABILITADOS ================ -- vc_bandera := '4. CIERRES_HABILITADOS'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';cierres_habilitados;Registrado!'); insert into cierres_habilitados (EMISOR, PRODUCTO, CIERRE, CLASE_TARJETA, GRUPO_AFINIDAD) values (pi_emisor, 1, 4, 1, pi_emisor||'001'); |
Para esta sección, tomamos un emisor base que ya tenga parametrizado su calendario cierre, el emisor base elegido debe ser del mismo ciclo solicitado por la nueva entidad emisora.
-- =============== 5. CALENDARIOS CIERRES ================ --
vc_bandera := '5. CALENDARIOS CIERRES';
DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';calandarios_cierres;Registrado!');
insert into calendario_cierres
select distinct
ga.emisor,
cc.producto,
cc.cierre,
cc.periodo,
ga.grupo_afinidad,
cc.fecha_cierre,
cc.fecha_vencimiento
from calendario_cierres cc, grupos_afinidad ga
where cc.emisor = 119 --EMISOR_BASE
and ga.emisor = 125 --NUEVO_EMISOR
and cc.cierre = 4 --CICLO LIQUIDACION
and cc.periodo >= 202301;--PERIODO ACTUAL |
-- =============== 6. VARIABLES ENTORNOS ================ -- --############################################################################################
vc_bandera := '6. VARIABLES ENTORNOS';
DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';variables_entorno;Registrado!');
insert into CREDITOPY.variables_entorno (EMISOR, PRODUCTO, CIERRE, GRUPO_AFINIDAD, FECHA_CIERRE, FECHA_VENCIMIENTO, FECHA_CIERRE_ANT, FECHA_VENCIMIENTO_ANT, PERIODO_CIERRE, PERIODO_CIERRE_ANT)
values (pi_emisor, 1, 4, pi_emisor||'001', to_date('25-08-2023', 'dd-mm-yyyy'), to_date('08-09-2023', 'dd-mm-yyyy'), to_date('03-08-2023', 'dd-mm-yyyy'), to_date('11-08-2023', 'dd-mm-yyyy'), 202308, 202307);
|
-- =============== 7. VARIABLES ENTORNOS ================ -- vc_bandera := '7. VARIABLES ENTORNOS'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';variables_entorno;Registrado!'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 1, 'C'); |
-- =============== 8. PRM_CARTERAS ================ -- vc_bandera := '8. PRM_CARTERAS'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';prm_carteras;Registrado!'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 2, '2'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 3, '2'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 4, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 5, '0'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 6, '0'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 7, '9'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 8, 'A'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 9, '2'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 10, 'N'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 11, '4'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 12, '4'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 13, '4'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 14, 'N'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 15, 'S'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 16, '9'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 31, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 36, '2'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 37, '2'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 38, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 39, '9'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 47, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 48, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 49, '9'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 50, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 54, vc_descuenta_cuota); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 55, vc_linea_unificada); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 57, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 58, '9'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 59, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 61, '0'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 63, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 64, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 65, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 66, '1'); insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM) values (pi_emisor, 1, pi_emisor||'001', 1, 67, 'N'); |
-- =============== 9. PRM_CODIGOS_VALORES ================ -- vc_bandera := '9. PRM_CODIGOS_VALORES'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';prm_codigos_valores;Registrado!'); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 2, '0', pi_tasa_interes_corriente); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 3, '0', pi_tasa_interes_moratorio); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 16, '0', '0'); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 31, '0', pi_tasa_plan_normal); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 36, '0', pi_dias_mora_inhabilitar); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 37, '0', pi_saldo_mora_inhabilitar); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 38, '0', pi_cargo_mora_inhabilitar); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 39, '0', '0'); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 47, '0', pi_dias_mora_bloq_auto); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 48, '0', pi_saldo_mora_bloq_auto); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 49, '0', '0'); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 58, '0', '16'); --CREAR VARIABLE insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 59, '0', pi_tasa_plan_normal); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 65, '0', pi_montocostorenov_titu); insert into prm_codigos_valores (EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM) values (pi_emisor, 66, '0', pi_montocostorenov_adic); |
-- =============== 10. EMISORES_PLANES_AM ================ -- vc_bandera := '10. EMISORES_PLANES_AM'; DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';emisores_planes_am;Registrado!'); insert into emisores_planes_am (EMISOR, PRODUCTO, PLAN_AMORTIZABLE, DESCRIPCION, METODO_DE_FINAN, FREC_1ER_CUOTA_DEF, FRECUENCIA, TASA_VARIABLE, CODIGO_FECHA_HASTA) values (pi_emisor, 1, 3, 'PLAN CABAL', 2, 1, 30, 0, 2); insert into emisores_planes_am (EMISOR, PRODUCTO, PLAN_AMORTIZABLE, DESCRIPCION, METODO_DE_FINAN, FREC_1ER_CUOTA_DEF, FRECUENCIA, TASA_VARIABLE, CODIGO_FECHA_HASTA) values (pi_emisor, 1, 7, 'PLAN PAGOS CABAL', 2, 1, 30, 0, 2); insert into emisores_planes_am (EMISOR, PRODUCTO, PLAN_AMORTIZABLE, DESCRIPCION, METODO_DE_FINAN, FREC_1ER_CUOTA_DEF, FRECUENCIA, TASA_VARIABLE, CODIGO_FECHA_HASTA) values (pi_emisor, 1, 8, '1ra CUOTA A PLAZOS', 2, 1, 30, 0, 2); |
-- =============== 11. EMISORES_PRODS_FIN ================ -- vc_bandera := '11. EMISORES_PRODS_FIN'; DBMS_OUTPUT.put_line(pi_emisor||';'||'11. EMISORES_PRODS_FIN'||';creditopy.emisores_prods_fin;Registrado!'); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 44, 2650, 0.0000, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 45, 2660, 2.0000, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 50, 2690, 0.0000, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 67, 2691, 0.0000, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 12, 3300, pi_comision_ATM, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 12, 3310, pi_comision_Ventanilla, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 11, 3400, pi_tasa_plan_normal, 0.0000, 0.00, 0.00); insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR) values (pi_emisor, 1, 64, 3402, pi_tasa_plan_normal, 0.0000, 0.00, 0.00); |