-- Agregue campo pedreserva en esta tabla
insert into venparametros 
(cia,afectacxc,afectainv,afectacon,afectaest,precioivi,lista_precio,actservidor,regsbloque,
aliasserv,cajacentral,entradaefectivo,salidaefectivo,mensaje,factorimpconsumo,
contentrega,pedreserva)
select cia,afectacxc,afectainv,afectacon,afectaest,precioivi,lista_precio,
actservidor,regsbloque,aliasserv,cajacentral,entradaefectivo,salidaefectivo,
mensaje,factorimpconsumo,'N','N' from qrf.venparametros;

insert into ventipodoc select * from qrf.ventipodoc;
insert into vencierre
select cia,caja,dia,cajero,descripcion,fecha,estado from qrf.vencierre;

--insert into vencierre select * from qrf.vencierre;

insert into vendetcierre(CIA,CAJA,DIA,CONCEPTO,MONTO)
select CIA,CAJA,DIA,CONCEPTO,MONTO from qrf.vendetcierre;

insert into VENCONCEPTOCOBRO select * from qrf.venconceptocobro;                                                                       
insert into VENCONCEPTOMISC select * from qrf.venconceptomisc;                                                                        
insert into VENCONCEPTOVAL select * from qrf.venconceptoval;                                                                         
insert into VENCONSECUTIVO select * from qrf.venconsecutivo;                                                                       
insert into VENBLOQUES select * from qrf.VENBLOQUES;

insert into VENCARGO select * from qrf.vencargo;                                                                               
insert into VENCLAVALE select * from qrf.venclavale;                                                                             
insert into VENDEPOSITO select * from qrf.vendeposito;                                                                            
insert into VENDESCUENTOS select * from qrf.vendescuentos;                                                                          
insert into VENDESCUENTOVOL select * from qrf.vendescuentovol;                                                                        
insert into VENDEVOLUCION select * from qrf.vendevolucion;                                                                          

-- Borre el constraint VENFACTURA_REFERENC_AK
declare 
cursor xx is select * from qrf.venfactura;
 n number(10):=0;
begin
  for a in xx loop
    n:=n+1;
    if mod(n,500)=0 then 
       commit;
    end if;
    insert into VENFACTURA values(a.cia,a.sucursal,a.documento,a.tipo,a.caja,a.cajero,a.dia,a.linea,a.pago,a.fecha,
    a.vencimiento,a.porcdescuento,a.porcimpuesto,a.agenteventa,a.cliente,a.lista_precio,a.persona,
    a.moneda,a.tipocambio,a.cambiobase,a.autorizacion,a.clave,a.asiento,a.nombre,a.descripcion,
    a.otroscargos,null,a.estado);
  end loop;
  commit;
end;

insert into venfactura
(CIA,SUCURSAL,DOCUMENTO,TIPO,CAJA,CAJERO,DIA,LINEA,PAGO,FECHA,VENCIMIENTO,
PORCDESCUENTO,PORCIMPUESTO,AGENTEVENTA,CLIENTE,LISTA_PRECIO,PERSONA,        
MONEDA,TIPOCAMBIO,CAMBIOBASE,AUTORIZACION,CLAVE,ASIENTO,        
NOMBRE,DESCRIPCION,OTROSCARGOS,REFERENCIA,ESTADO,CONSIGNATARIO)  
select CIA,SUCURSAL,DOCUMENTO,TIPO,CAJA,CAJERO,DIA,LINEA,PAGO,FECHA,VENCIMIENTO,
PORCDESCUENTO,PORCIMPUESTO,AGENTEVENTA,CLIENTE,LISTA_PRECIO,PERSONA,        
MONEDA,TIPOCAMBIO,CAMBIOBASE,AUTORIZACION,CLAVE,ASIENTO,        
NOMBRE,DESCRIPCION,OTROSCARGOS,null,ESTADO,'001'  
from qrf.venfactura;


insert into vendetfactura
(CIA,SUCURSAL,DOCUMENTO,SECUENCIA,LOTE,BODEGA,ARTICULO,AGENTEVENTA,            
PORCDESCUENTO,MEDIDA,CCOSTO,CANTIDAD,COSTO,PRECIO,IMPUESTO,               
IMPCONSUMO,TOTALLINEA,SUCURSALREF,PEDIDOREF,PDESC1,PDESC2,PDESC3,DESCRIPCION)            
select CIA,SUCURSAL,DOCUMENTO,SECUENCIA,LOTE,BODEGA,ARTICULO,AGENTEVENTA,            
PORCDESCUENTO,MEDIDA,CCOSTO,CANTIDAD,COSTO,PRECIO,IMPUESTO,               
IMPCONSUMO,TOTALLINEA,SUCURSALREF,PEDIDOREF,0,0,0,null           
from qrf.vendetfactura;

insert into VENLIQVALE select * from qrf.venliqvale;                                                                             
insert into VENLISTANEGRA select * from qrf.venlistanegra;                                                                          
insert into VENPREMIOS select * from qrf.venpremios;                                                                             
insert into VENSALSERVICIO select * from qrf.vensalservicio;                                                                         
insert into VENSERVICIO select * from qrf.venservicio;                                                                            
insert into VENTRANSACCION select * from qrf.ventransaccion;                                                                         
insert into VENVALE select * from qrf.venvale;                                                                                

insert into venconsignatario(cia,consignatario,descripcion,interno,estado)
values('001','001','GENERAL','S','A');

insert into VENPEDIDO 
(cia,sucursal,documento,clase,tipo,linea,fecha,plazo,vencimiento,porcdescuento,porcimpuesto,
agenteventa,cliente,lista_precio,persona,consignatario,moneda,tipocambio,cambiobase,
autorizacion,clave,nombre,descripcion,otroscargos,estado)
select cia,sucursal,documento,clase,tipo,linea,fecha,plazo,vencimiento,porcdescuento,porcimpuesto,
agenteventa,cliente,lista_precio,persona,'001',moneda,tipocambio,cambiobase,
autorizacion,clave,nombre,descripcion,otroscargos,estado
from qrf.venpedido;                                                                              

insert into VENPAGO
 (CIA,SUCURSAL,DOCUMENTO,CAJA,CAJERO,DIA,FECHA,          
 MONEDA,CLIENTE,CAMBIO,DESCRIPCION,ORIGEN,ESTADO,AGENTE)         
 select  CIA,SUCURSAL,DOCUMENTO,CAJA,CAJERO,DIA,FECHA,          
          MONEDA,CLIENTE,CAMBIO,DESCRIPCION,ORIGEN,ESTADO,null         
from qrf.venpago;        
commit;                                                                        
insert into VENPAGODOCUMENTOS select * from qrf.venpagodocumentos;                                                                      
commit;
insert into VENPAGOVALORES select * from qrf.venpagovalores;                                                                         
commit;
insert into VENDETDEPOSITO select * from qrf.vendetdeposito;                                                                         
insert into vendetdevolucion
select cia,sucursal,documento,secuencia,lote,bodega,articulo,
agenteventa,medida,ccosto,cantidad,costo,precio,
impuesto,impconsumo,totallinea
from qrf.vendetdevolucion;                                                                      

insert into vendetpedido
(cia,sucursal,documento,secuencia,lote,bodega,articulo,porcdescuento,
medida,cantidad,facturado,reservado,precio,impuesto,totallinea,PDESC1,PDESC2,PDESC3,descripcion)
select cia,sucursal,documento,secuencia,'001',bodega,articulo,porcdescuento,
medida,cantidad,0,0,precio,impuesto,totallinea,0,0,0,null
from qrf.vendetpedido;                                                                          


declare 
cursor xx is select * from qrf.vendetpedido;
 n number(10):=0;
begin
  for a in xx loop
    n:=n+1;
    if mod(n,500)=0 then 
       commit;
    end if;
    update vendetpedido
    set facturado=a.facturado 
    where cia=a.cia
    and sucursal=a.sucursal
    and documento=a.documento
    and secuencia=a.secuencia;
  end loop;
  commit;
end;
    



        