create table fams as
   select distinct fam, familia from yyy
   where fam is not null;

delete fams where fam='01' and familia like 'P%';


create table clas as
   select distinct fam||cla cla, clase
   from yyy
   where fam is not null;

create table mars as
   select distinct fam||cla||ti mar, tipo
   from yyy
   where fam is not null
     and cla is not null;


insert into inv_linea
  (COD_CIA,COD_LINEA,DES_LINEA,PRECIO_REGULADO,PORC_FINANCIERO,PORC_MAYORISTA,PORC_DETALLISTA)
  select '001', fam, familia, 'N', 0, null, null
  from fams;


insert into inv_clase
   (COD_CIA,COD_CLASE,DES_CLASE,PORC_UTILIDAD)
   select '001', cla, substr(clase,1,30), null
   from clas;

select count(distinct cla) from clas;

delete clas
where cla='011' and clase like 'M%';


insert into inv_marca
   (COD_CIA,COD_MARCA,DES_MARCA,PORC_UTILIDAD)
   select '001', mar, substr(tipo,1,30), null
   from mars;

select count(distinct mar) from mars;

delete mars
where mar='01104' and tipo like 'M%';

insert into inv_comb_lcm
   (COD_CIA, COD_LINEA, COD_CLASE, COD_MARCA,PORC_UTILIDAD)
   select '001', substr(cod_marca,1,2), substr(cod_marca,1,3), cod_marca, 0
   from inv_marca;

create table reps as
   select codigo, count(*) conteo
   from inventario
   group by codigo
   having count(*)>1;

declare
   cursor repetidos is
   select codigo, conteo
   from reps;
begin
   for r in repetidos
   loop
      delete from inventario
      where codigo=r.codigo
        and rownum<r.conteo;
   end loop;
end;
/

 

insert into inv_articulo
   (COD_CIA,COD_ARTICULO,TIPO_INV,COD_LINEA,COD_CLASE,COD_MARCA,DES_ARTICULO,IND_BLOQUEADO,
    MEDIDA,COD_MONEDA,MIN_VENTA,CLASE_ABC,FRACCION,FEC_ULTMOD,COD_DEPTO,DES_BLOQUEADO,
    COD_TABCOMSN,IMPTOCONS,IMPTOVTAS,PESO,COD_PARTIDA,PROVEEDOR_TITULAR,MAXDESCUENTO,EMBALAJE,
    DESC_CORTA)
   select '001',codigo,'1', substr(codigo,1,2), substr(codigo,1,3),substr(codigo,1,5), SUBSTR(DESCRIPCIO,1,50), 'N',
          'UND','CL',1,'A','N',trunc(sysdate),'001',null,
           null, null, 'ISV',0,null,null,100,null,null
   from inventario;

insert into inv_deptos
   (COD_CIA,COD_DEPTO,DESCRIPCION,BLQPRECIOS,BODEGA,CCOSTO,SUFIJOCONTABLE)
   values ('001','001','General','N','001','0',null);

insert into predetlista
   (COD_CIA,COD_LISTA_PRECIO,COD_MONEDA,COD_ARTICULO,COSTO,PRECIO_UNITARIO,PORC_UTILIDAD,DESCUENTO,DOCUMENTO)
   select '001', '001', 'CL', codigo, precio, round(precio*1.13), 0, 0, null
   from inventario;

select distinct substr(codigo,1,5)
from inventario
minus
select cod_marca from inv_marca;

delete inventario 
where codigo like '04500%';

delete inventario 
where codigo like '00103%';

delete inventario 
where codigo like '01103%';

update inv_linea set des_linea=replace(des_linea,chr(191),chr(233))
where des_linea like '%'||chr(191)||'%';

update inv_clase set des_clase=replace(des_clase,chr(191),chr(233))
where des_clase like '%'||chr(191)||'%';

update inv_clase set des_clase=replace(des_clase,chr(161),chr(237))
where des_clase like '%'||chr(161)||'%';

update inv_clase set des_clase=replace(des_clase,chr(162),chr(243))
where des_clase like '%'||chr(162)||'%';

update inv_marca set des_marca=replace(des_marca,chr(191),chr(233))
where des_marca like '%'||chr(191)||'%';

update inv_marca set des_marca=replace(des_marca,chr(161),chr(237))
where des_marca like '%'||chr(161)||'%';

update inv_marca set des_marca=replace(des_marca,chr(162),chr(243))
where des_marca like '%'||chr(162)||'%';

update inv_marca set des_marca=replace(des_marca,chr(164),chr(241))
where des_marca like '%'||chr(164)||'%';


update inv_articulo set des_articulo=replace(des_articulo,chr(191),chr(233))
where des_articulo like '%'||chr(191)||'%';

update inv_articulo set des_articulo=replace(des_articulo,chr(161),chr(237))
where des_articulo like '%'||chr(161)||'%';

update inv_articulo set des_articulo=replace(des_articulo,chr(162),chr(243))
where des_articulo like '%'||chr(162)||'%';

update inv_articulo set des_articulo=replace(des_articulo,chr(164),chr(241))
where des_articulo like '%'||chr(164)||'%';


update predetlista set precio_unitario=trunc((precio_unitario+2.49)/5)*5, porc_utilidad=0;


--update inv_articulo set des_articulo=substr(des_articulo,1,49)
--where length(des_articulo)=50;

--update inv_clase set des_clase=substr(des_clase,1,29)
--where length(des_clase)=30;

--update inv_marca set des_marca=substr(des_marca,1,29)
--where length(des_marca)=30;