sql Correccióndelistado de enrolados a un Curso-Actividad - EducaciónConcontinua

Posted 2021-05-13

----------------------------INICIO PROCEDIMIENTO ------------------------
IF OBJECT_ID('sp_CE_ListarEnroladosCalificacionesActividad', 'P') IS NOT NULL
      DROP PROC sp_CE_ListarEnroladosCalificacionesActividad
GO

CREATE PROCEDURE sp_CE_ListarEnroladosCalificacionesActividad
@iFolioGrupo INT ,
@idPrograma INT 
--@Variables INT
/* --------------------------------------------------------------------------------------------------------------
FECHA		   |    AUTOR		|DESCRIPCION
11/Abr/2017    | Luis Bernal	|
--------------------------------------------------------------------------------------------------------------*/
AS
BEGIN
	SET NOCOUNT ON;
	SET LANGUAGE spanish;
	SET DATEFORMAT MDY;
   --CONTENIDO PROCEDIMIENTO
   
	SELECT TR.iFolioTrayectoriaEC ,
		   TR.iFolioEnrolamiento ,
		   cepd.idPrograma ,
		   TR.dCalificacion ,
		   TR.sCalificacion ,
		   TR.dFechaRegistro ,
		   TR.idUsuarioReg ,
		   TR.sNombre ,
		   TR.sMatricula ,
		   TR.sTipoPersona ,
		   TR.iFolioGrupo ,
			cepd.sNombre AS sActividad
			, TR.sTokenPreparame 
	FROM ( SELECT DISTINCT 
				  ISNULL(ceta.iFolioTrayectoriaEC,0) AS iFolioTrayectoriaEC ,
				  cce.iFolio AS iFolioEnrolamiento ,
				  ceta.idPrograma ,
				  ceta.dCalificacion ,
				  CASE WHEN ceta.dCalificacion IS NULL THEN '' ELSE  dbo.fnRedondearCalificacionV2(1,ceta.dCalificacion,0,0,0,0,0) END AS sCalificacion ,
				  ceta.dFechaRegistro ,
				  ceta.idUsuarioReg AS idUsuarioReg ,
				  (vpae.sNombre + ' ' + vpae.sApellidoP + ' ' + vpae.sApellidoM) AS sNombre
				 ,vpae.sClave AS sMatricula
				 ,vpae.sTipoPersona
				 ,cce.iFolioGrupo
				 ,cpt.sToken AS  sTokenPreparame
			FROM dbo.Ctrl_CursosEnrolados AS cce
			INNER JOIN dbo.vPersonasDetalleAcademicoEnrolamiento vpae ON vpae.idPersona = cce.idPersona
			LEFT JOIN dbo.Ctrl_PersonasToken AS cpt ON cpt.idPersona = cce.idPersona
			LEFT JOIN dbo.Ctrl_ECTrayectoriaAcademica AS ceta ON ceta.iFolioEnrolamiento = cce.iFolio
		) TR, dbo.Cat_ECProgramaDetalle AS cepd
	WHERE TR.iFolioGrupo = @iFolioGrupo
	AND cepd.idPrograma = @idPrograma

END