}
}
//generar el listado
setlocale(LC_ALL, "es_VE.UTF8");
$lobjPdf = new clsFpdf();
$lobjPdf->AddPage("L");
$lobjPdf->AliasNbPages();
$lobjPdf->SetFont("arial", "B", 8);
$lobjPdf->SetFont('Arial', '', 12);
//Table with 20 rows and 5 columns
$lobjPdf->SetWidths(array(20, 35, 26));
$pgsql = new Conexion();
$sql = "SELECT *,(CASE estatus WHEN '1' THEN 'ACTIVO' ELSE 'DESACTIVADO' END) AS estatus from biblioteca.ttema";
$i = -1;
$data = $pgsql->Ejecutar($sql);
if ($pgsql->Total_Filas($data) != 0) {
$lobjPdf->SetFillColor(0, 0, 140);
$avnzar = 90;
$altura = 7;
$anchura = 10;
$color_fondo = false;
$lobjPdf->SetFont('Arial', 'B', 10);
$lobjPdf->SetTextColor(0, 0, 0);
$lobjPdf->SetFont('Arial', '', 8);
$lobjPdf->SetTextColor(0, 0, 0);
$xxxx = 0;
while ($tperfil = $pgsql->Respuesta($data)) {
$lobjPdf->Row(array(ucwords($tperfil['codigo_tema']), ucwords($tperfil['descripcion']), ucwords($tperfil['estatus'])));
$lobjPdf->Cell($avnzar);
}
$lobjPdf->Output('documento', "I");
} else {
if (isset($_POST['seccion_desde']) && $_POST['seccion_desde'] != "0" && $clausuleWhere != "") {
$clausuleWhere .= " AND ps.seccion >= '" . $_POST['seccion_desde'] . "'";
}
}
if (isset($_POST['seccion_hasta']) && $_POST['seccion_hasta'] != "0" && $clausuleWhere == "") {
$clausuleWhere = "WHERE ps.seccion <= '" . $_POST['seccion_hasta'] . "'";
} else {
if (isset($_POST['seccion_hasta']) && $_POST['seccion_hasta'] != "0" && $clausuleWhere != "") {
$clausuleWhere .= " AND ps.seccion <= '" . $_POST['seccion_hasta'] . "'";
}
}
$pgsql = new Conexion();
$sql = "SELECT TO_CHAR(ps.fecha_inscripcion,'DD/MM/YYYY') AS fecha_inscripcion, aa.ano AS ano_academico, \n\tCASE WHEN rp.segundo_nombre IS NOT NULL AND rp.segundo_apellido IS NOT NULL THEN rp.cedula_persona||' - '||rp.primer_nombre||' '||rp.segundo_nombre||' '||rp.primer_apellido||' '||rp.segundo_apellido \n\tWHEN rp.segundo_nombre IS NULL AND rp.segundo_apellido IS NOT NULL THEN rp.cedula_persona||' - '||rp.primer_nombre||' '||rp.primer_apellido||' '||rp.segundo_apellido \n\tWHEN rp.segundo_nombre IS NOT NULL AND rp.segundo_apellido IS NULL THEN rp.cedula_persona||' - '||rp.primer_nombre||' '||rp.segundo_nombre||' '||rp.primer_apellido \n\tELSE rp.cedula_persona||' - '||rp.primer_nombre||' '||rp.primer_apellido END AS responsable,\n\tCASE WHEN per.segundo_nombre IS NOT NULL AND per.segundo_apellido IS NOT NULL THEN per.primer_nombre||' '||per.segundo_nombre||' '||per.primer_apellido||' '||per.segundo_apellido \n\tWHEN per.segundo_nombre IS NULL AND per.segundo_apellido IS NOT NULL THEN per.primer_nombre||' '||per.primer_apellido||' '||per.segundo_apellido \n\tWHEN per.segundo_nombre IS NOT NULL AND per.segundo_apellido IS NULL THEN per.primer_nombre||' '||per.segundo_nombre||' '||per.primer_apellido \n\tELSE per.primer_nombre||' '||per.primer_apellido END AS estudiante,\n\tTRIM(ps.cedula_persona) AS cedula_estudiante,CASE per.sexo WHEN 'F' THEN 'Femenino' ELSE 'Masculino' END AS sexo,TO_CHAR(per.fecha_nacimiento,'DD/MM/YYYY') AS fecha_nacimiento,\n\textract(year from age(per.fecha_nacimiento))||' Años y '||extract(month from age(per.fecha_nacimiento))||' Meses' AS edad,pa.descripcion AS lugar_nacimiento,e.descripcion AS entidad_federal,\n\tper.direccion,CASE ps.anio_a_cursar WHEN '1' THEN '1er Año' WHEN '2' THEN '2do Año' WHEN '3' THEN '3er Año' WHEN '4' THEN '4to Año' WHEN '5' THEN '5to Año' END AS anio_a_cursar,\n\tCASE ps.coordinacion_pedagogica WHEN '1' THEN 'Coordinación 1' WHEN '2' THEN 'Coordinación 2' WHEN '3' THEN 'Coordinación 3' WHEN '4' THEN 'Coordinación 4' WHEN '5' THEN 'Coordinación 5' END AS coordinacion_pedagogica,\n\tper.telefono_local,CASE ps.estado_salud WHEN '1' THEN 'Excelente' WHEN '2' THEN 'Bueno' WHEN '3' THEN 'Regular' END AS estado_salud,CASE ps.alergico WHEN 'Y' THEN 'Sí' ELSE 'No' END AS alergico,\n\tCASE ps.impedimento_deporte WHEN 'Y' THEN 'Sí' ELSE 'No' END AS impedimento_deporte,ps.especifique_deporte,CASE ps.materia_pendiente WHEN 'Y' THEN 'Sí' ELSE 'No' END AS materia_pendiente,ps.cual_materia,\n\tCASE ps.practica_deporte WHEN 'Y' THEN 'Sí' ELSE 'No' END AS practica_deporte,ps.cual_deporte,CASE ps.tiene_beca WHEN 'Y' THEN 'Sí' ELSE 'No' END AS tiene_beca,ps.organismo,CASE ps.tiene_hermanos WHEN 'Y' THEN 'Sí' ELSE 'No' END AS tiene_hermanos,\n\tps.cuantos_varones,ps.cuantas_hembras,CASE ps.estudian_aca WHEN 'Y' THEN 'Sí' ELSE 'No' END AS estudian_aca,ps.que_anio,ps.peso,ps.talla,ps.indice,CASE ps.tiene_talento WHEN 'Y' THEN 'Sí' ELSE 'No' END AS tiene_talento,ps.cual_talento,\n\tCASE WHEN pad.segundo_nombre IS NOT NULL AND pad.segundo_apellido IS NOT NULL THEN pad.primer_nombre||' '||pad.segundo_nombre||' '||pad.primer_apellido||' '||pad.segundo_apellido \n\tWHEN pad.segundo_nombre IS NULL AND pad.segundo_apellido IS NOT NULL THEN pad.primer_nombre||' '||pad.primer_apellido||' '||pad.segundo_apellido \n\tWHEN pad.segundo_nombre IS NOT NULL AND pad.segundo_apellido IS NULL THEN pad.primer_nombre||' '||pad.segundo_nombre||' '||pad.primer_apellido \n\tELSE pad.primer_nombre||' '||pad.primer_apellido END AS padre,TO_CHAR(pad.fecha_nacimiento,'DD/MM/YYYY') AS fecha_nacimiento_padre,TRIM(pad.cedula_persona) AS cedula_padre,pad.profesion AS profesion_padre,pad.grado_instruccion AS grado_instruccion_padre,\n\tpad.direccion AS direccion_padre,pad.telefono_local AS telefono_local_padre,\n\tCASE WHEN mad.segundo_nombre IS NOT NULL AND mad.segundo_apellido IS NOT NULL THEN mad.primer_nombre||' '||mad.segundo_nombre||' '||mad.primer_apellido||' '||mad.segundo_apellido \n\tWHEN mad.segundo_nombre IS NULL AND mad.segundo_apellido IS NOT NULL THEN mad.primer_nombre||' '||mad.primer_apellido||' '||mad.segundo_apellido \n\tWHEN mad.segundo_nombre IS NOT NULL AND mad.segundo_apellido IS NULL THEN mad.primer_nombre||' '||mad.segundo_nombre||' '||mad.primer_apellido \n\tELSE mad.primer_nombre||' '||mad.primer_apellido END AS madre,TO_CHAR(mad.fecha_nacimiento,'DD/MM/YYYY') AS fecha_nacimiento_madre,TRIM(mad.cedula_persona) AS cedula_madre,mad.profesion AS profesion_madre,mad.grado_instruccion AS grado_instruccion_madre,\n\tmad.direccion AS direccion_madre,mad.telefono_local AS telefono_local_madre,\n\tCASE WHEN rep.segundo_nombre IS NOT NULL AND rep.segundo_apellido IS NOT NULL THEN rep.primer_nombre||' '||rep.segundo_nombre||' '||rep.primer_apellido||' '||rep.segundo_apellido \n\tWHEN rep.segundo_nombre IS NULL AND rep.segundo_apellido IS NOT NULL THEN rep.primer_nombre||' '||rep.primer_apellido||' '||rep.segundo_apellido \n\tWHEN rep.segundo_nombre IS NOT NULL AND rep.segundo_apellido IS NULL THEN rep.primer_nombre||' '||rep.segundo_nombre||' '||rep.primer_apellido \n\tELSE rep.primer_nombre||' '||rep.primer_apellido END AS representante,TO_CHAR(rep.fecha_nacimiento,'DD/MM/YYYY') AS fecha_nacimiento_representante,TRIM(rep.cedula_persona) AS cedula_representante,rep.profesion AS profesion_representante,\n\trep.grado_instruccion AS grado_instruccion_representante,rep.direccion AS direccion_representante,rep.telefono_local AS telefono_local_representante,paren.descripcion AS parentesco,CASE ps.integracion_educativa WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_educativa,\n\tCASE ps.integracion_plomeria WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_plomeria,CASE ps.integracion_electricidad WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_electricidad,CASE ps.integracion_albanileria WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_albanileria,\n\tCASE ps.integracion_peluqueria WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_peluqueria,CASE ps.integracion_ambientacion WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_ambientacion,CASE ps.integracion_manualidades WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_manualidades,\n\tCASE ps.integracion_bisuteria WHEN 'Y' THEN 'Sí' ELSE 'No' END AS integracion_bisuteria,CASE ps.otra_integracion WHEN 'Y' THEN 'Sí' ELSE 'No' END AS otra_integracion,ps.especifique_integracion,sec.nombre_seccion,ps.observacion,CASE ps.fotocopia_ci WHEN 'Y' THEN 'Sí' ELSE 'No' END AS fotocopia_ci,\n\tCASE ps.partida_nacimiento WHEN 'Y' THEN 'Sí' ELSE 'No' END AS partida_nacimiento,CASE ps.boleta_promocion WHEN 'Y' THEN 'Sí' ELSE 'No' END AS boleta_promocion,CASE ps.certificado_calificaciones WHEN 'Y' THEN 'Sí' ELSE 'No' END AS certificado_calificaciones,\n\tCASE ps.constancia_buenaconducta WHEN 'Y' THEN 'Sí' ELSE 'No' END AS constancia_buenaconducta,CASE ps.fotos_estudiante WHEN 'Y' THEN 'Sí' ELSE 'No' END AS fotos_estudiante,CASE ps.boleta_zonificacion WHEN 'Y' THEN 'Sí' ELSE 'No' END AS boleta_zonificacion,CASE ps.fotocopia_ci_representante WHEN 'Y' THEN 'Sí' ELSE 'No' END AS fotocopia_ci_representante,\n\tCASE ps.fotos_representante WHEN 'Y' THEN 'Sí' ELSE 'No' END AS fotos_representante,CASE ps.otro_documento WHEN 'Y' THEN 'Sí' ELSE 'No' END AS otro_documento,ps.cual_documento,ps.observacion_documentos, \n\tCASE ps.estudiante_regular WHEN 'Y' THEN 'Sí' ELSE 'No' END AS estudiante_regular,ps.procedencia, CASE ps.estatus WHEN '1' THEN 'Activo' ELSE 'Desactivado' END AS estatus \n\tFROM educacion.tproceso_inscripcion ps \n\tINNER JOIN educacion.tano_academico aa ON ps.codigo_ano_academico = aa.codigo_ano_academico \n\tLEFT JOIN general.tpersona rp ON ps.cedula_responsable = rp.cedula_persona \n\tLEFT JOIN general.tpersona per ON ps.cedula_persona = per.cedula_persona \n\tLEFT JOIN general.tparroquia pa ON per.lugar_nacimiento = pa.codigo_parroquia \n\tLEFT JOIN general.tmunicipio m ON pa.codigo_municipio = m.codigo_municipio \n\tLEFT JOIN general.testado e ON m.codigo_estado = e.codigo_estado \n\tLEFT JOIN general.tpersona pad ON ps.cedula_padre = pad.cedula_persona \n\tLEFT JOIN general.tpersona mad ON ps.cedula_madre = mad.cedula_persona\n\tLEFT JOIN general.tpersona rep ON ps.cedula_representante = rep.cedula_persona\n\tLEFT JOIN general.tparentesco paren ON ps.codigo_parentesco = paren.codigo_parentesco \n\tLEFT JOIN educacion.tseccion sec ON ps.seccion = sec.seccion \n\t{$clausuleWhere}";
$query = $pgsql->Ejecutar($sql);
if ($pgsql->Total_Filas($query) == 0) {
$_SESSION['datos']['mensaje'] = "¡En estos momentos no se puede generar el reporte, porque la consulta no posee datos!";
header("Location: ../view/menu_principal.php?historico_inscripcion");
}
date_default_timezone_set('America/Caracas');
/** Se agrega la libreria PHPExcel */
require_once '../librerias/PHPExcel/PHPExcel.php';
// Se crea el objeto PHPExcel
$objPHPExcel = new PHPExcel();
// Se asignan las propiedades del libro
/*$objPHPExcel->getProperties()->setCreator("Codedrinks") //Autor
->setLastModifiedBy("Codedrinks") //Ultimo usuario que lo modificó
->setTitle("Reporte Excel con PHP y MySQL")
->setSubject("Reporte Excel con PHP y MySQL")
->setDescription("Reporte de alumnos")
->setKeywords("reporte alumnos carreras")
