insert into cxc_parametro(cod_cia,ind_int_conta,ind_int_bancos,ind_asiento_automatico,
clase_Prov,tip_doc_saldo,conse_deposito,conse_recagente,liqsaldo_automatico,
creditoir,ndchkdev,multachkdev,MONTOVENCEMAY)
select cod_cia,ind_int_conta,ind_int_bancos,ind_asiento_automatico,
clase_Prov,tip_doc_saldo,conse_deposito,conse_recagente,liqsaldo_automatico,
null,null,null,0 from qrf.cxc_parametro;
                                                                
insert into  CXC_PARMONEDA select * from qrf.cxc_parmoneda;                                                                          

insert into cxcperfil (cod_Cia,perfil,descripcion,cod_moneda,dias_gracia,
interes,int_mora,dias_credito,limite_credito,verifica_credito,autorizacion,
verifica_vence,aceptachk,ctlcheques)
select cod_Cia,linea,descripcion,cod_moneda,dias_gracia,
interes,int_mora,dias_credito,limite_credito,verifica_credito,autorizacion,
verifica_vence,'S','N' from qrf.cxc_linea;

insert into cxc_linea(cod_cia,linea,cod_moneda,descripcion,tipcal_interes)
select cod_cia,linea,cod_moneda,descripcion,tipcal_interes from qrf.cxc_linea;

insert into cxc_documento
(TIP_DOC,NOM_DOC,TIP_SALDO,CLASE,NOM_ASIENTO,PRIORIDAD)
select TIP_DOC,NOM_DOC,TIP_SALDO,CLASE,NOM_ASIENTO,null from qrf.cxc_documento;
insert into cxc_con_documento select * from qrf.cxc_con_documento;
insert into cxc_documento_cliente select * from qrf.cxc_documento_cliente;
insert into cxc_autorizacion select * from qrf.cxc_autorizacion;
insert into cxc_recagente select * from qrf.cxc_recagente;
insert into cxc_por_desc select * from qrf.cxc_por_desc;

               
insert into cxc_credito select cod_cia,linea,cod_cliente,linea,
dias_credito,limite_credito,interes,int_mora,saldo,0,estado from qrf.cxc_credito;
insert into cxc_depositos select * from qrf.cxc_depositos;
insert into cxc_age_cobro select * from qrf.cxc_age_cobro;
insert into cxc_dif_recibos select * from qrf.cxc_dif_recibos;
insert into cxc_det_comision select * from qrf.cxc_det_comision;
insert into cxc_recibos_agentes select * from qrf.cxc_recibos_agentes;

insert into cxc_rangos_antsa(cod_cia,linea,dias) 
select cod_cia,'001',rango1 from qrf.cxc_rangos_antsa; 
insert into cxc_rangos_antsa(cod_cia,linea,dias) 
select cod_cia,'001',rango2 from qrf.cxc_rangos_antsa; 
insert into cxc_rangos_antsa(cod_cia,linea,dias) 
select cod_cia,'001',rango3 from qrf.cxc_rangos_antsa; 
insert into cxc_rangos_antsa(cod_cia,linea,dias) 
select cod_cia,'001',rango4 from qrf.cxc_rangos_antsa; 
insert into cxc_rangos_antsa(cod_cia,linea,dias) 
select cod_cia,'001',rango5 from qrf.cxc_rangos_antsa; 

insert into cxc_rangos_credito select * from qrf.cxc_rangos_credito;

insert into cxc_enc_movimiento
(cod_Cia,sucursal,tip_doc,num_doc,fec_doc,fec_int,fec_vence,interes,int_mora,
num_asiento,ano_fiscal,per_proceso,cod_cliente,linea,persona,cod_agente,
mon_docto,cod_moneda,tip_cambio,tip_cambio_base,num_pagos,num_dias_pago,
des_observacion,estado,ind_externo,mon_saldo,mon_interes,mon_int_Mora,
tipo_cobro,doc_ref,nom_asiento,autorizacion)
select cod_Cia,sucursal,tip_doc,num_doc,fec_doc,fec_int,fec_vence,interes,int_mora,
num_asiento,ano_fiscal,per_proceso,cod_cliente,linea,persona,cod_agente,
mon_docto,cod_moneda,tip_cambio,tip_cambio,num_pagos,num_dias_pago,
des_observacion,estado,ind_externo,mon_saldo,mon_interes,mon_int_Mora,
tipo_cobro,doc_ref,nom_asiento,autorizacion from qrf.cxc_enc_movimiento;
commit;

declare 
cursor xx is select * from qrf.cxc_obligacion;
 n number(10):=0;
begin
  for a in xx loop
    n:=n+1;
    if mod(n,500)=0 then 
       commit;
    end if;
    insert into cxc_obligacion
    values(a.COD_CIA,a.SUCURSAL,a.TIP_DOC,a.NUM_DOC,a.NUM_PARTE,a.FEC_VENCE,      
           a.MON_PAGO,a.MON_SALDO);      
  end loop;
  commit;
end;

insert into cxc_obligacion select * from qrf.cxc_obligacion;
insert into cxc_enc_movimiento_con select * from qrf.cxc_enc_movimiento_con;

declare cursor xx is select * from qrf.cxc_enc_pago_nota;
 n number(10):=0;
begin
  for a in xx 
  loop
    n:=n+1;
    if mod(n,500)=0 then 
       commit;
    end if;
    insert into cxc_enc_pago_nota 
    values(a.cod_Cia,a.sucursal,a.tip_doc,a.num_doc,a.cod_Cliente,a.persona,
    a.linea,a.des_cliente,a.fec_doc,a.ano_fiscal,a.per_proceso,a.cod_moneda,
    a.tip_cambio,a.tip_cambio,a.ind_forma_pago,a.num_asiento,a.mon_pago,
    a.interes,a.int_mora,a.estado,a.cod_agente,
    a.des_observacion,a.ind_externo,a.deposito,a.recibo_agente,
    a.doc_ref,a.nom_asiento,a.tip_doc_ref);
  end loop;
  commit;
end;
/


insert into cxc_enc_pago_nota(cod_Cia,sucursal,tip_doc,num_doc,cod_Cliente,persona,
linea,des_cliente,fec_doc,ano_fiscal,per_proceso,cod_moneda,tip_cambio,tip_cambio_base,
ind_forma_pago,num_asiento,mon_pago,interes,int_mora,estado,cod_agente,
des_observacion,ind_externo,deposito,recibo_agente,doc_ref,nom_asiento,tip_doc_ref)
select cod_Cia,sucursal,tip_doc,num_doc,cod_Cliente,persona,
linea,des_cliente,fec_doc,ano_fiscal,per_proceso,cod_moneda,tip_cambio,tip_cambio,
ind_forma_pago,num_asiento,mon_pago,interes,int_mora,estado,cod_agente,
des_observacion,ind_externo,deposito,recibo_agente,doc_ref,nom_asiento,tip_doc_ref
from qrf.cxc_enc_pago_Nota;
commit;


declare cursor xx is select * from qrf.cxc_det_pago_nota;
 n number(10):=0;
begin
  for a in xx loop
    n:=n+1;
    if mod(n,500)=0 then 
       commit;
    end if;
    insert into cxc_det_pago_nota 
    values(a.COD_CIA,a.SUCURSAL,a.TIP_DOC,a.NUM_DOC,a.SUCURSAL_REF,a.TIP_DOC_REF,a.NUM_DOC_REF,            
           a.NUM_PARTE,a.FEC_VENCE,a.MON_DESCUENTO,a.MON_PAGO,a.INTERES,a.INT_MORA);
  end loop;
  commit;
end;


insert into cxc_det_pago_nota select * from qrf.cxc_det_pago_nota;
insert into cxc_pago_Nota_con select * from qrf.cxc_pago_nota_con;
insert into  CXC_CLIENTE_PERSONA select * from qrf.cxc_cliente_persona;                                                                    

insert into cxc_cheques(cod_cia,sucursal,tip_doc,num_doc,num_cheque,referencia,
postfechado,descripcion,fecha_pago,monto_pago,estado)
select cod_cia,sucursal,tip_doc,num_doc,num_cheque,num_doc,
'N',null,fecha_pago,monto_pago,'C' from qrf.cxc_cheques
commit;                                                                  
