alter table gen_cliente disable constraint GENSUBZONA_CLIENTE_FK;
alter table gen_cliente disable constraint GENDISTRITO_CLIENTE_FK;
alter table gen_proveedor disable constraint GENDISTRITO_PROV_FK;

delete gen_subzona;
delete gen_zona;
delete gen_distrito;
delete gen_canton;
delete gen_provincia;

begin
   util.FijarSesion('VISIONI', 'DESA', 'SERVIDOR', null, null, 'A');
   Util.CopiaMultiple('gen_zona, gen_subzona, gen_provincia , gen_canton, gen_distrito');
end;
/

select * from genrastreo;



alter table gen_cliente enable constraint GENSUBZONA_CLIENTE_FK;
alter table gen_cliente enable constraint GENDISTRITO_CLIENTE_FK;
alter table gen_proveedor enable constraint GENDISTRITO_PROV_FK;