#Nuevas Columnas en inv_articulo
alter table inv_articulo add (maxdescuento number(5,2));
alter table inv_articulo add (embalaje varchar2(25));
alter table inv_articulo add (desc_corta varchar2(20));
update inv_articulo i
  set desc_corta=(select desc_corta
                  from inv_artic_descor d
                  where d.cod_cia=i.cod_cia
                    and d.cod_articulo=i.cod_articulo)
where exists (select 1
              from inv_artic_descor d
              where d.cod_cia=i.cod_cia
               and d.cod_articulo=i.cod_articulo);
update inv_articulo set maxdescuento=decode(ind_descuento,'S',0,null);

#Nuevas columnas en inv_deptos
alter table inv_deptos add(bodega char(3));
alter table inv_deptos add(ccosto varchar2(7));
alter table inv_deptos add(sufijocontable varchar2(10));
update inv_deptos i
   set (bodega, ccosto, sufijocontable)=(select bodega, ccosto, 
sufijocontable
                                         from departamento c
                                         where c.cia=i.cod_cia
                                           and c.departamento=i.cod_depto);

alter table inv_detmovimiento drop column estado;
alter table inv_encabmovimiento drop column nom_realizador;
alter table inv_encabmovimiento drop constraint 
inv_encabmovimiento_estado_ck;
alter table inv_encabmovimiento drop constraint inv_encabmovto_estado_ck;
alter table inv_encabmovimiento add constraint inv_encabmovimiento_estado_ck
     check (estado in ('P','C','D','A'));

drop trigger actualiza_comprometido;

alter table inv_detalles modify (valor varchar2(20));


alter table venpedido add (fechareg date);
alter table venpedido add (atencion varchar2(60));
alter table venpedido modify (nombre varchar2(50));

alter table venfactura add(consignatario varchar2(10));
alter table venfactura modify (nombre varchar2(50));
alter table vendevolucion modify (nombre varchar2(50));

--- agrandar campos de descripcion en detalles de factura y pedido
alter table vendetpedido  modify descripcion varchar2(400);
alter table vendetfactura modify descripcion varchar2(400);

alter table venpago add(agente varchar2(3));


alter table venalisto modify (observaciones varchar2(200));


# Drops
alter table inv_detalles drop constraint invatrval_detalles_fk;
drop table inv_atrval;
alter table inv_articulo drop column ind_descuento;
drop table inv_artic_descor;
drop table departamento;



--- AGREGAR CLASE ADELANTO A MOV. DE DEDUCCIONES EN PLANILLAS
ALTER TABLE PLAMOVDED
DROP CONSTRAINT PLAMOVDED_CLASE_CK;


--- Candy 27-Oct-03
--- remover columna de ccosto en la tabla de empleados y de recursos humanos
alter table plaempleado drop column ccosto;
alter table rhaccionascenso drop (nuevoccosto);
alter table rhaccioningreso drop (ccosto);
-----------------------------------------------------------------------
--- Candy 27-Oct-03
--- creacion de tabla de distribucion de centros de costo por empleado
--- para modificar la contabilizacion de devengados y provisiones
---
--- Objetos afectados:
--- PLAUTIL.PLL = se cambio la rutina CCOSTOEMP del paquete PLACONS
---               que devuelve el centro de costo del Emp. para que
---               retorne 0 cuando el empleado tiene una distribucion
---               definida, si la distribucion no existe entonces
---               retorna el ccosto del departamento del empleado
--- FORMAS: devenemp, calplani, ajtprovi, pagos, contable,
---         aguinemp, liquiemp, contacom
-----------------------------------------------------------------------
create table PlaCcostoEmp (
   cia                  CHAR(3)                         not null,
   empleado             VARCHAR2(15)                    not null,
   ccosto               VARCHAR2(7)                     not null,
   porcentaje	        NUMBER(14,2)                    not null,
         constraint PlaCcostoEmp_porcentaje_CK check (porcentaje > 0),
   constraint PlaCcostoEmp_PK primary key (cia, empleado, ccosto)
)
/

alter table PlaCcostoEmp
   add constraint PlaEmpleado_CcostoEmp_FK foreign key (cia, empleado)
      references PlaEmpleado (cia, empleado)
/

alter table cxc_movimientotmp
add cod_agente varchar2(3);

alter table fac_hdet_precios
add usuario varchar2(30);

alter table venclitmp
add dia char(2);


alter table cxc_parametro drop column montovencemay;
alter table cxcperfil add dias_graciavence number(3);
alter table cxcperfil add minsaldovence number(14,2);

alter table movimientoventa add(costo number(14,2));
alter table movimientoventahist add(costo number(14,2));
alter table conceptoventa   add(cuentacosto varchar2(25));
alter table cajparametro add(traslado char(1));

alter table com_documento add(clasecompra char(1));
alter table com_enc_factura drop column num_traslado;
-- Borrar columna del historico
alter table com_enc_nacionalizacion drop column num_traslado;
-- Borrar columna del historico
--Los campos num_* cambiaron de number(8) a number(10)
alter table com_det_factura drop column aplica_isv_costo;

alter table gen_clie_agente add(cod_depto varchar2(3));
alter table gen_clie_agente drop constraint gen_clie_agente_pk;
alter table gen_clie_agente drop
   constraint GEN_CLIE_AGENTE_UQ_AK;
alter table gen_clie_agente add
   constraint GEN_CLIE_AGENTE_UQ_AK unique (cod_cia, sucursal, cod_cliente, 
tipo_agente, cod_depto);
alter table gen_clie_agente add
   constraint GEN_CLIE_AGENTE_PK primary key (cod_cia, sucursal, cod_agente, 
tipo_agente, cod_cliente);
start ventas\views;

start calcgen;

--------------------------------------------
--- agregar parametros mesespromExtras
--- en la tabla de puestos para el calculo
--- de horas extras
--- Candy Rivera 17/11/2003
---------------------------------------------

ALTER TABLE PLAPUESTO ADD MesesPromExtras number(2) default null;
ALTER TABLE PLAPUESTO ADD CONSTRAINT PlaPuesto_MesesPromExtras_CK Check 
(MesesPromExtras > 0);

alter table asientocaja drop constraint ASIENTOCAJA_PK;
alter table asientocaja drop column cuenta_puente;
alter table asientocaja add constraint ASIENTOCAJA_PK
   primary key(CIA, CUENTA, CCOSTO, DIA, MONEDA, TIPOCAMBIO, 
ESDEBITOCREDITO);

alter table movimientoventa add(tipocambio number(14,4));
alter table movimientoventa add(cambiobase number(14,4));
update movimientoventa set tipocambio=1, cambiobase=1;
commit;
alter table movimientoventa modify(tipocambio number(14,4) not null);
alter table movimientoventa modify(cambiobase number(14,4) not null);


alter table gen_agente add(usuario varchar2(30));


--Cambios de nombre en precios;
start precios\precios.sql
insert into preparametro
   select COD_CIA,METODO_CALCULO,COMPLEMENTO_REDONDEO, MULTIPLO_REDONDEO,
          CON_PRECIO,REQAUTORIZA,TOMAMARGEN,'S',null
   from fac_parametro;
insert into prelista
   select * from fac_mas_precios;
insert into predescusuario
   select * from fac_autorizados;
insert into predetlista
   select * from fac_det_precios;
insert into predetlista_hist
   select * from fac_hdet_precios;
insert into preespeciales
   select * from fac_precios_esp;
commit;
update preparametro set lista_principal='001' where cod_cia='001';
commit;

start precios\prechist

Drop table fac_parametro;
Drop table fac_mas_precios;
Drop table fac_autorizados;
Drop table fac_det_precios;
Drop table fac_hdet_precios;
Drop table fac_precios_esp;

--Sinonimos
create synonym fac_parametro for preparametro;
create synonym fac_mas_precios  for prelista;
create synonym fac_autorizados for predescusuario;
create synonym fac_det_precios for predetlista;
create synonym fac_hdet_precios for predetlista_hist;
create synonym fac_precios_esp for preespeciales;

drop table con_his_det_asiento_pre;
drop table con_his_var_asiento_pre;
drop table con_his_enc_asiento_pre;
drop table con_inflacion;
drop table con_dif_cambiario;

alter table inv_encabmovimiento drop constraint 
inv_encabmovimiento_estado_ck;
alter table inv_encabmovimiento drop constraint inv_encabmovto_estado_ck;

start calcgen;

alter table con_ccvalidos modify(descripcion varchar2(79));


alter table CXC_DET_PAGO_NOTA add constraint CXC_DET_PAGO_NOTA_PK
   primary key (cod_cia, sucursal, tip_doc, num_doc, sucursal_ref, 
tip_doc_ref, num_doc_ref);

alter table com_enc_fac_orden drop
   constraint COM_ENC_FAC_ORDEN_PK;
alter table com_enc_fac_orden add
   constraint COM_ENC_FAC_ORDEN_PK primary key (cod_cia, sucursal, 
num_factura, cod_proveedor, num_orden);

alter table inv_encabtraslado drop constraint INV_ENCABTRASL_ESTADO_CK;
alter table inv_encabtraslado add constraint INV_ENCABTRASL_ESTADO_CK
   check (estado in ('P','E','R','A'));

create table venenvio;

rem alter inv_artic_bodega (cos*>=0, cos*>0 : exi*>0);

create table genhistimp;

start calcgen;
-- Calcgen agrega una rutina mas;

alter table pladetincap add(tiposalario CHAR(1));
update pladetincap set tiposalario='E';
alter table pladetincap modify(tiposalario char(1) not null);
alter table pladetincap add
    constraint PLADETINCAP_TIPOSALARI_CK check (tiposalario in 
('E','L','M'));


-----------------------------------------------------------
--- INCLUSION DEL PARAMETRO 'TIPO PROMEDIO DE VACACIONES'
--- EN PLAPARAMETRO PARA LAS RUTINAS DE PROMEDIOS
---
--- CANDY RIVERA --- 21 DE ENERO 2004
-----------------------------------------------------------
ALTER TABLE PLAPARAMETRO ADD (PROMVAC CHAR(1));
ALTER TABLE PLAPARAMETRO ADD CONSTRAINT PLAPARAM_PROMVAC_CK CHECK (PROMVAC 
IN ('N', 'E'));

ALTER TABLE VENDEVOLUCION ADD (OTROSCARGOS NUMBER(14,2));
ALTER TABLE VENDETALISTO  MODIFY (DESCRIPCION VARCHAR2(400));


ALTER TABLE BANLIN DROP
   CONSTRAINT BANLIN_TIPO_CK;
ALTER TABLE BANLIN ADD
   CONSTRAINT BANLIN_TIPO_CK CHECK (tipo in 
('BAN','CNT','FEC','FLN','BEN','LET','MON','DBC','CRC',
                               
'LUG','DET','DCN','COD','HEC','REV','CHE','CON','ROT','CCO'));

start ventas\rutcaja

alter table com_parmoneda
  add cta_inv_transito VARCHAR2(25);

# crear vista de cc en conta!

#Febrero 2004
alter table ventransaccion add (cajero varchar2(10));
# Mejor asi...
# drop table ventransaccion;
# create table ventransaccion;

alter table plaempleado add(pensionado char(1));
update plaempleado set pensionado='N';
alter table plaempleado modify(pensionado char(1) not null);
alter table plamovpro add(claseemp char(1));
update plamovpro set claseemp='A';
alter table plamovpro modify (claseemp char(1) not null);
-- Pen, No pen, Ambos

alter table VenParametros
   drop constraint fac_mas_precios_VenPar_FK;
alter table venparametros drop column lista_precio;
alter table venparametros drop column precioivi;
alter table venparametros add (esquema varchar2(30));
alter table venparametros add (tipoest char(1));
update venparametros set esquema='LLOBET', tipoest='N';
commit;
alter table venparametros modify (esquema varchar2(30) not null);
alter table venparametros modify (tipoest char(1) not null);

alter table com_enc_recibo
add num_asiento varchar2(15);

--alter table inv_encabtraslado
--drop constraint "de not null para cod_movtoent"
ALTER TABLE INV_ENCABTRASLADO
DROP CONSTRAINT SYS_C0019854;

ALTER TABLE RhAccionAscenso
DROP COLUMN CCOSTOANTERIOR;

start ventas/views

drop table estdet; #Ojo con la reconstruccion
start estadisticas/estadist

alter table con_ccvalidos rename to con_ccdescr;
create table con_ccinval (cod_cia char(3),
                          ccosto varchar2(7),
                          exhijos char(1),
                          constraint con_ccinval_pk
                          primary key(cod_cia, ccosto));

create table prelistares
(COD_CIA          char(3),
COD_LISTA_PRECIO char(3),
COD_MONEDA       varchar2(3),
COD_LINEA        VARCHAR2(5),
COD_CLASE        VARCHAR2(5),
COD_MARCA        VARCHAR2(5),
PROVEEDOR        VARCHAR2(25),
PRECIOBASE       NUMBER(14,4),
PRECIOIVI        NUMBER(14,4),
COD_ARTICULO     VARCHAR2(25),
LOCALIZA         VARCHAR2(10),
DES_ARTICULO     VARCHAR2(50),
CONSTRAINT PRELISTARES_PK
PRIMARY KEY (COD_CIA, COD_LISTA_PRECIO, COD_MONEDA, COD_LINEA, COD_CLASE, 
COD_MARCA,
              PRECIOBASE, PRECIOIVI));

-- Corrige un viejo error en el modelo de datos
alter table liqcseccion add (suma char(1));
update liqcseccion set suma=sumaresta;
alter table liqcseccion modify (suma char(1) not null);
alter table liqcseccion drop column sumaresta;

#Marzo 2004
ALTER TABLE LICENCIA ADD (VALIDEZ VARCHAR2(10));
UPDATE LICENCIA SET VALIDEZ='0';
ALTER TABLE LICENCIA MODIFY (VALIDEZ VARCHAR2(10) NOT NULL);

alter table com_enc_factura
   add fecha_vence date;
update com_enc_factura set fecha_vence=fecha;
alter table com_enc_factura
    modify fecha_vence date not null;

ALTER TABLE CXP_ASIENTO ADD (USUARIO VARCHAR2(30));
ALTER TABLE CXP_ASIENTO ADD (tip_cambiobase number(14,4));
-- OJO: PORQUE SE USA en cxc genas

start calcgen

#abril 2004
#cxp_enc_gen_pago remover not null cuenta, cod_banco
alter table cxp_enc_gen_pago drop constraint ...;

#prd_parametro tipo_invme, distmobind 'M'onto, 'C'antidad

#mayo 2004
# Convierte a factor_can a formula_can varchar2(60) 
alter table inv_medida drop column factor_can;
alter table inv_medida add (formula_can varchar2(60));
update inv_medida set formula_can='1';
alter table inv_medida modify (formula_can varchar2(60) not null);


start cnmedida

alter table cxp_parametro
add tipo_mov_pel char(2);

alter table cxp_credito
add cuenta varchar2(20);

alter table pladetdeven modify(tipohoralabor varchar2(6));
alter table pladetdeven add(clase char(1));
update pladetdeven set clase='M';
alter table pladetdeven modify(clase char(1) not null);
alter table pladetdeven modify(cantidad number(7,2));
alter table pladetdeven modify(monto number(16,4));

alter table venpago add (tipocambio number(14,4));
alter table venpago add (cambiobase number(14,4));
update venpago p set cambiobase=(select max(cambiobase) from venpagovalores v
                                 where v.cia=p.cia and v.sucursal=p.sucursal 
                                   and v.documento=p.documento);
update venpago p set cambiobase=(select max(cambiobase) from venpagodocumentos v
                                 where v.cia=p.cia and v.sucursal=p.sucursal 
                                   and v.documento=p.documento)
where p.cambiobase is null;
update venpago p set tipocambio=decode(p.moneda,'CL',cambiobase,1);
alter table venpago modify (tipocambio number(14,4) not null);
alter table venpago modify (cambiobase number(14,4) not null);

alter table venpagodocumentos drop column cambiobase;
alter table venpagovalores    drop column cambiobase;

alter table venconceptoval drop constraint VENCONCEPTOVAL_CLASE_CK;

alter table venconceptoval add
         constraint VENCONCEPTOVAL_CLASE_CK check (clase in ('C','D','E','O','T','V'));

alter table venconceptocobro add (conceptoint VARCHAR2(15));

alter table ventipodoc add (conceptocargos VARCHAR2(15));

create table venfondodet
(cia      char(3)       not null,
 cajero   varchar2(10)  not null,
 indice   varchar2(8)   not null,
 formula  varchar2(60)  not null,
 total    number(14,4)  not null,
 constraint venfondodet_pk primary key(cia, cajero, indice)
);
 

--NO create table venfondodep
--(cia,cajero,concepto,documento,fecha,descripcion,
--total,constraint venfondodep_pk primary key(cia, cajero));

create view bantipbres as
select COD_CIA, COD_BANCO, MOV_BANCO, MIN(TIPO_MOV) TIPO_MOV      
from bantipban
group by COD_CIA, COD_BANCO, MOV_BANCO;
alter table banestdet add (tipo_mov char(2));
update banestdet d 
   set tipo_mov=(select tipo_mov from bantipbres r
                 where r.cod_cia=d.cod_cia and r.cod_banco='BNCR' 
                   and r.mov_banco=d.mov_banco)
where cuenta in (select cuenta from banmae
                 where cod_banco='BNCR');
update banestdet d 
   set tipo_mov=(select tipo_mov from bantipbres r
                 where r.cod_cia=d.cod_cia and r.cod_banco='BSJ' 
                   and r.mov_banco=d.mov_banco)
where cuenta in (select cuenta from banmae
                 where cod_banco='BSJ');
update banestdet d 
   set tipo_mov=(select tipo_mov from bantipbres r
                 where r.cod_cia=d.cod_cia and r.cod_banco='BANEX' 
                   and r.mov_banco=d.mov_banco)
where cuenta in (select cuenta from banmae
                 where cod_banco='BANEX');
alter table banestdet modify (tipo_mov char(2) not null);

alter table cxc_enc_movimiento
add fec_reg date;
update cxc_enc_movimiento
   set fec_reg=fec_doc;
commit;
alter table cxc_enc_movimiento
  modify fec_reg date not null;


alter table cxc_enc_pago_nota
add fec_reg date;
update cxc_enc_pago_nota
   set fec_reg=fec_doc;
commit;
alter table cxc_enc_pago_nota
   modify fec_reg date not null;

alter table cxc_movimientotmp
add fec_reg date;


#####################################################################
-- CAMBIO 1

-- Se crea una tabla PLASALARIO para eliminar
-- el salario del maestro de empleados y tener
-- un verdadero historico de salarios desde esta tabla.
-- "fecha" correspondera ahora a la fecha en que rige el nuevo salario
-- "fechareg" corresponde a la fecha de registro del salario
-- "nuevoSalario" para registrar el salario vigente a partir de "fecha"
-- PLAAUMENTO sera un sinonimo de PLASALARIO

create table PLASALARIO
(  cia                  CHAR(3)                         not null,
   empleado             VARCHAR2(15)                    not null,
   fecha                DATE                            not null,
   porcentaje           NUMBER(5,2)                     not null
         constraint PLASALARIO_PORCENTAJE_CK check (porcentaje >= 0),
   monto                NUMBER(14,2)                    not null
         constraint PLASALARIO_MONTO_CK check (monto >= 0),
   salarioNuevo         NUMBER(14,2)                    not null
         constraint PLASALARIO_SALARIONUE_CK check (salarionuevo >= 0),
   accion               CHAR(3),
   numero               NUMBER(8),
   fechareg             DATE                            not null,
   usuario              VARCHAR2(30)                    not null,
   constraint PLASALARIO_PK primary key (cia, empleado, fecha)
);

ALTER TABLE PLASALARIO
   ADD CONSTRAINT PlaEmpleado_Salario_FK foreign key (cia, empleado)
   references PlaEmpleado (cia, empleado);

--- recupera los datos de plaaumento a plasalario
insert into plasalario
select cia, empleado, fecha, porcentaje, monto, 
       decode(monto, 0, SalarioAnt * (1+porcentaje/100), SalarioAnt + monto),
       accion, numero, fecha, user
from   plaaumento;
commit;

drop table plaaumento;
create synonym plaaumento for plasalario;
--- OJO: recupera salarios antes de borrar esta columna
--- del maestro de empleados
insert into plasalario
select cia, empleado, fechaIngreso, 0, salarioActual,
       salarioActual, null, null, fechaIngreso, user
from   plaempleado e
where  not exists (select 1 from plasalario s
                   where s.cia = e.cia
                   and   s.empleado = e.empleado);
commit;
alter table plaempleado drop (salarioActual);


--- se modifica la tabla que calcula el libro de salarios
alter table PLARESUMENSALTMP
add (SalarioActual number(14,2) default 0 not null);

--- LISTA DE OBJETOS MODIFICADOS A RAIZ DE ESTE CAMBIO
--- PLANI.PLL = DEVENGADOS.salarioActual (nueva)
--- PLANI.PLL = LIQUIDACION.Ingreso

--- SE AGREGO UNA RUTINA EN EL PAQUETE "CALCPLA" DE LA
--- BASE DE DATOS LLAMADA "SALARIOACTUAL"

--- FIN CAMBIO 1

########################################################################
--- CAMBIO 2

--- Se elimino el campo "tarifa" de la tabla PLALABOR
--- para crear una tabla detalle que permita tener un 
--- historico de tarifas

create table PLATARIFALABOR
(  cia                  CHAR(3)                         not null,
   labor                VARCHAR2(6)                     not null,
   fecha                DATE                            not null,
   tarifa               NUMBER(14,2)                    not null,
   fechareg             DATE                            not null,
   usuario              VARCHAR2(30)                    not null,
         constraint PLATARIFALABOR_TARIFA_CK check (tarifa > 0),
   constraint PLATARIFA_PK primary key (cia, labor, fecha)
);

ALTER TABLE PLATARIFALABOR 
   add constraint PlaLabor_TarifaLab_FK foreign key (cia, labor)
      references PlaLabor (cia, labor);

-- OJO: recuperar tarifas antes de borrar la columna
insert into plaTarifaLabor 
select cia, labor, sysdate, tarifa, sysdate, user
from   plalabor;

commit;

alter table plalabor
 drop (tarifa);

--- agrega la tarifa a labores trabajadas
--- para que sea consistente con las tablas de marcas y horas
--- que guardan el salario x hora a la fecha del registro

alter table plalaborestrab
   add (tarifa number(14,2) default 0  not null );

--- se pueden registrar fracciones de labores
alter table plalaborestrab
drop constraint PLALABORESTRAB_CANTIDAD_CK;

alter table plalaborestrab
add constraint PLALABORESTRAB_CANTIDAD_CK check (cantidad > 0);
--- SE AGREGO UNA RUTINA EN EL PAQUETE "CALCPLA" DE LA
--- BASE DE DATOS LLAMADA "TARIFAACTUAL"

--- FIN CAMBIO 2
########################################################################

#junio 2004

alter table com_parametro add (ordenfalsob char(1) default 'A' not null);
alter table com_parametro add constraint comparametro_ordenfs_ck
     check (ordenfalsob in ('F','S','A','N'));

#Falta tabla de marcos OJO!!!

alter table vendescuentos add(tipored        char(1)     default 'N' not null);
alter table vendescuentos add(multiplored    number(5,2) default 5 not null);
alter table vendescuentos add(complementored number(5,2) default 1 not null);

start descuentos;


##################################################
alter table rhaccionascenso drop (salarioanterior);
alter table rhaccionascenso add (nuevosalario number(14,2) );
alter table rhaccionascenso add (FECHARIGE DATE);
UPDATE rhaccionascenso
SET FECHARIGE = (SELECT FECHA 
                   FROM RHACCIONEMP 
                   WHERE CIA = RHACCIONAscenso.CIA
                   AND   ACCION= RHACCIONAscenso.ACCION
                   AND   NUMERO= RHACCIONAscenso.NUMERO);

ALTER TABLE RHACCIONAscenso MODIFY (FECHARIGE NOT NULL);

##################################################
ALTER TABLE RHACCIONAUMENTO DROP(SALARIOANTERIOR);
ALTER TABLE RHACCIONAUMENTO ADD(PORCENTAJE NUMBER (5,2) DEFAULT 0 NOT NULL);
ALTER TABLE RHACCIONAUMENTO ADD(MONTO NUMBER (14,2) DEFAULT 0 NOT NULL);

ALTER TABLE RHACCIONAUMENTO ADD (FECHARIGE DATE);

UPDATE RHACCIONAUMENTO
SET FECHARIGE = (SELECT FECHA 
                   FROM RHACCIONEMP 
                   WHERE CIA = RHACCIONAUMENTO.CIA
                   AND   ACCION= RHACCIONAUMENTO.ACCION
                   AND   NUMERO= RHACCIONAUMENTO.NUMERO);

ALTER TABLE RHACCIONAUMENTO MODIFY (FECHARIGE NOT NULL);

create table PlaPerVac(
   cia                  CHAR(3)                         not null,
   planilla             CHAR(2)                         not null,
   empleado             VARCHAR2(15)                    not null,
   periodo              NUMBER(4)                       not null,
   indPlanilla          CHAR(1)                         not null
         constraint PLAPERVAC_INDPLANILL_CK check (indPlanilla in ('A','C','L','E','O')),
   numpago              number(6)                       not null,
   fechainicial         DATE                            not null,
   dias                 number(5,2)                     not null,
   estado               char(1)                         not null,
   constraint PLAPERVAC_PK primary key (cia, planilla, periodo, indPlanilla,
                                        numpago, empleado, fechainicial)
);

create table PlaPerInc(
   cia                  CHAR(3)                         not null,
   planilla             CHAR(2)                         not null,
   empleado             VARCHAR2(15)                    not null,
   periodo              NUMBER(4)                       not null,
   indPlanilla          CHAR(1)                         not null
         constraint PLAPERINC_INDPLANILL_CK check (indPlanilla in ('A','C','L','E','O')),
   numpago              number(6)                       not null,
   fechainicial         DATE                            not null,
   dias                 number(5,2)                     not null,
   estado               char(1)                         not null,
   constraint PLAPERINC_PK primary key (cia, planilla, periodo, indPlanilla,
                                        numpago, empleado, fechainicial)
);

#AGOSTO
create table xx as select * from con_cta_contable;
drop table con_cta_contable cascade constraints;
# create table con_cuenta...
start conta\conta

insert into con_cuenta
  select cod_cia, cod_cta, nom_cta, NIVEL,CLASE_CTA,
         TIP_CTA, TIP_SALDO,COD_MONEDA_BASE, IND_MOVIMIENTO,
         DECODE(IND_CTA_BLQ,'S','BLOQUEADA',null), COD_CTA_SUP, 
         COD_CTA_AJUS_TIP_CAM
  from xx;
commit;

-- Cambiar tabla cxp_asiento a temporal
-- Cambiar tabla cxc_credito_tmp a temporal

alter table cxc_parametro
   drop column MULTACHKDEV;

alter table cxcperfil
   add MULTACHKDEV NUMBER(14,2);


alter table com_parametro
  add recibomer char(1) 
     constraint comparametro_recibomer_ck check (recibomer in ('N','P','O')); 
update com_parametro
   set recibomer='N';
commit;
alter table com_parametro
   modify recibomer char(1) not null;


alter table plaliquidacion add (monahovac number(14,2) default 0 not null);
alter table plaliquidacion add (monapovac number(14,2) default 0 not null);
alter table plaliquidacion add (monahoaso number(14,2) default 0 not null);

alter table rhaccionliquida add (monahovac number(14,2) default 0 not null);
alter table rhaccionliquida add (monapovac number(14,2) default 0 not null);
alter table rhaccionliquida add (monahoaso number(14,2) default 0 not null);

-- Se hicieron cambios en medidas es necesario actualizar venfac.plx y invmed.plx
start cnmedida

-- Generar un movimiento de venta automatica en la produccion
alter table prdparametro
   add codmovtoven char(2);

#setiembre
alter table gen_cliente add (por_exoventa number(5,2) default 0 not null);
update gen_cliente set por_exoventa=100
where ind_pagaventa='N';
commit;
alter table gen_cliente drop column ind_pagaventa;

alter table con_det_asiento_pre modify (concepto varchar2(256));


############################################################
### 14 DE OCTUBRE, 2004 -- CANDY RIVERA
### PARA PODER APLICAR AUMENTOS NEGATIVOS (A PETICION 
### DE LLOBET) SE MODIFICO LA TABLA PLASALARIOS DE PLANILLAS
#############################################################

alter table plasalario drop constraint PLASALARIO_MONTO_CK;
alter table rhaccionaumento drop constraint RHACCIONAUMENTO_MONTO_CK;

alter table inv_deptos drop column IND_IMPTOVNT;

# prddetorden falta cmod sobra mod

alter table seg_mnumod add(menufile varchar2(80));
alter table seg_mnuitm add(refs     varchar2(32), jerid number(6));

alter table seg_opcion drop constraint seg_opcion_pk;
alter table seg_opcion drop column parentid;
alter table seg_opcion drop column cod_opcion;
alter table seg_opcion add constraint seg_opcion_pk
    primary key(Modid, ItemId, Nom_Forma, Nom_Tabla);

alter table seg_grant drop constraint seg_grant_pk;
alter table seg_grant add constraint seg_grant_pk
    primary key(MODID, ITEMID, COD_GRUPO, COD_CIA);
alter table seg_grant modify (cod_cia char(3));

alter table seg_grupo drop column ind_conpre;
alter table seg_grupo drop column ind_elache;
alter table seg_grupo drop column ind_elasie;
alter table seg_grupo drop column ind_reasie;

start segurid\segurid

alter table pladeducemp  drop constraint PLADEDUCIONES_DEDEMP_FK;
# Se debe permitir quitar una deduccion a un empleado

#No crear esta tabla (descontinuada)
create table PlaPerPre  (
   xx cia                  CHAR(3)                         not null,
   xx planilla             CHAR(2)                         not null,
   xx empleado             VARCHAR2(15)                    not null,
   xx periodo              NUMBER(4)                       not null,
   xx indplanilla          CHAR(1)                         not null
      constraint PLAPERPRE_INDPLANILL_CK check (indplanilla in ('A','C','L','E','O')),
   xx tipomov              CHAR(3)                         not null,
   xx numpago              NUMBER(6)                       not null
      constraint PLAPERPRE_NUMPAGO_CK check (numpago >= 0),
   xx monabono             NUMBER(14,2)                    not null
      constraint PLAPERPRE_MONABONO_CK check (monabono >= 0),
   xx moninteres           NUMBER(14,2)                    not null
      constraint PLAPERPRE_MONINTERES_CK check (moninteres >= 0),
   xx fechaint             date                            not null,
   constraint PLAPERPRE_PK primary key (cia, planilla, empleado, periodo, indplanilla, tipomov, numpago)
)
initrans 1
storage
(
  initial 10K
  next 10K
);

-- Permitir el parametro de salidas de produccion este en nulo
alter table prdparametro
   drop constraint SYS_C00xxx;

update prdparametro
   set codmovtosal=null;
commit;

######################################################
## Se agrega el parametro "Utiliza promedios mixtos" 
## para utilizar en el calculo de aguinaldos.
##
## Candy Rivera -- 08 de Noviembre, 2004
##
######################################################

ALTER TABLE PLAPARAMETRO ADD (PromMixtosAguin char(1));
UPDATE PLAPARAMETRO 
   SET PromMixtosAguin = 'S';  --Solo llobet
ALTER TABLE PLAPARAMETRO ADD CONSTRAINT PLAPARAMETRO_PROMMIXTOS_CK
   CHECK (PromMixtosAguin IN ('S', 'N'));
ALTER TABLE PLAPARAMETRO MODIFY (PromMixtosAguin NOT NULL);

#Diciembre 2004
#Se revisa calcven, venutil, venfac y las vistas de ventas
start paqven
start ventas\views
#Se crea tabla de usuarios autorizados por agente
create table gen_agenteaut
(cod_cia   char(3) not null,
 sucursal  char(3) not null,
 cod_agente varchar2(3) not null,
 usuario    varchar2(30) not null,
 constraint gen_agenteaut_pk primary key(cod_cia, sucursal, cod_agente, usuario)
);
 
alter table gen_agenteaut
  add constraint genagente_autorizados_fk
  foreign key (cod_cia, sucursal, cod_agente)
  references gen_agente(cod_cia, sucursal,cod_agente);

#Se crea snapshot para fac_detpromocion, gen_agenteaut, venfactura*, venpedido*, vendevolucion*

#Se crea parametro de seguridad
create table segparametro
(  cia          char(3) not null,
   accmenufal   char(1) not null,
   constraint segparametro_pk primary key(cia)
);
 
insert into segparametro values('001','S');


   drop table aud_venpedido;
   create table aud_venpedido
   (audfecha     date         not null,
    audtrans     char(1)      not null
       constraint aud_venpedido_trans_ck check (audtrans in ('I','U','D')),
    audusuario   varchar2(30) not null,
    cia          char(3)      not null, -- Llave de venpedido
    sucursal     char(3)      not null,
    documento    number(10)   not null,
    clase        char(1)      not null, -- Otros datos a auditar
    tipo         char(3)      not null,
    linea        char(3),
    fecha        date         not null,
    vencimiento  date,
    agenteventa  varchar2(3)  not null,
    cliente      varchar2(25) not null,
    autorizacion number(10),
    nombre       varchar2(50) not null,
    estado       char(1)      not null,
    constraint   aud_venpedido_pk primary key(audfecha, audtrans, cia, sucursal, documento)
   );

CREATE OR REPLACE TRIGGER AUD_VENPEDIDO
AFTER INSERT OR DELETE OR UPDATE OF cia, sucursal, documento,
                                    clase, linea, fecha, vencimiento, agenteventa,
                                    cliente, autorizacion, nombre, estado
      ON VenPedido
FOR EACH ROW
Declare
   procedure CreaPista(Vtrans in char) is
   begin
      if vtrans='D' then
         insert into aud_venpedido 
             (audfecha, audtrans, audusuario, cia, sucursal, documento, clase, tipo,linea,
              fecha, vencimiento, agenteventa, cliente, autorizacion, nombre, estado)
             values (sysdate, 'D', User, :old.cia, :old.sucursal, :old.documento, :old.clase,
                     :old.tipo, :old.linea, :old.fecha, :old.vencimiento, :old.agenteventa,
                     :old.cliente, :old.autorizacion, :old.nombre, :old.estado);
      else
         insert into aud_venpedido 
             (audfecha, audtrans, audusuario, cia, sucursal, documento, clase, tipo,linea,
              fecha, vencimiento, agenteventa, cliente, autorizacion, nombre, estado)
             values (sysdate, vtrans, User, :new.cia, :new.sucursal, :new.documento, :new.clase,
                     :new.tipo, :new.linea, :new.fecha, :new.vencimiento, :new.agenteventa,
                     :new.cliente, :new.autorizacion, :new.nombre, :new.estado);
      end if;
   end;
BEGIN
   If Inserting Then
      CreaPista('I');
   elsif Updating then
      CreaPista('U');
   elsif Deleting then
      CreaPista('D');
   end if;
END;
/

# Se debe copiar los datos a tabla temporal y borrar para modificar la columna
alter table plamarca modify (salariohora number(14,4));
alter table plahorastrab modify (salariohora number(14,4));

# Se elimina constraint de monto en plaestadisticas
alter table plaestadisticas drop constraint plaestadisticas_monto_ck;

# Se agrega columna cod_clase en fre_desc_compras (Una vieja omision)
alter table fredesccompras add (cod_clase varchar2(3) default '001' not null);

-- Secuencia para generar las claves de los descuentos especiales en PREESPECIALES
Create sequence desctoespecial;

#FEBRERO 2005
Drop table FAC_PREMIOS;
Drop table FAC_DET_COMISION_LN;
Drop table FAC_DET_COMISION_MN;


drop table prelistamon;
create table prelistamon
(
 COD_CIA            CHAR(3)      NOT NULL,
 COD_LISTA_PRECIO   CHAR(3)      NOT NULL,
 COD_MONEDA         VARCHAR2(3)  NOT NULL,
 MONEDA_ORIG        VARCHAR2(3)  NOT NULL,
 AJUSTECALCULO      CHAR(1) NOT NULL
     CHECK (AJUSTECALCULO IN ('D','O','F','N')),
 COMPAJU            NUMBER(10,6) NOT NULL,
 MULTAJU            NUMBER(10,6) NOT NULL,
 CONSTRAINT PreListaMon_Pk
    Primary Key (COD_CIA, COD_LISTA_PRECIO, COD_MONEDA)
);

# Verificar detpedido, detfactura y detalisto
alter table venfactmp modify (descripcion varchar2(400));

create or replace view pladiasvac as
   select a.cia,a.planilla,a.empleado,a.nombre,
          b.fechacorte,b.diasderecho,b.diasdisfrutados,b.diasacumulados,
          b.diasderecho+b.diasacumulados-b.diasdisfrutados disponibles
   from plaempleado a , placontrolvac b
   where a.cia = b.cia
     and a.empleado = b.empleado
     and   a.estado = 'A';


alter table inv_parametro
drop constraint INV_PARAMETRO_IND_CTLLOTE_CK;

alter table inv_parametro
add constraint INV_PARAMETRO_IND_CTLLOTE_CK check (ind_ctllote in ('S','N','M'));

*==============================================================*/
/* Table: CXP_PARTEF                                            */
/*==============================================================*/
create table CXP_PARTEF  
(
   cod_cia              CHAR(3)         not null,
   cod_banco            VARCHAR2(12)    not null,
   id                   NUMBER(6)       not null,
   formato              VARCHAR2(10)    not null,
   id_cuenta            VARCHAR2(20)    not null,
   cuenta               VARCHAR2(20)    not null,
   constraint CXP_PARTEF_PK primary key (cod_cia, cod_banco)
);

# Ejecutar genprefs
# Cargar preferencias de Visioni
# Explicar al Cliente y ajustar

#Marzo 2005
alter table venempleado add(usuario varchar2(30) default user not null);

alter table venalisto add(impreso char(1) default 'S' not null);
alter table venalisto add constraint venalisto_impreso_ck check (impreso in ('S','N'));


alter table vencargo add(zona varchar2(2) not null);
alter table vencargo drop constraint vencargo_pk;
alter table vencargo add constraint vencargo_pk
    primary key (cia, zona, monto);

alter table gen_agente add (bodega char(3));

drop table venclasecli;
create table venclasecli
(cia       char(3) not null,
 clase     varchar2(3) not null,
 catalogos number(2) not null 
    constraint venclasecli_catalogos_ck check (catalogos>=0),
 constraint venclasecli_pk primary key(cia, clase)
);

drop table vencatalogo;
create table vencatalogo
(cia       char(3) not null,
 catalogo  varchar2(25) not null,
 fecha     date not null,
 descripcion varchar2(50) not null,
 constraint vencatalogo_pk primary key(cia, catalogo)
);

# Cambios en tablas SOD*
start segurid/views

alter table VENPAGOVALORES drop constraint
   VENPAGOVALORES_UQ;
alter table VENPAGOVALORES add constraint
   VENPAGOVALORES_UQ  UNIQUE(CIA, SUCURSAL, CONCEPTO, REFERENCIA);


alter table com_det_solicitud
  add cod_proveedor varchar2(25);


# Para indicar como se calcula el periodo si por Fecha de R-egistro o D-ocumento.

alter table cxp_parametro
   add calperiodo char(1);
update cxp_parametro
   set calperiodo='D';
alter table cxp_parametro
   modify calperiodo char(1) not null;
alter table cxp_parametro
   add constraint CXP_PARAMETRO_CALPERIODO_CK check (calperiodo in ('R','D'));


# Para indicar como se calcula el periodo si por Fecha de R-egistro o D-ocumento.

alter table cxc_parametro
   add calperiodo char(1);
update cxc_parametro
   set calperiodo='D';
alter table cxc_parametro
   modify calperiodo char(1) not null;
alter table cxc_parametro
   add constraint CXC_PARAMETRO_CALPERIODO_CK check (calperiodo in ('R','D'));


create table xx as select * from plaabopre;
drop table plaabopre;
create table PlaAboPre  (
   cia                  CHAR(3)                         not null,
   planilla             CHAR(2)                         not null,
   empleado             VARCHAR2(15)                    not null,
   periodo              NUMBER(4)                       not null,
   indplanilla          CHAR(1)                         not null
      constraint PLAABOPRE_INDPLANILL_CK check (indplanilla in ('A','C','L','E','O','M')),
   tipomov              CHAR(3)                         not null,
   numpago              NUMBER(6)                       not null
      constraint PLAABOPRE_NUMPAGO_CK check (numpago >= 0),
   fecha                DATE                            not null,
   monto                NUMBER(14,2)                    not null
      constraint PLAABOPRE_MONTO_CK check (monto >= 0),
   moninteres           NUMBER(14,2)                    not null
      constraint PLAABOPRE_MONINTERES_CK check (moninteres >= 0),
   fechaint             date,
   referencia           VARCHAR2(10)                    not null,
   descripcion          VARCHAR2(60),
   estado               CHAR(1)                         not null
      constraint PLAABOPRE_ESTADO_CK check (estado in ('A','N')),
   constraint PLAABOPRE_PK primary key (cia, planilla, empleado, periodo, indplanilla, tipomov, numpago,
                                        referencia)
)
initrans 1
storage
(
    initial 10K
    next 10K
);

insert into plaabopre
select x.cia, m.planilla, x.empleado, calcpla.periododefecha(x.cia, m.planilla, x.fecha), 'M',
       x.tipomov,0,x.fecha,monto,0, x.fecha, x.referencia, null, x.estado
from xx x, plaempleado m
where x.cia=m.cia
  and x.empleado=m.empleado;
commit;

insert into plaabopre
select x.cia, x.planilla, x.empleado, x.periodo, x.incplanilla,
       x.tipomov,x.numpago, x.fechaint, x.monabono, x.moninteres, x.fechaint, '0', null, 'A'
from plaperpre x;
commit;
drop table plaperpre;

start paqpla
start paqgen
start segurid/views

# view cxc_obligacion_v falta doc_ref
# view cxc_liberachk    falta deposito

alter table INV_ACUM_PERIODO
   drop constraint INV_ACUM_PERIODO_CLASE_MOVT_CK;
alter table INV_ACUM_PERIODO
   add constraint INV_ACUM_PERIODO_CLASE_MOVT_CK
   check (clase_movto in ('EI','EC','ED','EA','ET','EO','SV','ST','SD','SA','SR'));

alter table INV_CONCEPMOVTO
   drop constraint INV_CONCEPMOVTO_CLASE_MOVTO_CK;
alter table INV_CONCEPMOVTO
   add constraint INV_CONCEPMOVTO_CLASE_MOVTO_CK
   check (clase_movto in ('EI','EC','ED','EA','ET','EO','SV','SD','SA','SR','ST'));

#Licencias
alter table licencia 
   add constraint licencia_pk primary key(serie);
alter table licencia add (estaciones NUMBER(4));

alter table Inv_tomafis add(tipo char(1) default '1' not null check (tipo in ('1','2','3','D')));
alter table Inv_tomafis add(usuario varchar2(30) default USER not null);

alter table inv_tomafis modify(tipo_inv varchar2(3));
update inv_tomafis set tipo_inv=trim(tipo_inv);

alter table Inv_dettomafis add(conteo1 number(14,4) check (conteo1>=0));
update inv_dettomafis
  set conteo1=can_fisico;

alter table inv_dettomafis drop column can_fisico;
alter table Inv_dettomafis add(conteo2 number(14,4) check (conteo2>=0));
alter table Inv_dettomafis add(conteo3 number(14,4) check (conteo3>=0));

alter table inv_encabmovimiento modify(cod_usuario varchar2(30));
alter table inv_hist_enc_movto modify(cod_usuario varchar2(30));

# 13-may
# UAV

# Consultar que paso que no existia en los cambios
alter table inv_parametro add loteunico varchar2(3);

# Recrear paquetes
Start Paquetes
# Toma dinamica inv_dintomafis (invtomadin.txt)

alter table balancecaja modify (sobrantecaja number(14,2));

# 27-may
# UAV

alter table cxc_credito
    drop constraint CXC_CREDITO_ESTADO_CK;
alter table cxc_credito
    add  constraint CXC_CREDITO_ESTADO_CK check (estado in ('A','B','C'));

# 13-JUN
# UAV
drop index PPLDETDEVOL_PK;

alter table gen_cliente drop constraint SYS_C0016831;
# cod_ciacliente not null: buscar el nombre verdadero

drop table cmscomcobroesc;
create table cmscomcobroesc
( CIA        CHAR(3)       NOT NULL,
  MONTO      NUMBER(14,2)  NOT NULL,
  PORCENTAJE NUMBER(5,3)   NOT NULL,
  constraint cmscomcobroesc_pk primary key (CIA, MONTO)
);

alter table cmsacuafil add (vence date  default sysdate not null);

create table pplmapeo
(
   CIA      CHAR(3)      NOT NULL,
   ARTICULO VARCHAR2(25) NOT NULL,
   ARTPLA   VARCHAR2(25) NOT NULL,
   constraint pplmapeo_pk
      primary key (cia, articulo)
);

alter table asodividendos add(capital number(14,2) default 0 not null);

create table venmotdev
( cia         char(3) not null,
  motivo      varchar2(3) not null,
  descripcion varchar2(30) not null,
  constraint venmotdev_pk primary key (cia, motivo)
);

alter table vendevolucion add(motivo varchar2(3));

alter table vendescuentovol add(listaprecio char(3));
alter table vendescuentovol drop constraint vendescuentovol_pk;
alter table vendescuentovol add constraint vendescuentovol_uq
  unique (cia, articulo, listaprecio, cantidad);

#Setiembre 2005
alter table gen_proveedor modify (DES_PROVEEDOR varchar2(50));
alter table movimientoventa modify (departamento varchar2(3));
alter table caja modify (departamento varchar2(3));
alter table movimientoventahist modify (departamento varchar2(3));

alter table inv_lote_artic_bodega
   drop constraint INV_LOTARTBOD_CAN_ENTRADA_CK;
alter table inv_lote_artic_bodega
   drop constraint INV_LOTARTBOD_CAN_SALIDA_CK;
alter table inv_lote_artic_bodega
   drop constraint SYS_C004352;
alter table inv_lote_artic_bodega
   drop constraint SYS_C004353;
alter table inv_lote_artic_bodega
   add constraint INV_LOTARTBOD_BALANCE_CK CHECK(CAN_EXISTE>=CAN_APARTADO);

---- ESTE CAMBIO YA ESTA EN LOS MODELOS PERO 
---- SE DEBE VERIFICAR QUE ESTO ESTE ASI EN LOS CLIENTES

alter table com_montoprov
add acreedor varchar2(25);

update com_montoprov
set acreedor=cod_proveedor;
where acreedor is null;

alter table com_montoprov
modify acreedor varchar2(25) not null;

alter table com_montoprov
drop constraint com_montoprov_pk;

alter table com_montoprov add
constraint COM_MONTOPROV_PK 
primary key (cod_cia, sucursal, num_factura, cod_proveedor, acreedor, referencia);

alter table com_hist_encfac
drop column fecha_max_nacionaliza;

alter table com_hist_encfac
drop column num_traslado;

alter table com_hist_encfac
add (reccompleto char(1));

alter table com_hist_encfac
add (fecha_vence date);

alter table com_hist_detfac
drop column aplica_isv_costo;

alter table com_hist_encnac
add (reccompleto char(1));

alter table com_enc_nacionalizacion
drop column num_traslado;

alter table com_hist_encnac
drop column num_traslado;

alter table com_hist_encnac
modify (cod_bodega null);

alter table com_hist_detnac
modify (cod_bodega null);

start descuentos;

### OCTUBRE 2005
ALTER TABLE COM_DET_FACTURA
DROP CONSTRAINT inv_loc_COMDFAC_Fk;
ALTER TABLE COM_DET_FACTURA
DROP COLUMN cod_bodega;
ALTER TABLE COM_DET_FACTURA
DROP COLUMN LOCALIZA;

alter table com_hist_detfac
drop column cod_bodega;
alter table com_hist_detfac
drop column localiza;

ALTER TABLE COM_DET_NACIONALIZACION
DROP CONSTRAINT inv_loc_COMDNAC_Fk;
ALTER TABLE COM_DET_NACIONALIZACION
DROP COLUMN cod_bodega;
ALTER TABLE COM_DET_NACIONALIZACION
DROP COLUMN LOCALIZA;

alter table com_hist_detnac
drop column cod_bodega;
alter table com_hist_detnac
drop column localiza;

alter table com_montoprov
  add fecha date;

alter table com_cargos_factura
  add fecha date;


alter table com_cargos_nacionalizacion
add fecha date;

declare cursor xx is select * from com_enc_nacionalizacion;
begin
  for a in xx loop
     update com_cargos_nacionalizacion 
     set  fecha=a.fecha
     where cod_cia=a.cod_cia
     and   sucursal=a.sucursal
     and   num_nacionalizacion=a.num_nacionalizacion;

  end loop;
  commit;
end;
/


declare cursor xx is select * from com_enc_factura;
begin
  for a in xx loop
     update com_cargos_factura 
     set  fecha=a.fecha
     where cod_cia=a.cod_cia
     and   sucursal=a.sucursal
     and   num_factura=a.num_factura
     and   cod_proveedor=a.cod_proveedor;

     update com_montoprov
     set  fecha=a.fecha
     where cod_cia=a.cod_cia
     and   sucursal=a.sucursal
     and   num_factura=a.num_factura
     and   cod_proveedor=a.cod_proveedor;

  end loop;
  commit;
end;
/

alter table com_montoprov
modify fecha date not null;
DELETE COM_MONTOPROV P
  WHERE NOT EXISTS (SELECT 1 FROM COM_ENC_FACTURA F
                    WHERE F.COD_CIA=P.COD_CIA
                      AND F.SUCURSAL=P.SUCURSAL
                      AND F.COD_PROVEEDOR=P.COD_PROVEEDOR
                      AND F.NUM_FACTURA=P.NUM_FACTURA);

alter table com_cargos_factura
modify fecha date not null;
DELETE COM_cargos_factura P
  WHERE NOT EXISTS (SELECT 1 FROM COM_ENC_FACTURA F
                    WHERE F.COD_CIA=P.COD_CIA
                      AND F.SUCURSAL=P.SUCURSAL
                      AND F.COD_PROVEEDOR=P.COD_PROVEEDOR
                      AND F.NUM_FACTURA=P.NUM_FACTURA);


alter table com_cargos_nacionalizacion
modify fecha date not null;
DELETE COM_cargos_nacionalizacion P
  WHERE NOT EXISTS (SELECT 1 FROM COM_ENC_nacionalizacion F
                    WHERE F.COD_CIA=P.COD_CIA
                      AND F.SUCURSAL=P.SUCURSAL
                      AND F.NUM_nacionalizacion=P.NUM_nacionalizacion);


################################
Cambios segun prueba con limpia
07/Oct/05
################################

alter table cxcperfil 
   modify (dias_graciavence not null);

alter table cxcperfil 
   modify (minsaldovence not null);

update cxcperfil
   set multachkdev = 0
where multachkdev is null;
alter table cxcperfil 
   modify (multachkdev not null);

alter table cajparametro
   modify (traslado not null);

alter table gen_clase_cliente 
   drop column lista_descuento;

# Verificar con MV si SE PUEDE BORRAR:
# DROP COLUMN cxc_parametro.ind_asiento_automatico

alter table com_cargos
   add afectacxp char(1);

update com_cargos
   set afectacxp='S';

alter table com_cargos
   modify afectacxp char(1) not null;

alter table com_cargos
   add  constraint COM_CARGOS_AFECTACXP_CK check (afectacxp in ('S','N'));

alter table gen_compania 
    drop column ind_consol_conta;
alter table gen_compania
    add ciaconsolidada char(3);
/*==============================================================*/
/* Table: CON_MAPEOCONS                                         */
/*==============================================================*/
create table CON_MAPEOCONS  (
   COD_CIA              CHAR(3)                         not null,
   COD_CTA              VARCHAR2(25)                    not null,
   CTAAUX               VARCHAR2(25)                    not null,
   ACCION               CHAR(1)                         not null
   constraint CON_MAPEOCONS_ACCION_CK check (ACCION IN ('S','L')),
   constraint CON_MAPEOCONS_PK primary key (COD_CIA, COD_CTA, CTAAUX)
)
initrans 1
storage
(
   initial 10K
   next 10K
);

/*==============================================================*/
/* Index: CONCUENTA_MAPEOCONS_AUX_FK                            */
/*==============================================================*/
create index CONCUENTA_MAPEOCONS_AUX_FK on CON_MAPEOCONS (
   COD_CIA ASC,
   CTAAUX ASC
);

alter table CON_MAPEOCONS
   add constraint CONCUENTA_MAPEOCONS_FK foreign key (COD_CIA, COD_CTA)
      references CON_CUENTA (COD_CIA, COD_CTA);

alter table CON_MAPEOCONS
   add constraint CONCUENTA_MAPEOCONS_AUX_FK foreign key (COD_CIA, CTAAUX)
      references CON_CUENTA (COD_CIA, COD_CTA);


#Cambios de Precios (todavia no es oficial).
alter table gen_camb_precio add (cod_moneda varchar2(3) default 'CL' not null);
update gen_camb_precio cp set cod_moneda=(select cod_moneda from gen_enc_precio ep
                                          where ep.cod_cia=cp.cod_cia
                                            and ep.documento=cp.documento);
alter table gen_enc_precio drop column cod_moneda;
alter table gen_enc_precio drop constraint GEN_ENC_PRECIO_ORIGEN_CK;	
alter table gen_enc_precio add constraint GEN_ENC_PRECIO_ORIGEN_CK check (origen in ('D','F','N','R','S','I'));
# Recrear vista CAMB_PRECIO_PEN

#Noviembre
#Cambios a la planilla

alter table pladevenemp
add (fechareg date);
update pladevenemp 
set fechareg=fechamov;
alter table pladevenemp
modify (fechareg not null);

alter table pladeducemp
add (fechareg date);
update pladeducemp
set fechareg=fechamov;
alter table pladeducemp
modify (fechareg not null);

alter table plaprovemp
add (fechamov date);
alter table plaprovemp
add (fechareg date);

--actualiza fechas de provisiones,
--devengados y deducciones
declare 
   cursor xx is 
   select cia, planilla, periodo, fechainicial, fechafinal
   from   plaperiodo;

begin
  for a in xx 
  loop
     update plaprovemp
     set  fechamov=a.fechafinal,
          fechareg=a.fechafinal
     where cia      =a.cia
     and   planilla =a.planilla
     and   periodo  =a.periodo;

     update pladevenemp
     set  fechamov=a.fechafinal
     where cia      =a.cia
     and   planilla =a.planilla
     and   periodo  =a.periodo
     and   fechamov not between a.fechainicial and a.fechafinal;

     update pladeducemp
     set  fechamov=a.fechafinal
     where cia      =a.cia
     and   planilla =a.planilla
     and   periodo  =a.periodo
     and   fechamov not between a.fechainicial and a.fechafinal;
  end loop;
  commit;
end;
/

alter table plaprovemp
modify (fechamov not null);
alter table plaprovemp
modify (fechareg not null);

-- Cambia tabla de aguinaldos para 
-- eliminar planilla y periodos
create table xaguin as select * from plaaguinaldo;
drop table plaaguinaldo;
create table PlaAguinaldo  (
   cia                  CHAR(3)                         not null,
   empleado             VARCHAR2(15)                    not null,
   tipoCalculo          CHAR(1)                         not null
      constraint PLAAGUINALDO_TIPOCALCUL_CK check (tipoCalculo in ('A','C')),
   fechaIni             DATE                            not null,
   fechaFin             DATE                            not null,
   antiguedad           NUMBER(5,2)                     not null,
   salarioAcum6         NUMBER(14,2)                    not null
      constraint PLAAGUINALDO_SALARIO6_CK check (salarioAcum6 >= 0),
   salarioAcum12        NUMBER(14,2)                    not null
      constraint PLAAGUINALDO_SALARIO12_CK check (salarioAcum12 >= 0),
   monAguinaldo         NUMBER(14,2)                    not null
      constraint PLAAGUINALDO_MONAGUINAL_CK check (monAguinaldo >= 0),
   tipoMov              CHAR(3)                         not null,
   fechaPago            DATE                            not null,
   constraint PLAAGUINALDO_PK primary key (cia, empleado, tipocalculo, fechaIni)
)
initrans 1
storage
(
    initial 10K
    next 10K
);

alter table PlaAguinaldo
   add constraint PlaEmpleado_Aguinaldo_FK foreign key (cia, empleado)
      references PlaEmpleado (cia, empleado);

alter table PlaAguinaldo
   add constraint PlaMovDev_Aguinaldo_FK foreign key (cia, tipoMov)
      references PlaMovDev (cia, tipoMov);

--Llena nueva tabla de aguinaldos
declare 
   cursor xx is 
   select cia, planilla, empleado, tipocalculo, periodoini, periodofin,
          antiguedad, salarioacum12, salarioacum6, monaguinaldo, 
          tipomov, fecha
   from   xaguin;

  fecini date;
  fecfin date;
begin
  for a in xx 
  loop
     select fechainicial 
     into   fecini
     from   plaperiodo
     where  cia      = a.cia
     and    planilla = a.planilla
     and    periodo  = a.periodoini;

     select fechafinal 
     into   fecfin
     from   plaperiodo
     where  cia      = a.cia
     and    planilla = a.planilla
     and    periodo  = a.periodofin;    

     insert into plaaguinaldo
     values(a.cia, a.empleado, a.tipocalculo, fecini, fecfin, 
            a.antiguedad, a.salarioacum6, a.salarioacum12, a.monaguinaldo,
            a.tipomov, a.fecha);
      
  end loop;
  commit;
end;
/

drop table xaguin;

# Interfaz contable
insert into coninterfaz
   select distinct COD_CIA, NOM_ASIENTO, NOM_ASIENTO
   from con_var_asiento_pre;
insert into condetinterfaz
   select COD_CIA, NOM_ASIENTO, VARIABLE, VARIABLE, 'T',NULL
   from con_var_asiento_pre;
insert into conplantilla
   select COD_CIA, NOM_ASIENTO, NOM_ASIENTO, DES_ASIENTO, COD_MONEDA
   from con_enc_asiento_pre e
   where exists (select 1 from coninterfaz z
                 where z.cod_cia=e.cod_cia
                   and z.interfaz=e.nom_asiento);
insert into conplantilla
   select COD_CIA, NOM_ASIENTO, NULL, DES_ASIENTO, COD_MONEDA
   from con_enc_asiento_pre e
   where not exists (select 1 from coninterfaz z
                 where z.cod_cia=e.cod_cia
                   and z.interfaz=e.nom_asiento);
insert into condetplantilla
   select COD_CIA, NOM_ASIENTO, NUM_LINEA, COD_CTA, CCOSTO, TIP_SALDO, CONCEPTO
   from con_det_asiento_pre;
commit;

DROP TABLE CON_DET_ASIENTO_PRE;
DROP TABLE CON_VAR_ASIENTO_PRE;
DROP TABLE CON_ENC_ASIENTO_PRE;

ALTER TABLE CON_PARAMETRO ADD CCCOMPSRES NUMBER(2);
ALTER TABLE CON_PARAMETRO ADD CCCOMPSBAL NUMBER(2);

update con_parametro set cccompsres=comps_cc, cccompsbal=0;
ALTER TABLE CON_PARAMETRO MODIFY CCCOMPSRES NOT NULL;
ALTER TABLE CON_PARAMETRO MODIFY CCCOMPSBAL NOT NULL;

ALTER TABLE CON_NOMCOMP DROP COLUMN TIP_SALDOS;
ALTER TABLE CON_PARAMETRO DROP COLUMN IND_ACT_INMED;
ALTER TABLE CON_DET_ASIENTO DROP COLUMN TIP_DOC;
ALTER TABLE CON_PARAMETRO DROP COLUMN COMPS_CC;

ALTER TABLE CON_ENC_ASIENTO MODIFY TIP_CAMBIO_BASE NOT NULL;
ALTER TABLE CON_ENC_ASIENTO MODIFY TIP_DOC NOT NULL;
ALTER TABLE CON_DET_ASIENTO MODIFY DES_LINEA VARCHAR2(60);

ALTER TABLE CON_ENC_ASIENTO DROP
   CONSTRAINT CON_ENC_ASIENTO_ESTADO_CK;
ALTER TABLE CON_ENC_ASIENTO ADD
   CONSTRAINT CON_ENC_ASIENTO_ESTADO_CK CHECK (EST_ACTUAL IN ('P','A','N'));

create table preparmoneda
(COD_CIA         CHAR(3)     NOT NULL,
 MONEDA          VARCHAR2(3) NOT NULL,
 COMPREDONDEO    NUMBER(5,2) NOT NULL,
 MULTREDONDEO    NUMBER(5,2) NOT NULL,
   CONSTRAINT preparmoneda_pk primary key(cod_cia, moneda)
);

insert into preparmoneda
   select p.cod_cia, g.cod_moneda, p.COMPLEMENTO_REDONDEO,MULTIPLO_REDONDEO
   from preparametro p, gen_moneda g;
alter table preparametro
   drop column COMPLEMENTO_REDONDEO;
alter table preparametro
   drop column MULTIPLO_REDONDEO;
alter table preparametro
   add (multimon char(1) default 'N' not null
        constraint preparametro_multimon_ck check (multimon in ('N','C','S')));

-- Cambio a planillas para planillas de tipo "detdeven"
-- 16 de Noviembre 2005

alter table plaplanilla 
drop constraint PLAPLANILLA_CALCULO_CK;

alter table plaplanilla
add constraint PLAPLANILLA_CALCULO_CK check (calculo in ('H','M','L', 'D'));

alter table rhaccionincap
add (diasacumulados number(6,2));

update rhaccionincap set diasacumulados=0;

alter table rhaccionincap
modify (diasacumulados not null);

alter table plaparametro add (movbandeb char(2));

start cnvmedida.plb
start cnvmoneda.plb
start clausulas

create table ComLogCxp(
	cia		char(3) 	not null,	
	sucursal	char(3)		not null,	
	cod_movto	char(3) 	not null,	
	proveedor	varchar2(25) 	not null,
	num_factura	varchar2(10)	not null,
	acreedor	varchar2(25) 	not null,	
	referencia	varchar2(10)	not null,
	tip_doc_cxp	char(3)		not null,	
	num_doc_cxp	number(10),	
	fecha_reg	date		not null,
	fecha		date		not null,
	moneda		varchar2(3)	not null,
	tip_cambio	number(14,4)	not null,
	tip_cambio_base number(14,4)	not null,
	monto		number(14,2)	not null,
	ind_externo	char(4)		not null,
	ind_cxp		char(1)		not null
             constraint Com_LogCxp_ind_cxp_CK check (ind_cxp in ('M','N')),
	observaciones	varchar2(240),
	usuario		varchar2(30)	not null,
	estado		char(1)		not null	
	constraint Com_LogCxp_ESTADO_CK check (estado in ('P','A')),
	constraint Com_LogCxp_PK primary key (cia,sucursal,cod_movto, proveedor, num_factura, acreedor,referencia));


alter table com_det_recibo add (num_linea number(3) default 0 not null);
alter table com_prorecibo drop column sumaprecios;
alter table com_prorecibo add (matriz char(1) default 'A' not null);
alter table com_prorecibo add (indmatriz number(2) default 0 not null);

create table ComMatPro(
	cia		char(3)		not null,
	matriz		char(1)		not null,
	fila		number(2)	not null,
	columna		number(2)	not null,
	porcentaje	number(5,2)	not null,
	constraint Com_MatPro_Pk primary key (cia,matriz,fila,columna));

#Platinum
create or replace view PPLVDETFACTURAS as
select d.cia,d.proveedor,d.num_factura,f.fecha,
        d.articulo,d.cantcompra,d.cantreclamo,d.cantvendido,
        d.valorcompra,f.estado
 from pplfacturas f,ppldetfacturas d
 where f.cia=d.cia
 and   f.proveedor=d.proveedor
 and   f.num_factura=d.num_factura;

alter table pplparametros add (tip_doc_inv char(2) default '07' not null);

create global temporary table ppltemprecla
(  cod_articulo         VARCHAR2(25)                    not null,
   cantidad             NUMBER(14,4)                    not null,
   subtotal             NUMBER(14,2)                    not null,
   constraint ppltemprecla_pk primary key (cod_articulo)
);

#Corregir trigger actualiza_comprometido
start ventas\vencomp;

#verificar que sufijo en ConceptoVenta sea varchar2(20).

alter table venpedido drop constraint venpedido_clase_ck;
alter table venpedido add (constraint VENPEDIDO_CLASE_CK check (clase in ('C','U','J','N','O','P','S','V','B')));

#########################
# 24 Noviembre
# Mejoras a RH - CCR
#########################
create table RhEvalPuesto
(cia		char(3) 	not null,
 puesto		char(3)		not null,
 evaluacion	char(2)		not null,
 peso		number(5,2)	not null,
 constraint RHEVALPUESTO_PK primary key (cia, puesto, evaluacion)
)
/

alter table RhEvalPuesto
   add constraint PlaPuesto_RhEvalPuesto_FK foreign key (cia, puesto)
      references PlaPuesto (cia, puesto);

alter table RhEvalPuesto
   add constraint RhEvaluacion_EvalPuesto_FK foreign key (evaluacion)
      references RhEvaluacion (evaluacion);

alter table RhDetEvaluacion
  add (puntos number(5));

alter table rhdetevalprof
 add (puntos  number(5));


-- Idiomas
create table RhIdioma
(idioma 	char(2) 	not null,
 descripcion 	varchar2(50) 	not null,
constraint RhIdioma_PK primary key (idioma)
)
/

create table RhIdiomaPuesto
(cia		char(3) 	not null,
 puesto		char(3)		not null,
 idioma 	char(2)		not null,
 escribe 	char(1)         not null
                                constraint RhIdiomaPuesto_escribe_ck 
                                check (escribe in ('S','N')),
 lee     	char(1)         not null
                                constraint RhIdiomaPuesto_lee_ck 
                                check (lee in ('S','N')),
 habla   	char(1)         not null
                                constraint RhIdiomaPuesto_habla_ck 
                                check (habla in ('S','N')),
constraint RhIdiomaPuesto_PK primary key (cia, puesto, idioma)
);


alter table RhIdiomaPuesto
   add constraint PlaPuesto_IdiomaPuesto_Fk foreign key (cia, puesto)
   references PlaPuesto (cia, puesto);
alter table RhIdiomaPuesto
   add constraint RhIdioma_IdiomaPuesto_Fk foreign key (idioma)
   references RhIdioma (idioma);


alter table RhReqPuesto
   add (tipo char(1));
alter table RhReqPuesto
   add constraint RhReqpuesto_tipo_ck 
   check (tipo in ('O', 'P'));


create table RhIdiomaBolsa
(cedula 	varchar2(20)	not null,
 idioma 	char(2)		not null,
 escribe 	char(1)        not null
                               constraint RHIdiomaBolsa_escribe_Ck
                               check (escribe in ('S','N')),
 lee     	char(1)        not null
                               constraint RHIdiomaBolsa_lee_Ck
                               check (lee in ('S','N')),
 habla   	char(1)        not null
                               constraint RHIdiomaBolsa_habla_Ck
                               check (habla in ('S','N')),
 constraint RhIdiomaBolsa_PK primary key (cedula, idioma)
);

alter table RhIdiomaBolsa
   add constraint RhBolsaempleo_IdiomaBolsa_Fk foreign key (cedula)
   references RhBolsaEmpleo (cedula);
alter table RhIdiomaBolsa
   add constraint RhIdioma_IdiomaBolsa_Fk foreign key (idioma)
   references RhIdioma (idioma);

create table PlaIdiomaEmp
(cia		char(3)		not null,
 empleado 	varchar2(15)	not null,
 idioma 	char(2)		not null,
 escribe 	char(1)        not null
                               constraint PlaIdiomaEmp_escribe_Ck
                               check (escribe in ('S','N')),
 lee     	char(1)        not null
                               constraint PlaIdiomaEmp_lee_Ck
                               check (lee in ('S','N')),
 habla   	char(1)        not null
                               constraint PlaIdiomaEmp_habla_Ck
                               check (habla in ('S','N')),
 constraint PlaIdiomaEmp_PK primary key (cia, empleado, idioma)
);

alter table PlaIdiomaEmp
   add constraint PlaEmpleado_IdiomaEmp_Fk foreign key (cia, empleado)
   references PlaEmpleado (cia, empleado);
alter table PlaIdiomaEmp
   add constraint RhIdioma_IdiomaEmp_Fk foreign key (idioma)
   references RhIdioma (idioma);


-- solicitudes
create table xsolicpuesto as select * from rhpuestosolic;
create table xsolic as select * from rhsolicitud;
drop table rhpuestosolic;
drop table rhsolicitud;


create table RhSolicitud  
(  cia			char(3)		not null,
   solicitud            NUMBER(8)       not null,
   cedula               VARCHAR2(20)    not null,
   fecha                DATE            not null,
   fechaAprobada        DATE,
   puesto               char(3)		not null,
   salario              NUMBER(14,2)    not null
                                        constraint RHSOLICITUD_SALARIO_CK 
                                        check (salario >= 0),
   constraint RHSOLICITUD_PK primary key (cia, solicitud)
)
;

alter table RhSolicitud
  add constraint PlaPuesto_Solicitud_FK foreign key (cia, puesto)
  references PlaPuesto (cia, puesto);

--RESCATA LO QUE HAYA
DECLARE 
  CURSOR PUESTOS IS
   SELECT SOLICITUD, PUESTO
   FROM   XSOLICPUESTO;

  CED    VARCHAR2(20);
  FEC    DATE;
  FECA   DATE;
  SAL    NUMBER(14,2);
  NUMSOL NUMBER(8);

BEGIN
  FOR P IN PUESTOS
  LOOP
     BEGIN
        SELECT CEDULA, FECHA, FECHAAPROBADA, SALARIO
        INTO   CED, FEC, FECA, SAL
        FROM   XSOLIC
        WHERE  SOLICITUD = P.SOLICITUD;

        INSERT INTO RHSOLICITUD VALUES
           ('001', P.SOLICITUD, CED, FEC, FECA, P.PUESTO, SAL);
     EXCEPTION
        WHEN DUP_VAL_ON_INDEX THEN
           select rhsolic.nextval
           into   NUMSOL
           from   dual;

           INSERT INTO RHSOLICITUD VALUES
           ('001', NUMSOL, CED, FEC, FECA, P.PUESTO, SAL);
     END;
  END LOOP;
END;
/

Create table RhSolicRequisito
( cia		char(3)		not null,
  solicitud	number(8)	not null,
  ordinal	number(2)	not null,
  puesto        char(3)         not null,
  cumple	char(1)		not null
                                constraint RhSolicRequisito_cumple_Ck
                                check (cumple in ('S', 'N')),
  observaciones varchar2(120),
  constraint RhSolicRequisito_Pk primary key (cia, solicitud, ordinal)
);

alter table RhSolicRequisito
  add constraint RhSolicitud_SolicRequisito_FK foreign key (cia, solicitud)
  references RhSolicitud (cia, solicitud);

alter table RHSolicRequisito
  add constraint RhReqPuesto_SolicRequisito_FK foreign key (cia, puesto, ordinal)
  references RhReqPuesto (cia, puesto, ordinal);
  

--grados acad
create table rhgradtemp as select * from RhGradoAcademico;

ALTER TABLE RHHISTACADEMICA DROP CONSTRAINT RhGradoAcademico_HistAca_FK;
ALTER TABLE RHHISTACADEMICA DROP CONSTRAINT RHHISTACADEMICA_GRADO_CK;
ALTER TABLE RHHISTACADEMICA MODIFY (GRADO VARCHAR2(3));


drop table RhGradoAcademico;

create table RhGradoAcademico  (
   grado                VARCHAR2(3)                     not null,
   descripcion          VARCHAR2(40)                    not null,
   constraint RHGRADOACADEMICO_PK primary key (grado)
)
initrans 1
storage
(
    initial 10K
    next 10K
);

insert into RhGradoAcademico(grado,descripcion) select * from rhgradtemp;

alter table RhHistAcademica
   add constraint RhGradoAcademico_HistAca_FK foreign key (grado)
      references RhGradoAcademico (grado);

drop table rhgradtemp;

##################################
## Planillas 29 Noviembre
## Permitir horarios que no paguen 
## domingos y feriados dobles
###################################
alter table plahorario add
(dfdobles char(1) default 'S' not null);

alter table plahorario
add constraint plahorario_dfdobles_ck
check (dfdobles in ('S', 'N'));


-- Ventas
alter table vendescuentovol modify (PORCDESCUENTO NUMBER(7,4));

create or replace view cxc_visdetagecxc as
   select dt.COD_CIA, dt.COD_AGENTE, dt.FECHA, dt.SUCURSAL,
          dt.TIP_DOC, dt.NUM_DOC,
          em.doc_ref, em.cod_cliente, em.fec_vence, em.mon_saldo
   from   cxc_enc_movimiento em,  cxc_detagecxctmp dt
   where  em.cod_cia  = dt.cod_cia
   and    em.sucursal = dt.sucursal
   and    em.tip_doc  = dt.tip_doc
   and    em.num_doc  = dt.num_doc;

##################################
## Planillas 30 Noviembre
## Salarios en Dolares
###################################
alter table plaplanilla
drop column moneda;

alter table plaempleado
add (monedaSalario varchar2(3) default 'CL' not null);

insert into coninterfaz
   (cod_cia, interfaz, descripcion)
values
   ('001', 'PLANILLAS', 'PLANILLAS');
COMMIT;
---
declare
  cursor plas is
     select cia, planilla, descripcion
     from   plaplanilla;

  vcta plaparmoneda.ctaplanilla%type;
begin
  for p in plas
  loop
     select ctaplanilla
     into   vcta
     from   plaparmoneda
     where  moneda='CL';
      
     insert into condetinterfaz
        (cod_cia, interfaz, nomvar, descripcion, tipo, valoromision)
     values
        (p.cia, 'PLANILLAS', 'CTAPLA'||P.planilla, 
         'Cuenta planilla '||p.descripcion, 'C', vcta);
  end loop;
  COMMIT;
end;
/

start paqpla
##

--estado del recibo
alter table com_enc_recibo drop constraint COM_ENC_NACINALIZA_ESTADO_CK2;

alter table com_enc_recibo add constraint com_enc_recibo_estado_Ck
   check (estado in ('P','A','N'));


create table venarqueo
( cia         char(3) not null,
  caja        char(3) not null,
  cajero      varchar2(10) not null,
  fecha       date not null,
  descripcion varchar2(120),
  auditor     varchar2(30) not null,
  arqueo      number(14,2) not null,
  fondofijo   number(14,2) not null,
  ingresos    number(14,2) not null,
  constraint venarqueo_pk primary key(cia, caja, cajero, fecha) 
);

create table venarqueodet
(
 CIA        CHAR(3)       NOT NULL,
 CAJERO     VARCHAR2(10)  NOT NULL,
 FECHA      DATE          NOT NULL,
 REFERENCIA VARCHAR2(5)   NOT NULL,
 INDICE     NUMBER(8,2)   NOT NULL,
 FORMULA    VARCHAR2(60)  NOT NULL,  
 TOTAL      NUMBER(14,4)  NOT NULL,
 CONSTRAINT VENARQUEODET_PK PRIMARY KEY(CIA, CAJERO, FECHA, REFERENCIA, INDICE)
);

#Vista camb_precio_pen: la moneda ya no esta en b (encabezado) sino en a (detalle)

alter table cajero add empleado varchar2(15);

#Admitir cambios de precios
alter table gen_enc_precio drop constraint GEN_ENC_PRECIO_TIPO_TRANS_CK;

alter table gen_enc_precio add constraint
    GEN_ENC_PRECIO_TIPO_TRANS_CK check (tipo_transaccion in ('AN','DA','CC','DP','DF','UP','IV','PA','PT','SC','CP'));

--si no hay control de lotes se podría dejar en blanco este campo
alter table com_det_nacionalizacion modify (lote_interno null);
--manejo de lotes en recibos
alter table com_det_recibo add (lote_interno varchar2(15));
alter table com_det_recibo add (fec_vence date);

--Consecutivos de lotes
ALTER TABLE INV_ARTICULO_CON_LOTE DROP CONSTRAINT INV_ARTICULO_CON_LOTE_PK;
ALTER TABLE INV_ARTICULO_CON_LOTE DROP COLUMN COD_LOTE;
ALTER TABLE INV_ARTICULO_CON_LOTE ADD(CONSTRAINT INV_ARTICULO_CON_LOTE_PK PRIMARY KEY(COD_CIA,COD_ARTICULO));

alter table con_parametro add (nivelcon number(2) default 1 not null);

start paqven;

alter table venconsecutivo drop constraint VENCONSECUTIVO_CLASE_CK;
alter table venconsecutivo add constraint VENCONSECUTIVO_CLASE_CK check (clase in ('D','F','O','P','S','V','A','E','T','C') );

alter table venbloques drop constraint VENBLOQUES_CLASE_CK;
alter table venbloques add constraint VENBLOQUES_CLASE_CK check (clase in ('D','F','O','P','S','V','A','E','T','C') );

--calculo de fecha vencimiento para cxp
alter table comlogcxp add (fecha_rec date default sysdate not null);

### 10 ENERO 2006
### CAMBIOS AL PAGO DE PLANILLAS
### CR

alter table platef 
   add (cuentaEmpresa varchar2(20));

##OJO: Llenar este campo con el codigo de cuenta de banco y luego:

alter table platef 
   modify (cuentaEmpresa not null);

alter table platef
add constraint banmae_platef_fk foreign key (cia, cuentaEmpresa)
references banmae (cod_cia, cuenta);

alter table plapagoemp
add (cuentaDep varchar2(20));

update plapagoemp
set cuentaDep = cuenta;

alter table plapago
drop column cuenta;

alter table plapagoemp
drop column cuenta;

alter table plapagoemp
add (cuentaPago varchar2(20));

####

alter table inv_lote_artic_bodega add (cos_total number(14,4) default 0 not null);

-- Calcula el costo por lote.
declare 
   cursor bods is 
      select cod_cia, cod_bodega, cod_articulo, cos_promedio
      from inv_artic_bodega;
begin
   for b in bods
   loop
      update inv_lote_artic_bodega l
         set l.cos_total=l.can_existe*b.cos_promedio
      where l.cod_cia=b.cod_cia
        and l.cod_bodega=b.cod_bodega
        and l.cod_articulo=b.cod_articulo;
   end loop;
   commit;
end;
/

create table inv_articulobod
(
 COD_CIA        CHAR(3) NOT NULL,
 COD_BODEGA     CHAR(3) NOT NULL,
 COD_ARTICULO   VARCHAR2(25) NOT NULL, 
 COS_ULTIMO     NUMBER(14,4) NOT NULL,
 COS_MAYOR      NUMBER(14,4) NOT NULL,
 FEC_ULTCOSTO   DATE NOT NULL,
 MIN_EXIST      NUMBER(12,4) NOT NULL,
 MAX_EXIST      NUMBER(12,4) NOT NULL,
 PUNTO_REORDEN  NUMBER(12,4) NOT NULL,
 PORC_UTILIDAD  NUMBER(5,2),
 FEC_ULTMOVTO   DATE NOT NULL,
 constraint inv_aticulobod_pk primary key(COD_CIA,COD_BODEGA,COD_ARTICULO)
);

insert into inv_articulobod
   select COD_CIA,COD_BODEGA,COD_ARTICULO,COS_ULTIMO,COS_MAYOR,FEC_ULTCOSTO,
          MIN_EXIST,MAX_EXIST,PUNTO_REORDEN,PORC_UTILIDAD,FEC_ULTMOVTO
   from inv_artic_bodega;
commit;
drop table Inv_artic_bodega;

create or replace view inv_exist_bodega as
   select COD_CIA, COD_BODEGA, COD_ARTICULO,
          sum(CAN_EXISTE) CAN_EXISTE, sum(CAN_APARTADO) CAN_APARTADO,
          sum(COS_TOTAL) COS_TOTAL,
          DECODE(sum(can_existe), 0, 0, sum(COS_TOTAL)/sum(CAN_EXISTE)) COS_PROMEDIO
   from inv_lote_artic_bodega
   group by COD_CIA, COD_BODEGA, COD_ARTICULO;


# parametro de bodega base para estimar costos en produccion
# Marcos Villalobos 13012006

alter table prdparametro
add cod_bodega varchar2(3);

## 16 de Enero 
## Cambios a planilla antes de version Mexico

Alter table plaparametro 
drop constraint PLAPARAM_PROMVAC_CK;

Alter table plaparametro 
add constraint PLAPARAMETRO_PROMVAC_CK check (promVac in ('N','E','S'));

alter table plaparametro 
add porcBonoVac number(5,2) default 0 not null;

alter table plaparametro
add (movBonoVac char(3));

alter table plaparametro 
drop column promMixtosAguin;

Alter table plaparametro 
add promAguin char(1) default 'P' not null;

Alter table plaparametro 
add constraint plaparametro_promAguin_ck check (promAguin in ('P','M','S'));

--para llobet
update plaparametro
set promAguin='M';

Alter table plahorario 
add (diasDescanso varchar2(3) default 'D' not null);

alter table plamovdev drop constraint plamovdev_clase_ck;
alter table plamovdev add constraint PLAMOVDEV_CLASE_CK check (clase in ('DEV','ADE','BON','COM','AUM','CES','AGI','CAT','VAC','INC','PRV','REI','EXT','ESP'));

alter table pladeducciones drop constraint PLADEDUCCIONES_TIPOVALOR_CK;
alter table pladeducciones add constraint PLADEDUCCIONES_TIPOVALOR_CK check (tipoValor in ('M','P','C'));


### CAMBIOS COMPRAS
--monto aduanero
alter table com_cargos drop column afectacxp;
alter table com_cargos drop column contabiliza;
alter table com_cargos drop column valor_omision;

alter table com_cargos_factura add (monto_aduanero number(14,2) default 0 not null);
update com_cargos_factura set monto_aduanero=monto;
alter table com_det_factura add (subtotal_aduanero number(14,4) default 0 not null);
update com_det_factura set subtotal_aduanero=subtotal_cif;

alter table com_det_nacionalizacion add (COD_ARTICULO_FINAL varchar2(25) default 'x' not null);
update com_det_nacionalizacion set cod_articulo_final=cod_articulo;
alter table com_det_factura add (cant_aduana number(14,4) default 0 not null);

## Notas 20-1-06

alter table venconsecutivo drop constraint VENCONSECUTIVO_CLASE_CK;
alter table venconsecutivo add constraint VENCONSECUTIVO_CLASE_CK check (clase in ('D','F','O','P','S','V','A','E','N') );

alter table venbloques drop constraint VENBLOQUES_CLASE_CK;
alter table venbloques add constraint VENBLOQUES_CLASE_CK check (clase in ('D','F','O','P','S','V','A','E','N') );

--Notas de credito y debito

create table VenNota (
	cia		char(3)				not null,
	sucursal	char(3)				not null,
	documento	number(10)			not null,
        tipo            char(3)                         not null,
	caja		char(3)				not null,
	cajero		varchar2(10)			not null,
	dia		date				not null,
	linea		char(3),
	factura		number(10)			not null,
	vale		number(10),
	pago		number(10),
	fecha		date				not null,
	porcimpuesto	number(5,2)			not null,
	agenteventa	varchar2(3)			not null,
	cliente		varchar2(25)			not null,
	moneda		varchar2(3)			not null,
	tipocambio	number(14,4)			not null,
	cambiobase	number(14,4)			not null,
	nombre		varchar2(50)			not null,
	descripcion	varchar2(120),
	efecto   	char(1)				not null
		constraint VENNOTA_EFECTO_CK check (EFECTO in ('D','C')),
	estado		char(1)				not null
		constraint VENNOTA_ESTADO_CK check (estado in ('A','P','N')),
	otroscargos	number(14,2)                    not null,
	constraint VENNOTA_PK primary key (cia,sucursal,documento)
)
initrans 1
storage
(
    initial 10K
    next 10K
);

create table VenDetNota (
	cia		char(3)				not null,
	sucursal	char(3)				not null,
	documento	number(10)			not null,
	secuencia	number(4)			not null,
	bodega		char(3)				not null,
	articulo	varchar2(25)			not null,
	agenteventa	varchar2(3)			not null,
	impuesto	number(14,2)			not null,
	impconsumo	number(14,2)			not null,
	ajuste		number(14,2)			not null,
	totallinea	number(14,2)			not null,
	constraint VENDETNOTA_PK primary key (cia,sucursal,documento,secuencia)
)
initrans 1
storage
(
    initial 10K
    next 10K
);	
	
alter table VenDetNota
   add constraint VenNota_DetNota_FK foreign key (cia,sucursal,documento)
      references VenNota (cia,sucursal,documento);

create table xx as select * from venfondodet;
drop table venfondodet;
create table venfondodet
(
 CIA        CHAR(3)       NOT NULL,
 CAJERO     VARCHAR2(10)  NOT NULL,
 REFERENCIA VARCHAR2(5)   NOT NULL,
 INDICE     NUMBER(8,2)   NOT NULL,
 FORMULA    VARCHAR2(60)  NOT NULL,  
 TOTAL      NUMBER(14,4)  NOT NULL,
 CONSTRAINT VENFONDODET_PK PRIMARY KEY(CIA, CAJERO, REFERENCIA, INDICE)
);

insert into venfondodet
   select cia, cajero, substr(indice,1,1), substr(indice,2),
          formula, total
   from xx;

alter table cxp_enc_gen_pago add (monto number(14,2) default 0 not null);

alter table COM_HIST_DETFAC add (subtotal_aduanero number(14,4) default 0 not null);
alter table com_HIST_DETFAC add (cant_aduana number(14,4) default 0 not null);
alter table COM_HIST_DETNAC add (COD_ARTICULO_FINAL varchar2(25) default 'x' not null);

#26-ene-2006
alter table plaprestamo add (referencia varchar2(10) default '0' not null);

create or replace view PlaDeducPrest as
select a.cia, a.empleado, a.tipoMov, a.fechaSolicitud, a.descripcion, a.fechaInteres,
   a.porcInteres, a.montoInteres, a.referencia, b.esFija, b.montoCuota, b.cuotasAplicadas,
   b.tipoValor, b.valor, b.montoAplicado, b.enAdelanto, b.prioridad, b.estado
from PlaPrestamo a, PlaDeducciones b
where a.cia = b.cia
  and a.empleado = b.empleado
  and a.tipoMov = b.tipoMov;

#3-Feb-2006
start conta\concontable
start conta\conpaqcontable
start distribucion.sql
#Recrear tabla temporal conresdistribucion para incluir columna periodo

#Recrear paquete calcgen para incluir procedure ObtenerPeriodo
start paqgen

#7-Feb-2006 pagos de notas de débito en el pos
ALTER TABLE VENTIPODOC DROP CONSTRAINT VENTIPODOC_CLASE_CK;

ALTER TABLE VENTIPODOC ADD CONSTRAINT VENTIPODOC_CLASE_CK CHECK (CLASE IN ('A','F','D','N'));

# Recrear tabla VENNOTA (Columnas nuevas TIPODOC y PAGO)
drop table vennota;
Create table vennota ...;

#8-Feb-2006
alter table ventransaccion drop constraint VENTRANSACCION_ORIGEN_CK;
alter table ventransaccion add constraint VENTRANSACCION_ORIGEN_CK check (origen in ('B','C','D','F','O','P','S','V','N'));

Start ventas\rutcaja

# Correciones levantar ops
alter table vendevolucion modify (otroscargos not null);

DROP VIEW SEG_HUERFA;
DROP VIEW SEG_VIUDO;
ALTER TABLE SEG_GRANT DROP COLUMN COD_OPCION;
ALTER TABLE SEG_GRANT DROP COLUMN PARENTID;
ALTER TABLE SEG_MNUITM ADD(mnuname varchar2(32));
Update seg_mnuitm i
  set mnuname=(select name from seg_mnumnu m
               where m.modid=i.modid
                 and m.itemid=i.parentid);
ALTER TABLE SEG_MNUITM MODIFY(mnuname varchar2(32) not null);

START SEGURID\SEGURID.SQL


# 07 de Febrero para contabilizar facturas de compras
alter table com_enc_factura
   add nom_asiento varchar2(20);
alter table com_enc_nacionalizacion
   add nom_asiento varchar2(20);
alter table com_enc_reclamo
   add nom_asiento varchar2(20);

# Distribuciones contables de compras
start compra\comcontable
start compra\compaqcontable

alter table com_enc_factura
   add distribucion number(10);
alter table com_enc_nacionalizacion
  add distribucion number(10);
alter table com_enc_reclamo
  add distribucion number(10);
alter table com_enc_recibo
   add distribucion number(10);

-- Ojo: Talves no se deba hacer esto xxx: marco
--alter table com_enc_factura
  --drop column num_asiento;
--alter table com_enc_nacionalizacion
   --drop column num_asiento;
--alter table com_enc_reclamo
   --drop column num_asiento;
--alter table com_enc_recibo
   --drop column num_asiento;

# BORRAR DE LOS HISTORICOS
alter table com_hist_encfac
  drop column num_asiento;
alter table com_hist_encnac
   drop column num_asiento;
alter table com_hist_encrec
   drop column num_asiento;
# Que pasó con el recibo?

alter table venarqueo add (fechareg date default sysdate not null);
update venarqueo set fechareg=fecha;
commit;

-- De aqui en adelante... Detalle
alter table venarqueo drop constraint venarqueo_pk;
alter table venarqueo add constraint venarqueo_pk
  primary key (cia, cajero, fechareg);

start ventas/venpresup

alter table ComDetDistribucion add (Referencia varchar2(10));
alter table ConDetDistribucion add (Referencia varchar2(10));

--27/4/06
--Correcion Preparacion de facturas de cobros
alter table cxc_encagecxctmp add(CLIENTE VARCHAR2(25));

--28/4/06
--modificaciones COMPRAS: distribucion contable detallada
alter table com_montoprov add (distribucion number(10));
alter table com_cargos_factura add (distribucion number(10));

--8/5/06
--modificaciones COMPRAS: distribucion contable detallada
alter table com_cargos_nacionalizacion add (distribucion number(10));

--11/5/06

alter table cxp_enc_gen_pago modify(cod_banco varchar2(12)); 
alter table cxp_enc_gen_pago drop constraint CXP_ENC_GENPG_FOR_PAG_CK;
alter table cxp_enc_gen_pago add (constraint CXP_ENC_GENPG_FOR_PAG_CK 
					check (ind_forma_pago in ('E','C','T','F')));
alter table cxp_enc_pago_nota drop constraint CXP_ENC_PGNT_FOR_PAG_CK;
alter table cxp_enc_pago_nota add (constraint CXP_ENC_PGNT_FOR_PAG_CK 
					check (ind_forma_pago in ('E','C','T','F')));

# No se puede facturar sin inv y creando el precio:
  Solucion: costo=1 en insertacosto y incializar vendetfactura.costo igual.
# No se puede imprimir si referencia no es number:
  Solucion incluir isnumber en venimp.
  Deberia haber una libreria de funciones en venimp.

--30/05/06
#Reclear tabla temporal comresfactura
start compra\comresfactura


alter table inv_lote_artic_bodega modify (cos_total number(14,4) default 0 not null);
alter table inv_lote_artic_bodega drop column can_entrada;
alter table inv_lote_artic_bodega drop column can_salida;

alter table inv_lote_artic_bodega drop constraint inv_lote_artic_bodega_costo_ck;
alter table inv_lote_artic_bodega add constraint inv_lote_artic_bodega_costo_ck
    check ((can_existe>0 and cos_total>=0) or (abs(cos_total)<0.5 and can_existe=0));


#Recrear calcgen
Start paqgen

#Transacciones inconsistentes con respecto a distribuciones
create global temporary table conincdistribucion(
	Cia  		Char(3) 	not null,
      	Sucursal 	Char(3) 	not null,
      	Documento	Varchar2(10) 	not null,
      	Llave1	  	Varchar2(25),      				
      	Llave2		Varchar2(25),
      	DocRef		Varchar2(10),
      	Fecha		Date		not null,
      	Distribucion 	Number(10),
      	Origen		Varchar2(4)	not null,
      	Clase		Varchar2(6),
   	Observaciones 	Varchar2(200),
      	Error		VarChar2(5)	not null)
on commit preserve rows;

--1/06/2006
#Recrear Distcon
Start distribucion

#Estados Transacciones (distribucion)
Start compra\compaqcontable
start conta\conpaqcontable

alter table venempleado add(NomCorto Varchar2(15));

alter table venempleado drop constraint venempleado_puesto_ck;
alter table venempleado add (constraint venempleado_puesto_ck 
			check (puesto in ('A','AE','C','CA','D','E','F','FD','T','G')));

# Corrige una omision (Registra los modulos externos)
insert into conconsecdist (COD_CIA, SISTEMA, CONSECUTIVO, TEMPORAL, DESCRIPCION, TABLA)
   values ('001', 'COMP', 1, 1, 'Contabilizacion de compras', 'COMDISTRIBUCION');
insert into conconsecdist (COD_CIA, SISTEMA, CONSECUTIVO, TEMPORAL, DESCRIPCION, TABLA)
   values ('001', 'PLAN', 1, 1, 'Contabilizacion de planillas', 'CONDISTRIBUCION');

update con_parametro set for_asiento='SS-YYYYMM-CCCC';