ESTE ES TODO EL STORED ESPERO LE ENTIENDAS Y ME PUEDAS AYUDAR
GRACIAS
alegna*
CREATE proc sp_RServiciosProgramados_mod
(
@UsuarioActivo varchar(10) = null,
@NUsuario int = null,
@CURP varchar(25) = null,
@NSoporte int = null,
@IDCategoria smallint = null,
@IDEspecialidad smallint = null,
@IDFederacion smallint = null,
@IDServicio smallint = null,
@IDSubServicio smallint = null,
@FechaInicial datetime = null,
@FechaFinal datetime = null,
@IDInstalacion smallint = null,
@accion int,
@IDUsuario int =null
)
as
declare @strSQL varchar(5500)
declare @FechaHoy datetime
select @FechaHoy= getdate()
if @accion=1
Begin
delete from TempRServiciosProgramados
where UsuarioActivo=@UsuarioActivo
SET @strSQL = ''
SET @strSQL = @strSQL + ' INSERT INTO TempRServiciosProgramados (Instalacion,Federacion,FechaInicio,FechaFin,Servi cio,'
SET @strSQL = @strSQL + ' SubServicio,Nombre,ApellidoPaterno,ApellidoMaterno ,IDSoporteServicio,NumeroAtleta,'
SET @strSQL = @strSQL +' CURP,IDCategoria,IDEspecialidad,IDFederacion,IDSer vicio,IDSubservicio,'
SET @strSQL = @strSQL + ' UsuarioActivo, IDInstalacion, Habitacion,Sexo,IDUsuario)'
SET @strSQL = @strSQL + 'SELECT I.Descripcion,F.Descripcion,convert(varchar(2),dat epart(mm,RAD.Fecha)) +'
SET @strSQL = @strSQL + 'convert(varchar(2),datepart(dd,RAD.Fecha)) + convert(varchar(4),datepart(yyyy,RAD.Fecha)),'
SET @strSQL = @strSQL + 'convert(varchar(2),datepart(hh,RAD.Hora))+ convert(varchar(2),datepart(mi,RAD.Hora)),'
SET @strSQL = @strSQL + 'S.Descripcion,SS.Descripcion,U.Nombre,U.ApellidoP aterno,
U.ApellidoMaterno,SP.IDSoporteServicio,'
SET @strSQL = @strSQL + ' U.NumeroAtleta,U.CURP,U.IDCategoria,U.IDEspecialid ad,SP.IDFederacion, ASE.IDServicio,ASE.IDSubservicio,"'+@UsuarioActivo +'",U.IdEstatus, ASE.IDInstalacion,ASE.NumeroHabitacion,U.Sexo,U.ID Usuario'
SET @strSQL = @strSQL + 'from'
SET @strSQL = @strSQL + ' AsignacionServicio as ASE,Federacion as F,Servicio as S,Subservicio as SS,Instalacion as I, SoporteServicio as SP,Usuario as U,'
SET @strSQL = @strSQL + 'Where'
SET @strSQL = @strSQL + ' ASE.IDServicio = S.IDServicio '
SET @strSQL = @strSQL + ' and ASE.IdServicio = SS.IDServicio '
SET @strSQL = @strSQL + ' and ASE.IdSubServicio = SS.IDSubservicio'
SET @strSQL = @strSQL + 'and RAD.IdSubServicio = SS.IDSubservicio'
SET @strSQL = @strSQL + 'and ASE.FechaFin>=convert(varchar(2),datepart(mm,@Fech aHoy)),'
SET @strSQL = @strSQL + '+convert(varchar(2),datepart(dd,@FechaHoy))+ convert(varchar(4),datepart(yyyy,@FechaHoy))'
if len(@IDSubServicio)>0
BEGIN
SET @strSQL = @strSQL + 'and R.IdSubServicio = ' + cast(@IDSubServicio as varchar(6))
END
SET @strSQL = @strSQL + 'and S.IdServicio = SubS.IdServicio'
if len(@IDServicio)>0
BEGIN
SET @strSQL = @strSQL + 'and S.IdServicio = ' + cast(@IDServicio as varchar(3))
END
SET @strSQL = @strSQL + 'and R.IdInstalacion = I.IdInstalacion'
if len(@IDInstalacion)>0
BEGIN
SET @strSQL = @strSQL + 'and R.IdInstalacion = ' + cast(@IDInstalacion as varchar(3))
END
SET @strSQL = @strSQL + 'and C.IdCategoria = U.IdCategoria'
if len(@IDCategoria)>0
BEGIN
SET @strSQL = @strSQL + 'and C.IdCategoria = ' + cast(@IDCategoria as varchar(2))
END
SET @strSQL = @strSQL + 'and F.IdFederacion= U.IdFederacion'
if len(@IDFederacion)>0
BEGIN
SET @strSQL = @strSQL + 'and F.IdFederacion= ' + cast(@IDFederacion as varchar(2))
END
SET @strSQL = @strSQL + 'and U.IdEspecialidad= Esp.IdEspecialidad'
if len(@IDEspecialidad)>0
BEGIN
SET @strSQL = @strSQL + 'and U.IdEspecialidad= ' + cast(@IDEspecialidad as varchar(2))
END
SET @strSQL = @strSQL + 'and U.IdEstatus= E.IdEstatus'
if len(@NUsuario)>0
BEGIN
SET @strSQL = @strSQL + 'and U.NumeroAtleta = ' + cast(@NUsuario as varchar(6))
END
if len(@NSoporte) > 0
BEGIN
SET @strSQL = @strSQL + 'and R.IdSoporteServicio = ' + cast(@NSoporte as varchar(6))
END
exec (@strSQL)
if len(@Curp)>0
BEGIN
delete from TempResumenOtorgados
where CURP <> @CURP
and UsuarioActivo=@UsuarioActivo
END
If len(@FechaInicial)>0
BEGIN
Select Instalacion,Federacion,
convert(varchar(2),datepart(mm,FechaInicio)) + '/'+ convert(varchar(2),datepart(dd,FechaInicio)) + '/'+ convert(varchar(4),datepart(yyyy,FechaInicio)),
convert(varchar(2),datepart(mm,FechaFin)) + '/'+ convert(varchar(2),datepart(dd,FechaFin)) + '/'+ convert(varchar(4),datepart(yyyy,FechaFin)),
Servicio,
Subservicio,Nombre,ApellidoPaterno,ApellidoMaterno ,IDSoporteServicio,NumeroAtleta,
CURP,IDCategoria,IDEspecialidad,IDFederacion,IDSer vicio,IDSubservicio,UsuarioActivo,IDInstalacion,
Habitacion,Sexo,IDUsuario
from TempRServiciosProgramados
where UsuarioActivo=@UsuarioActivo
order by IDInstalacion,IDFederacion,IDServicio,IDSubservici o,FechaInicio,NumeroAtleta,IDSoporteServicio
END
else
BEGIN
Select Instalacion,Federacion,
convert(varchar(2),datepart(mm,FechaInicio)) + '/'+ convert(varchar(2),datepart(dd,FechaInicio)) + '/'+ convert(varchar(4),datepart(yyyy,FechaInicio)),
convert(varchar(2),datepart(mm,FechaFin)) + '/'+ convert(varchar(2),datepart(dd,FechaFin)) + '/'+ convert(varchar(4),datepart(yyyy,FechaFin)),
Servicio,
Subservicio,Nombre,ApellidoPaterno,ApellidoMaterno ,IDSoporteServicio,NumeroAtleta,
CURP,IDCategoria,IDEspecialidad,IDFederacion,IDSer vicio,IDSubservicio,UsuarioActivo,IDInstalacion,
Habitacion,Sexo,IDUsuario
from TempRServiciosProgramados
where UsuarioActivo=@UsuarioActivo
order by IDInstalacion,IDFederacion,IDServicio,IDSubservici o,FechaInicio,NumeroAtleta,IDSoporteServicio
END
END
if @accion=2
begin
Select A.Estatus
from AsignacionServicio as AB,Actividad A
where AB.IDUsuario=@IDUsuario
and AB.IDSoporteServicio=@NSoporte
and AB.IDSoporteServicio=A.IDSoporteServicio
and AB.IDAsignacionServicio=A.IDAsignacionServicio
and AB.IDServicio is null
order by A.Estatus
end
return 0
GO