INSERT INTO Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo) VALUES ('FRMLCAP','NOMINF','GEN',14,'Informe de Capacitaciones','FRMLCAP','S',0,'') INSERT INTO Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo) VALUES ('FRMPREACT','TRAPRO','TRA',16,'Actualización de Presupuestos','FRMPREACT','SSSSSSSSSSSSS',0,'') GO INSERT INTO Sys_Roles (IdObj,IdRole,Funcion) VALUES ('FRMDIA','FIS','Permitir Cierre Diario sin importar Inventario Físico de tanques') INSERT INTO Sys_Roles (IdObj,IdRole,Funcion) VALUES ('FRMDIATRA','FIS','Permitir Cierre Diario sin importar Inventario Físico de tanques') GO INSERT INTO Sys_Autoriza (IdConcepto,ConceptoAut,Inactivo) VALUES ('0007','TRASLADO DE BODEGAS',0) GO INSERT INTO adm_Opciones (IdOpc,Opcion,TipoDato,Valor,NivUp,nModulo) VALUES ('ATB','AUTORIZACION PARA TRASLADO DE BODEGAS','BOOLEAN','0',5,'MAIN') INSERT INTO adm_Opciones (IdOpc,Opcion,TipoDato,Valor,NivUp,nModulo) VALUES ('FCD','COMPROBAR INVENTARIO FISICO DE TANQUES EN CIERRE DIARIO','BOOLEAN','0',5,'MAIN') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryNomCapacitacionesLta] @pmIdClase VARCHAR(4)=Null AS SELECT C.IdClase AS CdClase,NomClase,Item,Vigencia,C.CdEmpleado,E.Apellidos,E.Nombres ,CdProf,Profesion,CdCargo,Cargo,CdArea,Area,CdDep,Dependencia,Cumplimto,C.Inactivo AS Inactvo FROM NomCapacitaciones AS C INNER JOIN ClaseCapac AS CP ON C.IdClase=CP.IdClase LEFT JOIN Empleados AS E ON C.CdEmpleado=E.IdEmpleado LEFT JOIN Cargos AS CG ON C.CdCargo=CG.IdCargo LEFT JOIN Profesiones AS P ON C.CdProf=P.IdProf LEFT JOIN Dependencias AS D ON C.CdDep=D.IdDep LEFT JOIN Areas AS A ON C.CdArea=A.IdArea WHERE C.IdClase LIKE ISNULL(@pmIdClase,'%') AND CP.Inactivo=0 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER PROCEDURE [dbo].[paQryTiposDocAut] AS SELECT IdDoc,TipoDoc,IdDoc+' '+ TipoDoc AS DsTip FROM Sys_TiposDoc WHERE IdDoc IN ('FCR','DFO','ODB','OD2','PR1','NTS') ORDER BY IdDoc GO