Page History

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.

QUEDA PENDIENTE AGREGAR/VERIFICAR

Asignar las variables declaradas en su campo correspondiente PASO 2.
Crear y asignar variable para el PASO 3.
Crear y asignar variables para el PASO 5.
Verificacion de los cod_prm de la tabla prm_carteras para saber a que parámetros corresponden y poder crear declarar las variables correspondientes para dichos parámetros PASO 8 Y 9.
Verificar el PASO 10, 11, 12, 13, 14 y 15 para saber y documentar en donde impacta

Declaración de cabecera y cierre del script completo

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.

Code Block

language	sql
theme	Eclipse
title	Declaración de cabecera y cierre
linenumbers	true
collapse	true

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;

Paso 1 - Alta del emisor

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.

Code Block

language	sql
theme	Eclipse
title	Alta de Emisor
linenumbers	true
collapse	true

  -- =============== 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;

Paso 2 - Insertar un registro en la tabla EMISORES_PRODUCTOS

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.

Code Block

language	sql
theme	Eclipse
title	Emisores_productos
linenumbers	true
collapse	true

-- =============== 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');

Paso 3 - Cierres

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.

Code Block

language	sql
theme	Eclipse
title	Cierres
linenumbers	true
collapse	true

-- =============== 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);

Paso 4 - Cierres Habilitados

Code Block

language	sql
theme	Eclipse
title	Cierres Habilitados
linenumbers	true
collapse	true

-- =============== 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');

Paso 5 - Calendario Cierres

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.

Code Block

language	sql
theme	Eclipse
title	Calendario Cierres
linenumbers	true
collapse	true

 -- =============== 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

Paso 6 - Variables de Entorno - CREDITOPY.VARIABLES_ENTORNO

Code Block

language	sql
theme	Eclipse
title	Variables de entorno
linenumbers	true
collapse	true

-- =============== 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);

Paso 7 - Variables de Entorno - CREDITOPY.PRM_CARTERAS

Code Block

language	sql
theme	Eclipse
title	Variables de entorno
linenumbers	true
collapse	true

 -- =============== 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');

Paso 8 - PRM Carteras

Code Block

language	sql
theme	Eclipse
title	PRM Carteras
linenumbers	true
collapse	true

   -- =============== 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');

Paso 9 - PRM Codigos Valores

Code Block

language	sql
theme	Eclipse
title	PRM Codigos valores
linenumbers	true
collapse	true

-- =============== 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);

Paso 10 - Emisores Planes AM

Code Block

language	sql
theme	Eclipse
title	Emisores planes AM
linenumbers	true
collapse	true

 -- =============== 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);

Paso 11 - Emisores Prods Fin

Code Block

language	sql
theme	Eclipse
title	Emisores prods fin
linenumbers	true
collapse	true

 -- =============== 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);

Paso 12 - Emisores Aranceles

Code Block

language	sql
theme	Eclipse
title	Emisores aranceles
linenumbers	true
collapse	true

 -- =============== 12. EMISORES_ARANCELES ================ --
  vc_bandera := '12. EMISORES_ARANCELES';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';emisores_aranceles;Registrado!');
  insert into debcredpy.emisores_aranceles (EMISOR, ARANCEL, FONDO_DE_GARANTIA)
  values (pi_emisor, 0, 3.00);

Paso 13 - Impuestos Rubros

Code Block

language	sql
theme	Eclipse
title	Impuestos rubros
linenumbers	true
collapse	true

 -- =============== 13. IMPUESTOS_RUBROS ================ --
  vc_bandera := '13. IMPUESTOS_RUBROS';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';impuestos_rubros;Registrado!');
  insert into impuestos_rubros (EMISOR, PRODUCTO, RUBRO, CODIGO_IMPUESTO, MODO_IMPRESION_IMPUESTO)
  values (pi_emisor, 1, 2690, 1, 3);

  insert into impuestos_rubros (EMISOR, PRODUCTO, RUBRO, CODIGO_IMPUESTO, MODO_IMPRESION_IMPUESTO)
  values (pi_emisor, 1, 2691, 1, 3);

  insert into impuestos_rubros (EMISOR, PRODUCTO, RUBRO, CODIGO_IMPUESTO, MODO_IMPRESION_IMPUESTO)
  values (pi_emisor, 1, 9071, 1, 3);

Paso 14 - Rubros Comp PM

Code Block

language	sql
theme	Eclipse
title	Rubros comp pm
linenumbers	true
collapse	true

-- =============== 14. RUBROS_COMP_PM ================ --
  vc_bandera := '14. RUBROS_COMP_PM';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';rubros_comp_pm;Registrado!');
  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3609, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3610, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2691, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3627, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3628, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3597, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3596, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3557, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3626, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3606, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3607, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1501, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1502, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1503, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3693, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1100, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1101, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1200, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 1201, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2100, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2110, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2200, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2400, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2550, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2600, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2640, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2650, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2660, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2690, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 2900, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3000, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3100, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3200, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3212, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3220, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3222, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3300, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3310, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3333, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3400, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3401, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3402, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3450, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3452, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3501, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3502, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3506, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3507, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3511, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3515, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3517, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3518, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3520, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3525, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3528, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3529, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3531, 1);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3534, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3536, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3537, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3540, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3550, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3551, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3553, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3558, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3561, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3562, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3563, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3564, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3565, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3566, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3567, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3568, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3569, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3570, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3571, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3574, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3581, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3582, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3583, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3584, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3586, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3588, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3603, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3605, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3611, 1);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3612, 1);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3613, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3620, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3622, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3801, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 4000, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 4100, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 4300, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 4400, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 4500, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 5000, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 5504, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 5507, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 8200, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 8700, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 8800, 0);

  insert into rubros_comp_pm (EMISOR, PRODUCTO, RUBRO, MAS_MENOS)
  values (pi_emisor, 1, 3694, 0);

Paso 15 - Rubrador

Code Block

language	sql
theme	Eclipse
title	Rubrador
linenumbers	true
collapse	true

-- =============== 15. RUBRADOR ================ --
  vc_bandera := '15. RUBRADOR';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';rubrador;Registrado!');
  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 101, 0, 0, 1000);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 104, 0, 0, 1400);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 105, 0, 0, 1300);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 106, 0, 0, 1500);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 107, 0, 0, 1700);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 108, 0, 0, 1600);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 110, 0, 0, 1050);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 111, 0, 0, 1800);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 113, 0, 0, 1200);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 115, 0, 0, 1150);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 117, 0, 0, 1900);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 118, 0, 0, 1100);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 119, 0, 0, 1450);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 120, 0, 0, 1350);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 121, 0, 0, 333);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 122, 0, 0, 1310);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 123, 0, 0, 1355);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 124, 0, 0, 1101);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 125, 0, 0, 1201);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 1, 126, 0, 0, 1202);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 2, 201, 0, 0, 500);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 2, 202, 0, 0, 510);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 2, 203, 0, 0, 520);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 301, 0, 0, 550);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 304, 0, 0, 5100);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 306, 0, 0, 530);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 307, 0, 0, 540);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 443, 5, 55, 3583);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 443, 5, 56, 3582);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 443, 5, 57, 3586);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 443, 5, 204, 3553);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 400, 5, 34, 2500);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 401, 5, 9, 2900);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 402, 5, 6, 3000);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 403, 5, 7, 3100);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 404, 5, 11, 3400);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 407, 5, 52, 3505);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 407, 5, 53, 3540);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 409, 5, 1, 2000);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 410, 5, 17, 2300);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 411, 5, 10, 2200);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 412, 5, 13, 2100);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 413, 5, 14, 3200);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 414, 5, 18, 3550);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 414, 5, 19, 3522);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 415, 5, 19, 3554);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 416, 5, 20, 3555);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 417, 5, 21, 3551);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 418, 5, 23, 3333);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 419, 5, 24, 3528);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 421, 5, 25, 3561);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 422, 5, 26, 3562);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 423, 5, 27, 3563);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 424, 5, 28, 3564);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 425, 5, 29, 3565);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 426, 5, 30, 3566);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 427, 5, 31, 3567);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 428, 5, 32, 3568);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 429, 5, 33, 3569);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 430, 5, 35, 3558);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 431, 5, 41, 3560);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 432, 5, 42, 2600);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 433, 5, 43, 3571);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 435, 5, 46, 2670);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 436, 5, 44, 2650);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 437, 5, 45, 2660);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 439, 5, 12, 3310);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 440, 5, 50, 2690);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 441, 5, 51, 2550);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 442, 5, 54, 3450);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 443, 5, 55, 2110);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 444, 5, 12, 3300);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 447, 5, 58, 3504);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 448, 5, 44, 2640);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 449, 4, 61, 3451);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 450, 4, 63, 3452);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 451, 5, 15, 3401);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 452, 5, 64, 3402);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 453, 5, 65, 3403);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 5, 501, 6, 1, 4100);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 5, 502, 6, 2, 4000);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 5, 504, 6, 4, 4500);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 7, 702, 5, 22, 7700);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 7, 704, 0, 0, 8200);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 7, 706, 0, 0, 8700);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 7, 707, 5, 5, 8800);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 3, 443, 5, 66, 3608);

  insert into rubrador (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPO_RUBRO, TIPO_DE_DATO, DATO, RUBRO)
  values (pi_emisor, 1, 1, 4, 454, 5, 67, 2691);

Paso 16 - Bines Emisores

Code Block

language	sql
theme	Eclipse
title	Bines emisores
linenumbers	true
collapse	true

-- =============== 16. BINES_EMISORES_CR@olpy ================ --
  vc_bandera := '16. BINES_EMISORES_CR@olpy';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';BINES_EMISORES_CR@olpy;Registrado!');
  insert into BINES_EMISORES_CR@olpy (BIN, EMISOR, EXTRANJERA, PAIS, LONGITUD, DESCEMI, BIN_ID, MASCARA_PRODUCTO, SA)
  values (VC_BIN, pi_emisor, 'N', 1, LENGTH(VC_BIN), VC_BIN_EMISOR, VN_BIN_ID, 0, 'CA_IN');
  
  SELECT count(1)
    INTO pi_cantidad
    FROM BINES_EMISORES_CR@olpy A
    WHERE 0=(SELECT COUNT(*)
             FROM BIN_EMISORES@bapy B
             WHERE A.BIN_ID=B.BIN_ID
            );
  IF pi_cantidad = 1 THEN
    DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';BINES_EMISORES_CR@olpy;Verficado!');
    --commit;
   -- =============== 16.1 BIN_EMISORES ================ --
    vc_bandera := '16.1 BIN_EMISORES';
    DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';BIN_EMISORES;Registrado!');
    insert into CREDITOPY.BIN_EMISORES (BIN, EMISOR, EXTRANJERA, PAIS, LONGITUD, DESCEMI, BIN_ID, MASCARA_PRODUCTO, SA)
    values (VC_BIN_CRIPTO, pi_emisor, 'N', 1, 6, VC_BIN_EMISOR, VN_BIN_ID, '0', 'CA_IN');
    -- =============== 16.2 BIN_EMISORES ================ --
    vc_bandera := '16.2 BIN_EMISORES';
    DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';BIN_EMISORES;Replicar!');
    BEGIN SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.BIN_EMISORES'); END;
    
    -- =============== 16.3 DEBCREDPY.PROCESADORES_PRODS ================ --
    vc_bandera := '16.3 DEBCREDPY.PROCESADORES_PRODS';
    DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';DEBCREDPY.PROCESADORES_PRODS;Registrado');
    insert into debcredpy.procesadores_prods (PROCESADOR, PRODUCTO, EMISOR, CORRELATIVO_DE_TARJETA, PROCCORRTD, TOPE, BIN_ID)
    values (5001, 1, pi_emisor, 0, 0, 999999999, VN_BIN_ID);
    
    -- =============== 16.4 AUTORIZADOR_CR.ACTU_BIN_EMISORES@OLPY ================ --
    vc_bandera := '16.4 AUTORIZADOR_CR.ACTU_BIN_EMISORES@OLPY';
   BEGIN 
     BEGIN AUTORIZADOR_CR.ACTU_BIN_EMISORES@OLPY; END;
     DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';AUTORIZADOR_CR.ACTU_BIN_EMISORES@OLPY;Actualizado!');
   EXCEPTION
     WHEN OTHERS THEN 
       DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';AUTORIZADOR_CR.ACTU_BIN_EMISORES@OLPY;No Actualizado. Reintente!');
   END;
    
  ELSE
    DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';BINES_EMISORES_CR@olpy;Error!');
    RAISE_APPLICATION_ERROR(-20001,'No se pudo dar de alta el bin '||vc_bin);
  END IF;

Paso 17 - Emisor Numero Cuenta/Tarjeta

Code Block

language	sql
theme	Eclipse
title	Emisor numero cuenta/tarjeta
linenumbers	true
collapse	true

-- =============== 17. EMISOR_NROCTA_TARJ ================ --
  vc_bandera := '17. EMISOR_NROCTA_TARJ';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';EMISOR_NROCTA_TARJ;Registrado!');
  insert into EMISOR_NROCTA_TARJ (EMISOR, SUCURSAL_EMISOR, PRODUCTO, NUMERO_CUENTA)
  values (pi_emisor, 1, 1, pi_emisor||'000000000');

Paso 18 - Codigos Correspondencia

Code Block

language	sql
theme	Eclipse
title	Codigos correspondencia
linenumbers	true
collapse	true

 -- =============== 18. CODIGOS_CORRESPONDENCIA ================ --
  vc_bandera := '18. CODIGOS_CORRESPONDENCIA';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';CODIGOS_CORRESPONDENCIA;Registrado!');
  insert into codigos_correspondencia (EMISOR, CODIGO, DESCRIPCION)
  values (pi_emisor, 'D', 'ENVIAR POR CORREO');

  insert into codigos_correspondencia (EMISOR, CODIGO, DESCRIPCION)
  values (pi_emisor, 'I', 'ENVIO POR E-MAIL');

  insert into codigos_correspondencia (EMISOR, CODIGO, DESCRIPCION)
  values (pi_emisor, 'R', 'RETENER EN DPTO.TARJETAS');

Paso 19 - Promotores

Code Block

language	sql
theme	Eclipse
title	Promotores
linenumbers	true
collapse	true

 -- =============== 19. PROMOTORES ================ --
  vc_bandera := '19. PROMOTORES';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';PROMOTORES;Registrado!');
  insert into promotores (EMISOR_PROCESADOR, PROMOTOR_ID, NOMBRE)
  values (805, pi_emisor, VC_PROMOTOR);

Paso 20 - Tarjetas Boletin

Code Block

language	sql
theme	Eclipse
title	Tarjetas boletin
linenumbers	true
collapse	true

 -- =============== 20. TARJETAS_BOLETIN ================ --
  vc_bandera := '20. TARJETAS_BOLETIN';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';TARJETAS_BOLETIN;Registrado!');
  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 10, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 14, 6, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 15, 6, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 17, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 18, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 50, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 51, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 52, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 53, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 54, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 55, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 56, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 57, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 58, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 59, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 60, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 61, 3, 1, 1, 0, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 62, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 63, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 64, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 65, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 66, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 67, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 68, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 69, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 70, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 71, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 72, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 73, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 74, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 75, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 76, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 77, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 78, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 79, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 80, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 81, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 82, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 83, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 84, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 85, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 86, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 87, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 88, 3, 1, 1, 1, 0);

  insert into tarjetas_boletin (EMISOR, PRODUCTO, ESTADO, MESES_EN_BOLETIN, RETENER_TARJETA, CONDICIONAL, SALDO_AL_PAGO_MINIMO, SIN_INTERESES)
  values (pi_emisor, 1, 89, 3, 1, 1, 1, 0);

Paso 21 - Mensajes Emisor Productos

Code Block

language	sql
theme	Eclipse
title	Mensajes emisor productos
linenumbers	true
collapse	true

-- =============== 21. MENS_EMISOR_PRODS ================ --
  vc_bandera := '21. MENS_EMISOR_PRODS';
  insert into mens_emisor_prods (EMISOR, PRODUCTO, CORRELATIVO, GRUPO_AFINIDAD, MENSAJE, FECHA_HASTA)
  values (pi_emisor, 1, 2, pi_emisor||'001', '"SOCIO(A) USUARIO(A): DESDE EL 01/01/19 RIGE EL REGLAMENTO DE CRÉDITO SOBRE DESCUENTO AUTOMÁTICO DE APORTES Y SOLIDARIDAD EN ', to_date('31-12-2020', 'dd-mm-yyyy'));

  insert into mens_emisor_prods (EMISOR, PRODUCTO, CORRELATIVO, GRUPO_AFINIDAD, MENSAJE, FECHA_HASTA)
  values (pi_emisor, 1, 3, pi_emisor||'001', 'SU T.D.CR"', to_date('31-12-2020', 'dd-mm-yyyy'));

  insert into mens_emisor_prods (EMISOR, PRODUCTO, CORRELATIVO, GRUPO_AFINIDAD, MENSAJE, FECHA_HASTA)
  values (pi_emisor, 1, 50, pi_emisor||'001', ' ', to_date('31-12-2099', 'dd-mm-yyyy'));

  insert into mens_emisor_prods (EMISOR, PRODUCTO, CORRELATIVO, GRUPO_AFINIDAD, MENSAJE, FECHA_HASTA)
  values (pi_emisor, 1, 51, pi_emisor||'001', 'CARGOS PENDIENTES A APLICAR X_IMPORTE', to_date('31-12-2099', 'dd-mm-yyyy'));

  insert into mens_emisor_prods (EMISOR, PRODUCTO, CORRELATIVO, GRUPO_AFINIDAD, MENSAJE, FECHA_HASTA)
  values (pi_emisor, 1, 1, pi_emisor||'001', ' ', to_date('31-12-2020', 'dd-mm-yyyy'));
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';MENS_EMISOR_PRODS;Registrado!');

Paso 22 - Codigos Py

Code Block

language	sql
theme	Eclipse
title	Codigos py
linenumbers	true
collapse	true

 -- =============== 22. CODIGOS_PY ================ --
  vc_bandera := '22. CODIGOS_PY';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';CODIGOS_PY;Registrado!');
  insert into codigos_py (TIPO_CODIGO, CODIGO, DESCRIPCION, VALOR, INDICADOR)
  values (29, pi_emisor, '805', '1', '5001');

Paso 23 - Acquirers Emisores

Code Block

language	sql
theme	Eclipse
title	Acquirers emisores
linenumbers	true
collapse	true

 -- =============== 23. ACQUIRERS_EMISORES@OLPY ================ --
  vc_bandera := '23. ACQUIRERS_EMISORES@OLPY';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';ACQUIRERS_EMISORES@OLPY;Registrado!');
  insert into acquirers_emisores@olpy (EMISOR, PLAN, TIPO_MEDIO, ACQUIRER, DESCRIPCION)
  values (pi_emisor, 6, 'ARCHIVO', 10000000013, 'NR');

Paso 24 - SFTP Parameters

Code Block

language	sql
theme	Eclipse
title	SFTP Parameters
linenumbers	true
collapse	true

-- =============== 24. DEBCREDPY.SFTP_PARAMETERS@OLPY ================ --
  vc_bandera := '24. DEBCREDPY.SFTP_PARAMETERS@OLPY';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';DEBCREDPY.SFTP_PARAMETERS@OLPY;Registrado!');
  insert into DEBCREDPY.SFTP_PARAMETERS@olpy (ISSUER, TYPE_PATH, PATH, HOST, APPLICATION, OPERATION, ISENCRYPT, REG_USER, REG_DATE, SUCURSAL)
  values (pi_emisor, 1, '/'||vc_sftp_entidad||'/upload', '10.5.1.4', 'AccesoCabal', 'UP', 0, 'CREDITOPY', sysdate, 1);

  insert into DEBCREDPY.SFTP_PARAMETERS@olpy (ISSUER, TYPE_PATH, PATH, HOST, APPLICATION, OPERATION, ISENCRYPT, REG_USER, REG_DATE, SUCURSAL)
  values (pi_emisor, 2, '/'||vc_sftp_entidad||'/download', '10.5.1.4', 'AccesoCabal', 'DOWN', 0, 'CREDITOPY',sysdate, 1);

  insert into DEBCREDPY.SFTP_PARAMETERS@olpy (ISSUER, TYPE_PATH, PATH, HOST, APPLICATION, OPERATION, ISENCRYPT, REG_USER, REG_DATE, SUCURSAL)
  values (pi_emisor, 3, '/historico/'||vc_sftp_entidad||'/download', '10.5.1.4', 'AccesoCabal', 'HIST', 0, 'CREDITOPY', sysdate, 1);

  insert into DEBCREDPY.SFTP_PARAMETERS@olpy (ISSUER, TYPE_PATH, PATH, HOST, APPLICATION, OPERATION, ISENCRYPT, REG_USER, REG_DATE, SUCURSAL)
  values (pi_emisor, 4, '/upload', '10.5.1.4', 'AccesoCabal', 'UP', 0, 'CREDITOPY',sysdate, 1);

  insert into DEBCREDPY.SFTP_PARAMETERS@olpy (ISSUER, TYPE_PATH, PATH, HOST, APPLICATION, OPERATION, ISENCRYPT, REG_USER, REG_DATE, SUCURSAL)
  values (pi_emisor, 5, '/download', '10.5.1.4', 'AccesoCabal', 'DOWN', 0, 'CREDITOPY', sysdate, 1);

Paso 25 - Codigos Py

Code Block

language	sql
theme	Eclipse
title	Codigos py
linenumbers	true
collapse	true

 -- =============== 25. CODIGOS_PY ================ --
  vc_bandera := '25. CODIGOS_PY';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';CODIGOS_PY;Registrado!');
  insert into codigos_py (TIPO_CODIGO, CODIGO, DESCRIPCION, VALOR, INDICADOR)
  values (81, pi_emisor, 'P', null, null);

Paso 26 - Archivos Ceibo Parametros

Code Block

language	sql
theme	Eclipse
title	Archivos ceibo parametros
linenumbers	true
collapse	true

-- =============== 26. ARCHIVOS_CEIBO_PARAMETROS ================ --
  vc_bandera := '26. ARCHIVOS_CEIBO_PARAMETROS';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';ARCHIVOS_CEIBO_PARAMETROS;Registrado!');
  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 1, 1, 9, 1, 99.00, 1, 0, 0, 'CHR(160)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 3, 1, 1, 3, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 4, 1, 1, 4, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 5, 1, 1, 5, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 44, 1, 1, 44, 1.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 41, 1, 1, 41, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 6, 1, 1, 6, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 7, 1, 1, 7, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 8, 1, 1, 8, 99.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 11, 1, 1, 2, 99.00, 1, 0, 0, ' ', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 12, 1, 1, 12, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 15, 1, 1, 15, 99.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 17, 1, 4, 17, 99.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 22, 1, 1, 22, 99.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 27, 1, 1, 27, 99.00, 0, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 38, 1, 1, 38, 99.00, 1, 1, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 49, 1, 1, 6, 99.00, 1, 0, 0, 'CHR(124)', null);

  insert into archivos_ceibo_parametros (PROCESADOR, ENTIDAD, ARCHIVO_ID, FRECUENCIA_ID, IDFORMATO, DOMINIO_ID, ORDEN, HABILITADO, IS_CHK_SFTP, PAGINACION, SEPARADOR, ARCHIVO_NOMBRE)
  values (805, pi_emisor, 50, 1, 1, 6, 99.00, 1, 0, 0, 'CHR(124)', null);

Paso 27 - Formato Pagos

Code Block

language	sql
theme	Eclipse
title	Formato pagos
linenumbers	true
collapse	true

-- =============== 27. CREDITOPY.FORMATOS_PAGOS@OLPY ================ --
  vc_bandera := '27. CREDITOPY.FORMATOS_PAGOS@OLPY';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';CREDITOPY.FORMATOS_PAGOS@OLPY;Registrado!');
  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'CAJA', 42, 3, null);

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'ENTIDAD', 1, 4, null);

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'FECHA', 5, 8, 'ddmmyyyy');

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'IMPORTE', 30, 10, 'dd');

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'LOTE', 1, 1, null);

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'SUCURSAL', 45, 3, null);

  insert into CREDITOPY.FORMATOS_PAGOS@OLPY (COMERCIO, DATO, POSICION, LONGITUD, FORMATO)
  values (pi_emisor||'001', 'TARJETA', 13, 16, null);

Paso 28 - Insertar Ubicación del Logo

Code Block

language	sql
theme	Eclipse
title	Ubicación de logo
linenumbers	true
collapse	true

-- =============== 28. INSERTAR UBICACION DE LOGO ================ --
  vc_bandera := '28. INSERTAR UBICACION DE LOGO OL';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';INSERTAR UBICACION DE LOGO;SI Realizado!');
  insert into debcredpy.logos@olpy (EMISOR, LOGO)
  values (125, '/AccesoCabalEntidades/jsp/imagenes/entidades/E125.jpg');

Paso 29 - Replicacion al OL

Code Block

language	sql
theme	Eclipse
title	Replicacion al OL
linenumbers	true
collapse	true

  -- =============== 28. REPLICACION al OL ================ --
  vc_bandera := '28. REPLICACION al OL';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';Replicar al OL;SI Realizado!');

  --commit;
  BEGIN
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.CALENDARIO_CIERRES');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.CIERRES_HABILITADOS');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.EMISORES_COMERCIOS');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.CODIGOS_CORRESPONDENCIA');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('DEBCREDPY.SUCURSALES_EMISORES');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('DEBCREDPY.EMISORES');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.CODIGOS_PY');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('DEBCREDPY.CARTERAS');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.GRUPOS_AFINIDAD');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.CIERRES');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('DEBCREDPY.CAPTADORES');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('DEBCREDPY.EMISORES_PRODUCTOS');
    SYS.DBMS_SNAPSHOT.REFRESH@olpy('CREDITOPY.PROMOTORES');
  END;

...

Page tree

Versions Compared

Old Version 15

New Version 16

Key

QUEDA PENDIENTE AGREGAR/VERIFICAR

Declaración de cabecera y cierre del script completo

Paso 1 - Alta del emisor

Paso 2 - Insertar un registro en la tabla EMISORES_PRODUCTOS

Paso 3 - Cierres

Paso 4 - Cierres Habilitados

Paso 5 - Calendario Cierres

Paso 6 - Variables de Entorno - CREDITOPY.VARIABLES_ENTORNO

Paso 7 - Variables de Entorno - CREDITOPY.PRM_CARTERAS

Paso 8 - PRM Carteras

Paso 9 - PRM Codigos Valores

Paso 10 - Emisores Planes AM

Paso 11 - Emisores Prods Fin

Paso 12 - Emisores Aranceles

Paso 13 - Impuestos Rubros

Paso 14 - Rubros Comp PM

Paso 15 - Rubrador

Paso 16 - Bines Emisores

Paso 17 - Emisor Numero Cuenta/Tarjeta

Paso 18 - Codigos Correspondencia

Paso 19 - Promotores

Paso 20 - Tarjetas Boletin

Paso 21 - Mensajes Emisor Productos

Paso 22 - Codigos Py

Paso 23 - Acquirers Emisores

Paso 24 - SFTP Parameters

Paso 25 - Codigos Py

Paso 26 - Archivos Ceibo Parametros

Paso 27 - Formato Pagos

Paso 28 - Insertar Ubicación del Logo

Paso 29 - Replicacion al OL