Proyecto Planilla
Proyecto Planilla
Integrantes:
- Martin Salomon Aguilar
- Melissa Diaz Puerta
- Heinrich Facho Verastegui
- Jannet Alburuqueque Miranda
Soluciones Empresariales
PROYECTO PLANILLA
ScriptProyectoPlanilla
Cabecera Paquete
Detalle Paquete
Inserciones
SCRIPT PROYECTO PLANILLA
CREATE TABLE
CREATE TABLE Afp );
( CREATE TABLE Cargo
AFCodigo NUMBER NOT NULL , (
AFDescripcion VARCHAR2(100) NULL , CACodigo NUMBER NOT NULL ,
AFEstado VARCHAR2(1) DEFAULT ('A') NULL , CADescripcion VARCHAR2(100) NULL ,
AFObservacion VARCHAR2(100) NULL , CAObservacion VARCHAR2(100) NULL ,
AFFechaRegistro DATE DEFAULT SYSDATE NOT CAEstado VARCHAR2(1) DEFAULT ('A') NULL ,
NULL , CAFechaRegistro DATE DEFAULT SYSDATE NOT
AFResponsable VARCHAR2(30) NOT NULL , NULL ,
AFMaquina VARCHAR2(30) NOT NULL , CAResponsable VARCHAR2(30) NOT NULL ,
AFIp VARCHAR2(15) NOT NULL CAMaquina VARCHAR2(30) NOT NULL ,
); CAIp VARCHAR2(15) NOT NULL ,
CREATE TABLE AfpComision DPCodigo NUMBER NOT NULL
( );
AFCodigo NUMBER NOT NULL ,
ACAño VARCHAR2(4) NOT NULL , CREATE TABLE CondicionLaboral
ACMes VARCHAR2(2) NOT NULL , (
ACAporte NUMBER(18,2) NOT NULL , CLCodigo NUMBER NOT NULL ,
ACPrima NUMBER(18,2) NOT NULL , CLDescripcion VARCHAR2(100) NULL ,
ACComision NUMBER(18,2) NOT NULL , CLObservacion VARCHAR2(100) NULL ,
ACTope NUMBER(18,2) NULL , CLEstado VARCHAR2(1) DEFAULT ('A') NULL ,
ACObservacion VARCHAR2(100) NULL , CLFechaRegistro DATE DEFAULT SYSDATE NOT
ACFechaRegistro DATE DEFAULT SYSDATE NOT NULL ,
NULL , CLResponsable VARCHAR2(30) NOT NULL ,
ACResponsable VARCHAR2(30) NOT NULL , CLMaquina VARCHAR2(30) NOT NULL ,
ACMaquina VARCHAR2(30) NOT NULL , CLIp VARCHAR2(15) NOT NULL
ACIp VARCHAR2(15) NOT NULL );
CREATE TABLE
CREATE TABLE Dependencia
( CREATE TABLE Habiente
DPCodigo NUMBER NOT NULL , (
DPDescripcion VARCHAR2(100) NOT NULL , HBCodigo NUMBER NOT NULL ,
DPEstado VARCHAR2(1) DEFAULT ('A') NOT NULL , HBNombre VARCHAR2(100) NULL ,
DPFechaRegistro DATE DEFAULT SYSDATE NOT HBDni VARCHAR2(8) NULL ,
NULL , HBFechaNac DATE NULL ,
DPResponsable VARCHAR2(30) NOT NULL , HBSexo VARCHAR2(1) NULL ,
DPMaquina VARCHAR2(30) NOT NULL , HBDireccion VARCHAR2(150) NULL ,
DPIp VARCHAR2(15) NOT NULL HBFechaRegistro DATE DEFAULT SYSDATE NOT
); NULL ,
HBResponsable VARCHAR2(30) NOT NULL ,
CREATE TABLE EntidadFinanciera HBMaquina VARCHAR2(30) NOT NULL ,
( HBIp VARCHAR2(15) NOT NULL
EFCodigo NUMBER NOT NULL , );
EFDescripcion VARCHAR2(100) NULL ,
EFObservacion VARCHAR2(100) NULL , CREATE TABLE HabienteVinculo
EFFechaRegistro DATE DEFAULT SYSDATE NOT (
NULL , HVCodigo NUMBER NOT NULL ,
EFEstado VARCHAR2(1) DEFAULT ('A') NOT NULL , HVDescripcion VARCHAR2(100) NULL ,
EFResponsable VARCHAR2(30) NOT NULL , HVFechaRegistro DATE DEFAULT SYSDATE NOT
EFMaquina VARCHAR2(30) NOT NULL , NULL ,
EFIp VARCHAR2(15) NOT NULL HVResponsable VARCHAR2(30) NOT NULL ,
); HVMaquina VARCHAR2(30) NOT NULL ,
HVIp VARCHAR2(15) NOT NULL
);
CREATE TABLE
CREATE TABLE InformacionAdicional PLIp VARCHAR2(15) NOT NULL ,
( PTCodigo NUMBER NOT NULL
IACodigo NUMBER NOT NULL , );
IADescripcion VARCHAR2(100) NULL , CREATE TABLE PlanillaBoleta
IAFechaRegistro DATE DEFAULT SYSDATE NOT (
NULL , PLCodigo NUMBER NOT NULL ,
IAResponsable VARCHAR2(30) NOT NULL , TRCodigo NUMBER NOT NULL ,
IAMaquina VARCHAR2(30) NOT NULL , PBDiasLaborados VARCHAR2(2) NULL ,
IAIp VARCHAR2(15) NOT NULL PBNumSeguro VARCHAR2(20) NULL ,
); PBCargo VARCHAR2(100) NULL ,
CREATE TABLE Planilla PBCondicionLaboral VARCHAR2(100) NULL ,
( PBNomEntidadFinac VARCHAR2(100) NULL ,
PLCodigo NUMBER NOT NULL , PBNumCuenta VARCHAR2(20) NULL ,
PLAño VARCHAR2(4) NULL , PBNivelRemun NUMBER(18,2) NULL ,
PLMes VARCHAR2(2) NULL , PBRegimenPension VARCHAR2(100) NULL ,
PLNumero VARCHAR2(2) NULL , PBAfp VARCHAR2(100) NULL ,
PLEstado VARCHAR2(1) DEFAULT ('A') NOT PBCuspAfp VARCHAR2(20) NULL ,
NULL ,
PBFechaRegistro DATE DEFAULT SYSDATE NOT
PLObservacion VARCHAR2(100) NULL , NULL ,
PLFechaRegistro DATE DEFAULT SYSDATE NOT PBResponsable VARCHAR2(30) NOT NULL ,
NULL,
PBMaquina VARCHAR2(30) NOT NULL ,
PLResponsable VARCHAR2(30) NOT NULL ,
PBIp VARCHAR2(15) NOT NULL
PLMaquina VARCHAR2(30) NOT NULL ,
);
CREATE TABLE
CREATE TABLE PlanillaBoletaRubro PTEstado VARCHAR2(1) DEFAULT ('A') NOT
( NULL ,
); (
ACAño ASC, (
); );
/********************CARGO*******************/ /*******************Habiente*****************/
CREATE UNIQUE INDEX IXCACodigo ON Cargo CREATE UNIQUE INDEX IXHBCodigo ON Habiente
( (
); );
/****************CONDICIONLABORAL**********/ /***************HabienteVinculo*****************/
( (
); );
INDICE
/***********InformacionAdicional*************/ );
CREATE UNIQUE INDEX IXIACodigo ON /********************PlanillaTipo****************/
InformacionAdicional CREATE UNIQUE INDEX IXPTCodigo ON
( PlanillaTipo
IACodigo ASC (
); PTCodigo ASC
/**************Planilla**********************/ );
CREATE UNIQUE INDEX IXPLCodigo ON Planilla /*******************RegimenPension************/
( CREATE UNIQUE INDEX IXRPCodigo ON
PLCodigo ASC RegimenPension
); (
); (
( );
TRCodigo ASC,
CACodigo ASC, /*************TrabajadorNota***************/
/*************RegimenPension****************/ /**************TrabajadorHabiente**************/
/*****************Rubro*********************/
/**************TrabajadorInforAdic**************/
ALTER TABLE Rubro ADD CONSTRAINT PK_Rubro
PRIMARY KEY (RUCodigo); ALTER TABLE TrabajadorInforAdic ADD
CONSTRAINT PK_TrabajadorInforAdic PRIMARY
KEY (TRCodigo,IACodigo,TIIdentificador);
/***************RubroTipo*******************/
ALTER TABLE RubroTipo ADD CONSTRAINT /***************TrabajadorNota****************/
PK_RubroTipo PRIMARY KEY (RTCodigo);
ALTER TABLE TrabajadorNota ADD CONSTRAINT
PK_TrabajadorNota PRIMARY KEY (TNCodigo);
/**************Trabajador********************/
ALTER TABLE Trabajador ADD CONSTRAINT
PK_Trabajador PRIMARY KEY (TRCodigo);
/*************TrabajadorCargo****************/
FOREIGN KEY
-------------------------------------- ALTER TABLE PlanillaBoletaRubro ADD CONSTRAINT
ALTER TABLE AfpComision ADD CONSTRAINT FK_PlaBoletaRubro_Rubro FOREIGN KEY (RUCodigo)
FK_AfpComision_AFP FOREIGN KEY (AFCodigo) REFERENCES Rubro(RUCodigo);
REFERENCES Afp(AFCodigo); --------------------------------------
-------------------------------------- ALTER TABLE Rubro ADD CONSTRAINT
ALTER TABLE Cargo ADD CONSTRAINT FK_Rubro_RubroTipo FOREIGN KEY (RTCodigo)
FK_Cargo_Dependencia FOREIGN KEY (DPCodigo) REFERENCES RubroTipo(RTCodigo);
REFERENCES Dependencia(DPCodigo); --------------------------------------
-------------------------------------- ALTER TABLE Trabajador ADD CONSTRAINT
ALTER TABLE Planilla ADD CONSTRAINT FK_Trabajador_CondicionLaboral FOREIGN KEY
FK_Planilla_PlanillaTipo FOREIGN KEY (PTCodigo) (CLCodigo) REFERENCES
REFERENCES PlanillaTipo(PTCodigo); CondicionLaboral(CLCodigo);
-------------------------------------- --------------------------------------
ALTER TABLE PlanillaBoleta ADD CONSTRAINT ALTER TABLE Trabajador ADD CONSTRAINT
FK_PlanillaBoleta_Planilla FOREIGN KEY (PLCodigo) FK_Trabajador_EntFinanciera FOREIGN KEY
REFERENCES Planilla(PLCodigo); (EFCodigo) REFERENCES
EntidadFinanciera(EFCodigo);
--------------------------------------
--------------------------------------
ALTER TABLE PlanillaBoleta ADD CONSTRAINT
FK_PlanillaBoleta_Trabajador FOREIGN KEY ALTER TABLE Trabajador ADD CONSTRAINT
(TRCodigo) REFERENCES Trabajador(TRCodigo); FK_Trabajador_RegimenPension FOREIGN KEY
(RPCodigo) REFERENCES
-------------------------------------- RegimenPension(RPCodigo);
ALTER TABLE PlanillaBoletaRubro ADD CONSTRAINT --------------------------------------
FK_PlaBoletaRubro_PlaBoleta FOREIGN KEY
(PLCodigo,TRCodigo) REFERENCES ALTER TABLE Trabajador ADD CONSTRAINT
PlanillaBoleta(PLCodigo,TRCodigo); FK_Trabajador_Afp FOREIGN KEY (AFCodigo)
REFERENCES Afp(AFCodigo);
--------------------------------------
--------------------------------------
FOREIGN KEY
ALTER TABLE TrabajadorCargo ADD CONSTRAINT
FK_TrabajadorCargo_Trabajador FOREIGN KEY
(TRCodigo) REFERENCES Trabajador(TRCodigo);
ALTER TABLE TrabajadorHabiente ADD
-------------------------------------- CONSTRAINT FK_TraHabiente_Habiente
ALTER TABLE TrabajadorCargo ADD CONSTRAINT FOREIGN KEY (HBCodigo) REFERENCES
FK_TrabajadorCargo_Cargo FOREIGN KEY Habiente(HBCodigo);
(CACodigo) REFERENCES Cargo(CACodigo); --------------------------------------
-------------------------------------- ALTER TABLE TrabajadorHabiente ADD
ALTER TABLE TrabajadorContrato ADD CONSTRAINT FK_TraHabiente_HabienteVinculo
CONSTRAINT FK_TraContrato_Trabajador FOREIGN KEY (HVCodigo) REFERENCES
FOREIGN KEY (TRCodigo) REFERENCES HabienteVinculo(HVCodigo);
Trabajador(TRCodigo); --------------------------------------
-------------------------------------- ALTER TABLE TrabajadorInforAdic ADD
ALTER TABLE TrabajadorContrato ADD CONSTRAINT FK_TraInforAdic_InfAdicional
CONSTRAINT FK_TraContrato_Cargo FOREIGN FOREIGN KEY (IACodigo) REFERENCES
KEY (CACodigo) REFERENCES InformacionAdicional(IACodigo);
Cargo(CACodigo); --------------------------------------
-------------------------------------- ALTER TABLE TrabajadorInforAdic ADD
ALTER TABLE TrabajadorHabiente ADD CONSTRAINT FK_TraInforAdic_Trabajador
CONSTRAINT FK_TraHabiente_Trabajador FOREIGN KEY (TRCodigo) REFERENCES
FOREIGN KEY (TRCodigo) REFERENCES Trabajador(TRCodigo);
Trabajador(TRCodigo); --------------------------------------
-------------------------------------- ALTER TABLE TrabajadorNota ADD CONSTRAINT
FK_TrabajadorNota_Trabajador FOREIGN KEY
(TRCodigo) REFERENCES
Trabajador(TRCodigo);
SECUENCIA
;
CREATE SEQUENCE afCodigo
START WITH 1 ---------------------------------
INCREMENT BY 1 CREATE SEQUENCE HBCodigo
CACHE 100 START WITH 1
; INCREMENT BY 1
--------------------------------- CACHE 100
CREATE SEQUENCE CACodigo ;
START WITH 1
INCREMENT BY 1 ---------------------------------
CACHE 100 CREATE SEQUENCE HVCodigo
; START WITH 1
--------------------------------- INCREMENT BY 1
CREATE SEQUENCE CLCodigo CACHE 100
START WITH 1 ;
INCREMENT BY 1
CACHE 100 ---------------------------------
; CREATE SEQUENCE IACodigo
--------------------------------- START WITH 1
CREATE SEQUENCE DPCodigo INCREMENT BY 1
START WITH 1 CACHE 100
INCREMENT BY 1 ;
CACHE 100
; ---------------------------------
--------------------------------- CREATE SEQUENCE PLCodigo
CREATE SEQUENCE EFCodigo START WITH 1
START WITH 1 INCREMENT BY 1
INCREMENT BY 1 CACHE 100
CACHE 100 ;
SECUENCIA
CREATE SEQUENCE TRCodigo CACHE 100
START WITH 1 ;
INCREMENT BY 1 ---------------------------------
CACHE 100 CREATE SEQUENCE RTCodigo
; START WITH 1
--------------------------------- INCREMENT BY 1
CREATE SEQUENCE PRIdentificador CACHE 100
START WITH 1 ;
INCREMENT BY 1 ---------------------------------
CACHE 100 CREATE SEQUENCE TCIdentificador
; START WITH 1
--------------------------------- INCREMENT BY 1
CREATE SEQUENCE PTCodigo CACHE 100
START WITH 1 ;
INCREMENT BY 1 ---------------------------------
CACHE 100 CREATE SEQUENCE TTIdentificador
; START WITH 1
--------------------------------- INCREMENT BY 1
CREATE SEQUENCE RPCodigo CACHE 100
START WITH 1 ;
INCREMENT BY 1 ---------------------------------
CACHE 100 CREATE SEQUENCE TNCodigo
; START WITH 1
--------------------------------- INCREMENT BY 1
CREATE SEQUENCE RUCodigo CACHE 100
START WITH 1 ;
INCREMENT BY 1
PAQUETE
Cabecera Paquete
Detalle Paquete
CABECERA PAQUETE
CREATE OR REPLACE PACKAGE paq_Proyecto v_EFDescripcion [Link]
AS %TYPE,
/****************************************/ .
PROCEDURE pa_listarPlanillaTipo( .
v_cursor OUT vCursor) .
DETALLE PAQUETE
PROCEDURE pa_InsertarDependencia( commit;
v_DPCodigo [Link]%TYPE, else
v_DPDescripcion insert into Dependencia
[Link]%TYPE, (DPCodigo,DPDescripcion,DPEstado,DPRe
v_DPEstado [Link]%TYPE , sponsable,DPMaquina,DPIp)
v_DPResponsable values
[Link]%TYPE , ([Link],v_DPDescripcion,v_DPE
stado,v_DPResponsable,v_DPMaquina,v_D
v_DPMaquina [Link] PIp );
%TYPE ,
commit;
v_DPIp [Link]%TYPE
end if;
)
EXCEPTION
IS
WHEN OTHERS THEN rollback;
begin
END pa_InsertarDependencia;
if(v_DPCodigo<>0)then
/;
update Dependencia
set
DPDescripcion=v_DPDescripcion,DPEstad
o=v_DPEstado,DPFechaRegistro=sysdate,
DPResponsable=v_DPResponsable,DPMaq
uina=v_DPMaquina,DPIp=v_DPIp
where DPCodigo=v_DPCodigo;
DETALLE PAQUETE
commit;
PROCEDURE
pa_InsertarTiposRubrosPlanilla(
v_RTCodigo [Link]%TYPE,
v_RTDescripcion [Link]
%TYPE,
v_RTObservacion [Link]
%TYPE , else
v_RTResponsable insert into RubroTipo
[Link]%TYPE , (RTCodigo,RTDescripcion,RTObservacion,
RTFechaRegistro,RTResponsable,RTMaqu
v_RTMaquina [Link] ina,RTIp)
%TYPE ,
values
v_RTIp [Link]%TYPE ([Link],v_RTDescripcion,v_RT
) Observacion,sysdate,v_RTResponsable,v_
IS RTMaquina,v_RTIp);
begin commit;
--INSERTAMOS HABIENTES
exec paq_Proyecto.pa_insertarHabiente (0,'Heinrrich Facho','43576918','03-07-
1986','M','marañon128 - Chiclayo','msalomon','informatica1','[Link]');
exec paq_Proyecto.pa_insertarHabiente (0,'Milagros Huaman','44576918','12-12-
1980','F','Los Amautas234 - Chiclayo','msalomon','informatica1','[Link]');
exec paq_Proyecto.pa_insertarHabiente (0,'Alejandro Oliva','45576918','22-03-
1985','M','24 de Junio 103 - Pomalca','msalomon','informatica1','[Link]');
exec paq_Proyecto.pa_insertarHabiente (0,'Katya Araujo','46576918','29-06-
1978','F','Chinchaysuyo 678 - Villarreal','msalomon','informatica1','[Link]');
exec paq_Proyecto.pa_insertarHabiente (0,'Yuri Diaz','47576918','05-05-1973','M','Los
Parques 213 - Chiclayo','msalomon','informatica1','[Link]');
--ACTUALIZAMOS HABIENTES
exec paq_Proyecto.pa_insertarHabiente (2,'Milagros Huaman Paredes','44576918','12-
12-1980','F','Los Amautas 234 - Chiclayo','msalomon','informatica1','[Link]');
exec paq_Proyecto.pa_insertarHabiente (5,'Yuri Gali Diaz Cajo','47576918','05-05-
1973','M','Los Parques 213 - Chiclayo','msalomon','informatica1','[Link]');
--INSERTAMOS LOS VINCULOS DE LOS HABIENTES
exec paq_Proyecto.pa_insertarHabienteVinculo
(0,'Padre','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarHabienteVinculo
(0,'Madre','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarHabienteVinculo
(0,'Hijo','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarHabienteVinculo
(0,'Esposa','msalomon','informatica7','[Link]');
--ACTUALIZAMOS VINCULOS
exec paq_Proyecto.pa_insertarHabienteVinculo
(3,'Hijo(a)','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarHabienteVinculo
--INSERTAR REGIMEN DE PENSION
(4,'Conyuge','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarRegimenPension (0,'SISTEMA NACIONAL DE
PENSIONES','ONP','A','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarRegimenPension (0,'SISTEMA PRIVADO DE
PENSIONES','AFP','A','msalomon','informatica7','[Link]');
--ACTUALIZAR REGIMEN DE PENSION
exec paq_Proyecto.pa_insertarRegimenPension (1,'SISTEMA NACIONAL DE
PENSIONES','SNP - ONP','A','msalomon','informatica7','[Link]');
--INSERTAR CONDICION LABORAL
exec paq_Proyecto.pa_insertarCondicionLaboral (0,'Practicantes','Ley
2572','A','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarCondicionLaboral (0,'Contrato Administrativo de
Servicios','CAS','A','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarCondicionLaboral
(0,'Nombrados','Planilla','A','msalomon','informatica7','[Link]');
exec paq_Proyecto.pa_insertarCondicionLaboral
(0,'Contratados','Planilla','A','msalomon','informatica7','[Link]');
--ACTUALIZANDO CONDICION LABORAL
exec paq_Proyecto.pa_insertarCondicionLaboral (1,'Practicas
Profesionales','Practicantes','A','msalomon','informatica7','[Link]');
--INSERTANDO TRABAJADOR
exec paq_Proyecto.pa_insertarTrabajador (0,'Salomon','Aguilar','Martin Jose
Arnaldo','44963409','10-02-1988','M','Av 24 de Junio
Pomalca','305454676','98765','98765','17-03-2010','01-01-
1901',1500,'A','E','msalomon','informatica7','[Link]',1,1,1,1,2);
exec paq_Proyecto.pa_insertarTrabajador (0,'Diaz','Puerta','Melissa del
Pilar','44963410','30-11-1986','F','La Primavera III
Etapa','305454677','98766','98766','17-03-2010','01-01-
1901',2000,'A','E','msalomon','informatica7','[Link]',1,1,1,1,2);
exec paq_Proyecto.pa_insertarTrabajador (0,'Facho','Verastegui','Heinrrich
Rodolfo','44963411','07-03-1986','M','Marañon 128','305454678','98767','98767','17-03-
2010','01-01-1901',1500,'A','E','msalomon','informatica7','[Link]',1,1,1,1,2);
exec paq_Proyecto.pa_insertarTrabajador
(0,'Alburquerque','Muñoz','Janeth','44963412','15-06-1986','F','Chinchaysuyo
678','305454679','98768','98768','17-03-2010','01-01-
1901',1500,'A','E','msalomon','informatica7','[Link]',2,1,2,1,2);
--INSERTAR TRABAJADOR NOTA
exec paq_Proyecto.pa_insertarTrabajadorNota (0,'Para que desempeñe labores en la Ofic.
de Informatica','msalomon','informatica7','[Link]',1);
exec paq_Proyecto.pa_insertarTrabajadorNota (0,'Probando
Nota','msalomon','informatica7','[Link]',3);
exec paq_Proyecto.pa_insertarTrabajadorNota (0,'Probando Otra
Nota','msalomon','informatica7','[Link]',3);
exec paq_Proyecto.pa_insertarTrabajadorNota (0,'Para que desempeñe labores de Web
Master','msalomon','informatica7','[Link]',4);
--PARA ACTUALIZAR LA NOTA DEL TRABAJADOR
exec paq_Proyecto.pa_insertarTrabajadorNota (2,'Probando Nueva
Nota','msalomon','informatica7','[Link]',3);
exec paq_Proyecto.pa_insertarTrabajadorNota (4,'Especialista en diseño
Web','msalomon','informatica7','[Link]',4);