Page History

...

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

...

Code Block

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

declare
  pi_emisor number;
  pi_emisor_base number;
  pi_grupo_afinidad_base 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_tasa_interes_sobre_compras number;
  pi_tasa_interes_cuotas_pagos number;
  pi_comision_ATM NUMBER;
  pi_comision_Ventanilla NUMBER;
  pi_comision_adm_mora 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_costo_por_bloqueo_aut 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;
  pi_emisor_base := 119;
  pi_grupo_afinidad_base := 119001;
  VC_PROMOTOR :='COOP. REDUCTO LTDA.';
  VC_BIN      := '604394';
  VC_BIN_EMISOR := 'COOP. REDUCTO LTDA.';
  VN_BIN_ID     := 201;
  vc_sftp_entidad := 'COOP. REDUCTO LTDA.';CoopReducto';--NO DEBE TENER ESPACIOS, NI CARACTERES ESPECIALES
  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_tasa_interes_sobre_compras :=0;
  pi_tasa_interes_cuotas_pagos :=0;
  pi_comision_ATM           := 6;
  pi_comision_Ventanilla    := 8.5;
  pi_comision_adm_mora :=0;
  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_costo_por_bloqueo_aut :=0; 
  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	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 = 119pi_emisor_base --EMISOR_BASE
and   ga.emisor = pi_emisor--NUEVO_EMISOR
and   cc.cierre = pi_cierre --CICLO LIQUIDACION 
and   cc.periodo >= 202301;--PERIODO ACTUAL

...

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
	select  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=2
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 2, '2');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=3
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 3, '2');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=4
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 4, '1');

  --COD PRM 2 -> B-Tasa de interes corriente ->ga.emisor,
       ga.producto,
       ga.grupo_afinidad,
       ca.cartera,
       pc.cod_prm,
       pc.valor_prm
	from prm_carteras pc, debcredpy.carteras ca, grupos_afinidad ga
	where ca.emisor = pi_emisor --NUEVO EMISOR
	and ga.emisor = ca.emisor
	and pc.emisor = pi_emisor_base --EMISOR BASE
	and pc.grupo_afinidad = pi_grupo_afinidad_base--GRUPO AFINIDAD BASE
	and pc.cartera = 1; --CARTERA

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!');
  
     /*Queries
  select * from creditopy.prm_parametros pp_codigos_valores pcv
  where pppcv.cod_prmemisor=5125
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 5, '0');

  --COD PRM 2 -> B-Tasa de interes corriente -> and pcv.cod_prm in (2,3,16,31,36,37,38,39,47,48,49,58,59,65,66) 
  
  select * from creditopy.prm_parametros pp
  where pp.cod_prm=6 in (2,3,16,31,36,37,38,39,47,48,49,58,59,65,66)*/
  
  --B-Tasa de interes corriente
  insert into prm_carterascodigos_valores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 12, pi_emisor||'0010', 1, 6, '0'pi_tasa_interes_corriente);

  --COD PRM 2 -> B-C-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=7moratorio
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDADCOD_PRM, CARTERA, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 13, pi_emisor||'0010', 1, 7, '9'pi_tasa_interes_moratorio);

  --COD PRM 2 -> BS-Tasa de interes corrientesobre ->compras
select * from creditopy.prm_parametros pp where pp.cod_prm=8
  insert into prm_carterascodigos_valores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 116, pi_emisor||'0010', 1, 8, 'A'pi_tasa_interes_sobre_compras);

  --COD PRM 2 -> BE-Tasa de interes corrientecuotas -> selectPLAN *NORMAL
from creditopy.prm_parametros pp where pp.cod_prm=9
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDADCOD_PRM, CARTERA, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 131, pi_emisor||'0010', 1, 9, '2'pi_tasa_plan_normal);

  --CODDias PRMen 2mora -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=10
  para inhabilitar
  insert into prm_carterascodigos_valores (EMISOR, PRODUCTO, GRUPO_AFINIDADCOD_PRM, CARTERA, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 136, pi_emisor||'0010', 1, 10, 'N'pi_dias_mora_inhabilitar);

  --CODSaldo PRMen 2mora -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=11
  para inhabilitar
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 137, pi_emisor||'0010', 1, 11, '4'pi_saldo_mora_inhabilitar);

  --CODCosto PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=12
  por inhabilitación
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDADCOD_PRM, CARTERA, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 138, pi_emisor||'0010', 1, 12, '4');
 pi_cargo_mora_inhabilitar);

   --CODBase PRMdel 2saldo -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=13
  financ. para int.s/compras
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDADCOD_PRM, CARTERA, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 139, pi_emisor||'0010', 1, 13, '40');

  --CODDias PRMen 2mora -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=14para bloqueo Automatico
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 147, pi_emisor||'0010', 1, 14, 'N'pi_dias_mora_bloq_auto);

  --CODSaldo PRMen 2Mora -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=15
  insert into prm_carteraspara bloqueo Automat.
  insert into prm_codigos_valores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 148, pi_emisor||'0010', 1, 15, 'S'pi_saldo_mora_bloq_auto);

  --CODCosto PRMpor 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=16Bloqueo Automatico
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 149, pi_emisor||'0010', 1, 16, '9'pi_costo_por_bloqueo_aut);

  --CODTasa de PRMinteres 2cuotas -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=31
  insert into prm_carteras PLAN PAGOS (cuota sin int)
  insert into prm_codigos_valores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 158, pi_emisor||'0010', 1, 31, '1'pi_tasa_interes_cuotas_pagos); 

 --COD PRM 2 -> B-Tasa de interes corrientecuotas -> select * from creditopy.prm_parametros pp where pp.cod_prm=36PLAN 1RA. CUOTA A PLAZOS
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 159, pi_emisor||'0010', 1, 36, '2'pi_tasa_plan_normal);
   --COD
PRM 2 -> B-TasaCosto de interesRenovacion corrienteTitular
-> select *insert frominto creditopy.prm_codigos_parametrosvalores pp where pp.cod_prm=37
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_(EMISOR, COD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 165, pi_emisor||'0010', 1, 37, '2'pi_montocostorenov_titu);

  --COD PRM 2 -> B-Tasa Costo de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=38Renovacion Adicional
  insert into prm_codigos_carterasvalores (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERACOD_PRM, COD_VALOR_PRM, VALOR_PRM)
  values (pi_emisor, 166, pi_emisor||'0010', 1, 38, '1'pi_montocostorenov_adic);

Paso 10 - Emisores Planes AM

Code Block

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

 --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=39 =============== 10. EMISORES_PLANES_AM ================ --
  vc_bandera := '10. EMISORES_PLANES_AM';
  DBMS_OUTPUT.put_line(pi_emisor||';'||vc_bandera||';emisores_planes_am;Registrado!');
  insert into prmemisores_planes_carterasam (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM, PLAN_AMORTIZABLE, DESCRIPCION, METODO_DE_FINAN, FREC_1ER_CUOTA_DEF, FRECUENCIA, TASA_VARIABLE, CODIGO_FECHA_HASTA)
  values (pi_emisor, 1, pi_emisor||'0013, 'PLAN CABAL', 2, 1, 3930, 0, '9'2);

  --CODinsert PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=47
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRMinto 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, pi_emisor||'001''PLAN PAGOS CABAL', 2, 1, 4730, 0, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=48
  2);

  insert into prmemisores_planes_carterasam (EMISOR, PRODUCTO, GRUPOPLAN_AFINIDADAMORTIZABLE, CARTERADESCRIPCION, CODMETODO_DE_PRMFINAN, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001'FREC_1ER_CUOTA_DEF, FRECUENCIA, TASA_VARIABLE, CODIGO_FECHA_HASTA)
  values (pi_emisor, 1, 488, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=49
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 49, '9');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=501ra 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 prm_carterascreditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, GRUPOPROD_FINAN_AFINIDADML, CARTERAPROD_FINAN_MR, CODIMPTE_MIN_PRMML, VALORIMPTE_MIN_PRMMR)
  values (pi_emisor, 1, pi_emisor||'001', 1, 50, '1'44, 2650, 0.0000, 0.0000, 0.00, 0.00);

  --CODinsert PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=54
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRMinto 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, pi_emisor||'001', 1, 54, vc_descuenta_cuota_comision_adm_mora, 0.0000, 0.00, 0.00);  

--COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=55
  insert into prm_carterasinsert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, GRUPOCODIGO_PROD_AFINIDADFINAN, CARTERARUBRO, CODPROD_FINAN_PRMML, VALOR_PRM)PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR)
  values (pi_emisor, 1, pi_emisor||'001', 1, 55, vc_linea_unificada, 50, 2690, 0.0000, 0.0000, 0.00, 0.00);
  
--COD PRM 2 -> B-Tasa de interes corriente -> select * frominsert into creditopy.prmemisores_prods_parametrosfin pp where pp.cod_prm=57
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM(EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, PROD_FINAN_ML, PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR)
  values (pi_emisor, 1, pi_emisor||'001', 1, 57, '1'67, 2691, 0.0000, 0.0000, 0.00, 0.00);

  --CODinsert PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=58into 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 prm_carterascreditopy.emisores_prods_fin (EMISOR, PRODUCTO, CODIGO_PROD_FINAN, RUBRO, GRUPOPROD_FINAN_AFINIDADML, CARTERAPROD_FINAN_MR, CODIMPTE_MIN_PRMML, VALORIMPTE_MIN_PRMMR)
  values (pi_emisor, 1, 12, 3310, pi_emisor||'001', 1, 58, '9'_comision_Ventanilla, 0.0000, 0.00, 0.00);

  --CODinsert PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=59
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRMinto 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_emisor||'001', 1, 59, '1'tasa_plan_normal, 0.0000, 0.00, 0.00);

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=61
  insert into prm_carteras insert into creditopy.emisores_prods_fin (EMISOR, PRODUCTO, GRUPOCODIGO_PROD_AFINIDADFINAN, CARTERARUBRO, CODPROD_FINAN_PRMML, VALOR_PRM)
 PROD_FINAN_MR, IMPTE_MIN_ML, IMPTE_MIN_MR)
  values (pi_emisor, 1, 64, 3402, pi_emisor||'001', 1, 61, '0');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=63_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 prmdebcredpy.emisores_carterasaranceles (EMISOR, PRODUCTOARANCEL, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRMFONDO_DE_GARANTIA)
  values (pi_emisor, 1, pi_emisor||'001', 1, 63, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=64
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 64, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=65
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 65, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=66
  insert into prm_carteras (EMISOR, PRODUCTO, GRUPO_AFINIDAD, CARTERA, COD_PRM, VALOR_PRM)
  values (pi_emisor, 1, pi_emisor||'001', 1, 66, '1');

  --COD PRM 2 -> B-Tasa de interes corriente -> select * from creditopy.prm_parametros pp where pp.cod_prm=67
  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, RUBRO0, 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, 12690, 41, 453, 5, 65, 34033);

  insert into rubradorimpuestos_rubros (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPOCODIGO_RUBROIMPUESTO, TIPOMODO_DE_DATO, DATO, RUBROIMPRESION_IMPUESTO)
  values (pi_emisor, 1, 1, 5, 5012691, 6, 1, 41003);

  insert into rubradorimpuestos_rubros (EMISOR, PRODUCTO, MODULO, TIPO_DE_RUBRO, SUBTIPOCODIGO_RUBROIMPUESTO, TIPOMODO_DE_DATO, DATO, RUBROIMPRESION_IMPUESTO)
  values (pi_emisor, 1, 19071, 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, 45001, 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 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, 2691rubros_comp_pm 
  select * from rubros_comp_pm where emisor IN ( pi_emisor )
  and rownum =  0
  union all
  select pi_emisor emisor, producto, rubro, mas_menos from rubros_comp_pm where emisor IN ( pi_emisor_base );

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
  select *
    from rubrador
   where emisor IN ( pi_emisor )
     and rownum = 0
  union all
  select pi_emisor emisor,
       producto,
       modulo,
       tipo_de_rubro,
       subtipo_rubro,
       tipo_de_dato,
       dato,
       rubro
    from rubrador
   where emisor IN ( pi_emisor_base );

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

...

Code Block

language	sql
theme	Eclipse
title	Emisores liquidac clearing
linenumbers	true
collapse	true

insert into creditopy.emisores_liquidac_clearing (EMISOR, APLICA_RETENCION_IVA, APLICA_RETENCION_RENTA, ARANC_COMERC_PORC_EMISOR, ARANC_COMERC_PORC_ADMIN, ARANCEL_COMERC_IVA_DISTRIBUIDO, FONDO_DE_GARANTIA, ARANCEL_ADEL_EFEC_ATM, ARANCEL_ADEL_EFEC_VENT, FECHA_REGISTRO, USUARIO_REGISTRO)
values (pi_emisor, 1, 1, 68.00, 32.00, 1, 3.00, 1.5, 1.5, sysdate, user);

Paso 30 - Categorización por Mora

Code Block

language	sql
theme	Eclipse
title	Categorizacion por mora
collapse	true

--PASO 1 - Se debe ejecutar en BAPY PROD EL SGTE INSERT
--select * from creditopy.RESOLUCIONES_ENTIDADES t where t.entidad = 125;
insert into creditopy.RESOLUCIONES_ENTIDADES (RESOLUCION_ID, ENTIDAD, USUARIO, FECHA_REGISTRO)
values (1, pi_emisor, 'CEIBOA', SYSDATE);

Paso 31 - Replicación 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 24

New Version Current

Key

QUEDA PENDIENTE AGREGAR/VERIFICAR

Paso 1 - Alta del emisor

Paso 9 - PRM Codigos Valores

Paso 10 - Emisores Planes AM

Paso 11 - Emisores Prods Fin

Paso 12 - Emisores Aranceles

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 13 - Impuestos Rubros

Paso 14 - Rubros Comp PM

Paso 15 - Rubrador

Paso 16 - Bines Emisores

Paso 30 - Categorización por Mora

Paso 31 - Replicación al OL