<?php
require_once('tcpdf_include.php');
//============================================================+
// END OF FILE
//============================================================+
require_once "../../../controllers/c_carrera.php";
require_once "../../../models/m_carrera.php";

require_once "../../../controllers/c_estudiante.php";
require_once "../../../models/m_estudiante.php";

require_once "../../../controllers/c_mallacurricular.php";
require_once "../../../models/m_mallacurricular.php";

require_once "../../../controllers/c_matriculas.php";
require_once "../../../models/m_matriculas.php";

require_once "../../../controllers/c_titulacion.php";
require_once "../../../models/m_titulacion.php";
class imprimirRecord extends TCPDF{
    public function Footer() {
        // Position at 15 mm from bottom
        $this->SetY(-20);
        // Set font
        $this->SetFont('helvetica', 'I', 7);
        // Page number
        $this->Cell(0, 0, 'Este documento no es válido para propósito de transferencia de créditos, a menos que haya sido emitido directamente de la oficina de Secretaría Académica ', 0, false, 'R', 0, '', 0, false, 'T', 'M');
        $this->Cell(0, 10, 'con las firmas correspondientes y llevado el sello seco oficial del Instituto Superior Tecnológico CEMLAD', 0, false, 'R', 0, '', 0, false, 'T', 'M');
        $this->Cell(0, 20, 'Página '.$this->getAliasNumPage().'/'.$this->getAliasNbPages(), 0, false, 'C', 0, '', 0, false, 'T', 'M');
    }
    //===================PARAMETRIZACIÓN
    public $identificacion;
    public $carrera;
    
    public function traerRecordAcademico(){
    $carrera = $this->carrera;    
    $identificacion = $this->identificacion;  
    //===================LIBRERÍA TCPDF
    $pdf = new imprimirRecord(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
    $pdf->startPageGroup();
    $pdf->AddPage();
    //===================ENCABEZADO REPORTE
    //===================EXTRAER INFORMACIÓN    
    $item="carreradbk";
    $descar= ControladorCarrera::ctrListarCarrera($item, $carrera);
    $descarcod=$descar["codigo"];
    $titulo=$descar["titulo"];
    $descar=$descar["descripcion"];
    if(($descarcod=="TC")||($descarcod=="TAD")||($descarcod=="TGCA")||($descarcod=="TADCI")||($descarcod=="TGGH")){
        $director = "Lic. Lilia Gutiérrez MSc.";
    }
    if(($descarcod=="TSDS")||($descarcod=="TDS")||($descarcod=="TEGEL")||($descarcod=="TGEL")){
        $director = "Ing. Carlos Salazar MSc.";
    }
    if(($descarcod=="TSEI")||($descarcod=="TEI")){
        $director = "Psi. Raquel Parra";
    }
    $item="identificacion";
    $estudiante= ControladorEstudiante::ctrListarEstudiante($item, $identificacion);
    $nombres=$estudiante["papellido"]." ".$estudiante["sapellido"]." ".$estudiante["pnombre"]." ".$estudiante["snombre"];
    
    $ulper= ControladorMatriculas::ctrConsultarUltimaMatriculaPorEstudiante($estudiante["personadbk"], $carrera);
    
    $titulacion= ControladorTitulacion::ctrTitulacionPorEstudianteCarrera($carrera,$identificacion);
    $promtit=($titulacion["tribunal"]+$titulacion["oral"])/2;
    $bloque1 ='
        <table align="center">
            <tr>
                <td rowspan="6" width="120"><img src="images/logocemlad.png" WIDTH="100" HEIGHT="100"></td>
                <td align="center" width="420">
                    <h4>INSTITUTO TECNOLÓGICO SUPERIOR CEMLAD</h4>
                </td>                     
            </tr>
            <tr>
                <td align="center"><h6>REG. INST. SENESCYT 17-051</h6></td>
            </tr>
            <tr>
                <td align="center"><h6>Av. Mariscal Sucre S9-580 y Cañaris</h6></td>
            </tr>
            <tr>
                <td align="center"><h6>Quito, Ecuador</h6></td>
            </tr>
            <tr>
                <td align="center"><h6>info@cemlad.edu.ec</h6></td>
            </tr>
        </table><br><br><br>
        <table align="right">
            <tr>
                <td width="350"><p><b>ACTA N°:</b></p></td>
                <td width="150">'.$titulacion["acta"].'</td>                     
            </tr>
            <tr>
                <td ><p><b>EXPEDIENTE:</b></p></td>
                <td>'.$titulacion["expediente"].'</td> 
            </tr>
            <tr>
                <td><p><b>FOLIO N°:</b></p></td>
                <td>'.$titulacion["folio"].'</td> 
            </tr>            
        </table><br><br>
        <table align="center">            
            <tr>
                <td align="center"><h4>ACTA DE GRADO</h4></td>
            </tr>
            <tr>
                <td align="center"><h4>RESOLUCIÓN DE CONSEJO ACADÉMICO SUPERIOR DEL IST CEMLAD</h4></td>
            </tr>            
        </table><br><br>
        <table>            
            <tr>
                <td><p>Se otorga la siguiente Acta de Grado, bajo los siguientes procesos a saber:</p></td>
            </tr>                 
        </table><br><br>
        <table border="1px">
            <tr>
                <th width="100"><p><b> FECHA:</b></p></th>
                <th width="400" colspan="3"><p> '.$titulacion["fecha_acta"].'</p></th>
            </tr>
            <tr>
                <th width="100"><p><b> ESTUDIANTE:</b></p></th>
                <th width="400" colspan="3"><p> '.$nombres.'</p></th>
            </tr>
            <tr>
                <th><p><b> N° CÉDULA:</b></p></th>
                <th><p> '.$identificacion.'</p></th>
                <th><p><b> N° MATRÍCULA:</b></p></th>
                <th><p> '.$descarcod.$identificacion.'</p></th>    
            </tr>
            <tr>
                <th><p><b> CARRERA:</b></p></th>
                <th colspan="3"><p> '.$descar.'</p></th>
            </tr>            
        </table><br><br>
        <table align="center">            
            <tr>
                <td align="center"><h4>CONSIDERANDO</h4></td>
            </tr>           
        </table><br><br>
        <table>            
            <tr>
                <td><p><b>Que, </b>el Instituto Superior Tecnológico CEMLAD forma parte del sistema nacional de Educación Superior conforme a la Resolución N° RCP17-051 del 08 de noviembre del 2000 por el extinto CONESUP y, por lo tanto es parte del sistema de educación superior del Ecuador conforme el Art. 352 de la Constitución de la República de Ecuador.</p><br></td>
            </tr>             
            <tr>
                <td><p><b>Que, </b>el estudiante para graduarse ha de cumplir todos los requisitos estipulados en el Art. 25 del Reglamento Especial de la Unidad de Titulación del IST CEMLAD vigente; conforme lo estipulado en el Art. 21, inciso 3, Art. 65, del Régimen Académico (CES) vigente.</p><br></td>
            </tr> 
            <tr>
                <td><p><b>Que, </b>El Consejo Académico Superior en uso de las Facultades y atribuciones de las que se halla investido, conforme el Art. 17 del Reglamento General del IST CEMLAD:</p><br></td>
            </tr> 
        </table><br>
        <table align="center">            
            <tr>
                <td align="center"><h4>RESUELVE</h4></td>
            </tr>           
        </table><br><br>
        <table>            
            <tr>
                <td><p>Otorgar el Título de: <b>'.$titulo.'</b>, al Señor/a: '.$nombres.', CI.: '.$identificacion.'.</p><br></td>
            </tr>             
            <tr>
                <td><p><b>1.  </b>Bajo el siguiente Record Académico</p><br></td>
            </tr>            
        </table><br><br><br><br>
        <table align="center">            
            <tr>
                <td align="center"><h4>RECORD ACADÉMICO</h4></td>
            </tr>           
        </table><br><br>
        <table border="1px">
            <tr>
                <th width="120"><p><b> CARRERA:</b></p></th>
                <th width="380"><p> '.$descar.'</p></th>
            </tr>
            <tr>
                <th><p><b> ESTUDIANTE:</b></p></th>
                <th><p> '.$nombres.'</p></th>
            </tr>
            <tr>
                <th><p><b> N° CÉDULA:</b></p></th>
                <th><p> '.$identificacion.'</p></th>
            </tr>
            <tr>
                <th><p><b> COD. ESTUDIANTE:</b></p></th>
                <th>'.$descarcod.$identificacion.'</th>
            </tr>
        </table><br><br>        
        <table align="center" border="1">
            <tr>
                <td width="80" align="center"><b> CODIGO DE ASIGNATURA </b></td>
                <td width="210" align="center"><b> ASIGNATURA </b></td>
                <td width="45" align="center"><b> NIVEL </b></td>
                <td width="45" align="center"><b> CREDITOS </b></td>
                <td width="65" align="center"><b> APORTES </b></td>
                <td width="55" align="center"><b> ESTADO </b></td>
            </tr>';   
            //<option value='1'>NORMAL</option>                 
            //<option value='2'>HOMOLOGADO</option>
            //<option value='3'>EXAMEN POR SUFICIENCIA</option>
            if($carrera == 19){
                $r= ControladorMatriculas::ctrBuscarItinerario($codestudiante, $carrera, "GS");                
                foreach ($r as $key => $value){                    
                    $tot1=$value['total'];                      
                }                
                if($tot1>0){
                    $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraGS($carrera);                    
                }                
                $r= ControladorMatriculas::ctrBuscarItinerario($codestudiante, $carrera, "RE");                
                foreach ($r as $key => $value){                    
                    $tot2=$value['total'];                      
                }                
                if($tot2>0){
                    $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraRE($carrera);
                }
                
                if($tot1 == 0 && $tot2 == 0){
                    $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraNA($carrera);
                }    
            }else{
                if($carrera == 20){
                   $r= ControladorMatriculas::ctrBuscarItinerario($codestudiante, $carrera, "TRI");                
                    foreach ($r as $key => $value){                    
                        $tot1=$value['total'];                      
                    }                
                    if($tot1>0){
                        $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraTRI($carrera);                    
                    }                
                    $r= ControladorMatriculas::ctrBuscarItinerario($codestudiante, $carrera, "COS");                
                    foreach ($r as $key => $value){                    
                        $tot2=$value['total'];                      
                    }                
                    if($tot2>0){
                        $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraCOS($carrera);
                    }

                    if($tot1 == 0 && $tot2 == 0){
                        $registros= ControladorMallaCurricular::ctrListarMallaPorCarreraNA($carrera);
                    }     
                }else{
                    $registros= ControladorMallaCurricular::ctrListarMallaPorCarrera($carrera);
                }                
            } 
            $promrecord=0;
            $countrecord=0;
            foreach ($registros as $key => $value){
                $codasig=$value['codigo'];
                $desasig=$value['descripcion'];            
                $nivel=$value['nivel'];  
                $credi=$value['creditos'];
                $asignatura=$value['asignatura'];
                if($asignatura==34)$ctg=$value['creditos'];
                $registros2= ControladorMatriculas::ctrListarCalificaciones($estudiante["personadbk"],$asignatura,$carrera);
                $nfinal='-';
                $aprada='-';   
                $tipo=0;
                foreach ($registros2 as $key2 => $value2){
                    $nfinal=$value2['nfinal'];  
                    $aprada=$value2['aprada'];
                    $tipo=$value2['tipo'];
                }
                if($tipo==1){
                    if($nfinal>=7){
                        $bloque1=$bloque1."<tr><td align='center'><p>$codasig</p></td><td align='center'><p>$desasig</p></td><td align='center'><p>$nivel</p></td><td align='center'><p>$credi</p></td><td align='center'><p>$nfinal</p></td><td align='center'><p>A</p></td></tr>";   
                        
                    }else{
                        $bloque1=$bloque1."<tr><td align='center'><p>$codasig</p></td><td align='center'><p>$desasig</p></td><td align='center'><p>$nivel</p></td><td align='center'><p>$credi</p></td><td align='center'><p>$nfinal</p></td><td align='center'><p>R</p></td></tr>";  
                    }                                             
                }else{
                    if($tipo==2){
                        $bloque1=$bloque1."<tr><td align='center'><p>$codasig</p></td><td align='center'><p>$desasig</p></td><td align='center'><p>$nivel</p></td><td align='center'><p>$credi</p></td><td align='center'><p>$nfinal</p></td><td align='center'><p>H</p></td></tr>";                                    
                    }else{
                        if($tipo==3){
                            $bloque1=$bloque1."<tr><td align='center'><p>$codasig</p></td><td align='center'><p>$desasig</p></td><td align='center'><p>$nivel</p></td><td align='center'><p>$credi</p></td><td align='center'><p>$nfinal</p></td><td align='center'><p>SF</p></td></tr>";                                    
                        }else{
                            if($tipo==0){
                                $bloque1=$bloque1."<tr><td align='center'><p>$codasig</p></td><td align='center'><p>$desasig</p></td><td align='center'><p>$nivel</p></td><td align='center'><p>$credi</p></td><td align='center'><p>-</p></td><td align='center'><p>-</p></td></tr>";                                    
                            }
                        }
                    }
                } 
                if(($tipo==1 && $nfinal>=7)||($tipo==2)||($tipo==3)){
                    $promrecord=$promrecord+$nfinal;
                    $countrecord=$countrecord+1;
                }
            }                 
        $bloque1=$bloque1."</table><br><br>";
        if($titulacion["tipo"]==6){                    
            $bloque1=$bloque1."
            <table>                                   
                <tr>
                    <td><p><b>2.  </b>El/la Señor/a, estudiante, conforme al Art. 21 del Reglamento de Prácticas y Pasantías Pre-Profesionales y Vinculación con la Sociedad, del IST CEMLAD. Ha aprobado 400 horas de práctica Pre-Profesional. En consecuencia: <b>APRUEBA</b> el requisito exigido.</p><br></td>
                </tr>            
                <tr>
                    <td><p><b>3.  </b>En cumplimiento al Art. 9 del Reglamento de Unidad de Titulación, una vez que el Consejo Directivo ha declarado en Aptitud se ha rendido el Examen Complexivo, con los siguientes resultados:</p><br></td>
                </tr>            
            </table><br><br>";
            $bloque1=$bloque1.'
            <table border="1px" align="center">
                <tr>
                    <th width="400"><p>Calificación del Examen Complexivo</p></th>
                    <th width="100"><p>'.$titulacion["examen"].'/4.00</p></th>
                </tr>
                <tr>
                    <th><p> Calificación estudio de caso</p></th>
                    <th><p>'.$titulacion["oral"].'/6.00</p></th>
                </tr>
                <tr>
                    <th><p> Promedio de Titulación</p></th>
                    <th><p>'.$titulacion["promedio"].'</p></th>
                </tr>           
            </table><br><br>
            ';
        }else{
            if($titulacion["tipo"] != 6){                    
                $bloque1=$bloque1."
                <table>                                   
                    <tr>
                        <td><p><b>2.  </b>El/la Señor/a, estudiante, conforme al Art. 21 del Reglamento de Prácticas y Pasantías Pre-Profesionales y Vinculación con la Sociedad, del IST CEMLAD. Ha aprobado 400 horas de práctica Pre-Profesional. En consecuencia: <b>APRUEBA</b> el requisito exigido.</p><br></td>
                    </tr>            
                    <tr>
                        <td><p><b>3.  </b>En cumplimiento al Art. 9 del Reglamento de Unidad de Titulación, una vez que el Consejo Directivo ha declarado en Aptitud se ha elaborado, presentado y aprobado del Proyecto de Grado, con los siguientes resultados:</p><br></td>
                    </tr>            
                </table><br><br>";
                $bloque1=$bloque1.'
                <table border="1px" align="center">
                    <tr>
                        <th width="200"><p>Título del Proyecto de Grado</p></th>
                        <th width="300"><p>'.$titulacion["titulo"].'</p></th>
                    </tr>
                    <tr>
                        <th><p> Calificación por el Tribunal de Análisis</p></th>
                        <th><p>'.$titulacion["tribunal"].'/10.00</p></th>
                    </tr>
                    <tr>
                        <th><p> Calificación de Grado Oral</p></th>
                        <th><p>'.$titulacion["oral"].'/10.00</p></th>
                    </tr>   
                    <tr>
                        <th><p>Promedio Titulación</p></th>
                        <th><p>'.bcdiv($promtit, '1', 2).'</p></th>
                    </tr>  
                </table><br><br>
                ';
            }
        }                
        $bloque1=$bloque1.'
        <table align="center">            
            <tr>
                <td align="center"><h4>RESUMEN GENERAL</h4></td>
            </tr>           
        </table><br><br>';
        $bloque1=$bloque1."
        <table>                                   
            <tr>
                <td><p>El/la estudiante $nombres, con Cédula de Identidad N° $identificacion, quien aprobó todos los procesos académicos requeridos en la Carrera de: $descar las asignaturas que constan en la Malla Curricular y dio cumplimiento a los demás requisitos de grado, exigidos por el Instituto, con las siguientes notas:</p><br></td>
            </tr>                                
        </table><br>";
        if($titulacion["tipo"]=="6"){
            $promfin=(bcdiv($promrecord/$countrecord, '1', 2)+$titulacion["promedio"])/2;
            $bloque1=$bloque1.'
            <table border="1px" align="center">
                <tr>
                    <th width="400"><p><b> Promedio de Record Académico:</b></p></th>
                    <th width="100"><p>'.bcdiv($promrecord/$countrecord, '1', 2).'</p></th>
                </tr>
                <tr>
                    <th><p><b> Examen Complexivo:</b></p></th>
                    <th><p>'.$titulacion["promedio"].'</p></th>
                </tr>
                <tr>
                    <th><p><b> PROMEDIO TOTAL</b></p></th>
                    <th><p>'.$promfin.'</p></th>
                </tr>
                <tr>
                    <th><p><b> Práctica Pre Profesinoal y Vinculación con la Sociedad</b></p></th>
                    <th>APROBADO</th>
                </tr>
            </table><br><br>
            <table>
                <tr>
                    <td><p>Este estudiante se considera en condición honorable con el Instituto Superior Tecnológico CEMLAD, conforme al Art. 67 y 68 del Régimen Académico Vigente - CES, a menos que se haya declarado lo contrario. Dado en el DM Quito, con fecha: '.$titulacion["fecha_acta"].' dan fe:</p></td>
                </tr>
            </table><br><br><br><br>';
           $bloque1=$bloque1.'
                <table align="center">   
                    <tr><td height="50"></td><td></td></tr>
                    <tr>               
                        <td><p>Lic. Lilia Gutiérrez MSc.</p></td>
                        <td><p>Rev. César Parra</p></td>
                    </tr>
                    <tr>
                        <td><p>RECTORA DEL IST CEMLAD</p></td>
                        <td><p>PRESIDENTE DEL CONSEJO DIRECTIVO</p></td>
                    </tr>
                    <tr><td height="50"></td><td></td></tr>
                    <tr>
                        <td><p>Psi. Andrea Parra</p></td>
                        <td><p>'.$director.'</p></td>
                    </tr>
                    <tr>
                        <td><p>DIRECTORA DE BIENESTAR ESTUDIANTIL</p></td>
                        <td><p>DIRECTOR/A DE CARRERA</p></td>
                    </tr>
                </table><br><br>    
                <table align="center">   
                    <tr><td height="50"></td></tr>
                    <tr>               
                        <td><p>Lic. Salomé Parra Ms.</p></td>
                    </tr>              
                    <tr>               
                        <td><p>Certifica: Vicerrectora</p></td>
                    </tr>              
                </table><br><br> 
            ';
        }else{
            if($titulacion["tipo"]!=6){
                $promfin=(bcdiv($promrecord/$countrecord, '1', 2)+bcdiv($promtit, '1', 2))/2;
                $bloque1=$bloque1.';
                <table border="1px" align="center">
                    <tr>
                        <th width="400"><p><b> Promedio de Record Académico:</b></p></th>
                        <th width="100"><p>'.bcdiv($promrecord/$countrecord, '1', 2).'</p></th>
                    </tr>
                    <tr>
                        <th><p><b> Promedio de Titulación:</b></p></th>
                        <th><p>'.bcdiv($promtit, '1', 2).'</p></th>
                    </tr>
                    <tr>
                        <th><p><b> PROMEDIO TOTAL</b></p></th>
                        <th><p>'.$promfin.'</p></th>
                    </tr>
                    <tr>
                        <th><p><b> Práctica Profesinoal y Vinculación con la Sociedad</b></p></th>
                        <th>APROBADO</th>
                    </tr>
                </table><br><br>
                <table>
                    <tr>
                        <td><p>Este estudiante se considera en condición honorable con el Instituto Superior Tecnológico CEMLAD, conforme al Art. 67 y 68 del Régimen Académico Vigente - CES, a menos que se haya declarado lo contrario. Dado en el DM Quito, con fecha: '.$titulacion["fecha_acta"].' dan fe:</p></td>
                    </tr>
                </table><br><br><br><br><br><br><br>';
                $bloque1=$bloque1.'
                <table align="center">   
                    <tr><td height="50"></td><td></td></tr>
                    <tr>               
                        <td><p>Lic. Lilia Gutiérrez MSc.</p></td>
                        <td><p>Rev. César Parra</p></td>
                    </tr>
                    <tr>
                        <td><p>RECTORA DEL IST CEMLAD</p></td>
                        <td><p>PRESIDENTE DEL CONSEJO DIRECTIVO</p></td>
                    </tr>
                    <tr><td height="50"></td><td></td></tr>
                    <tr>
                        <td><p>Psi. Andrea Parra</p></td>
                        <td><p>'.$director.'</p></td>
                    </tr>
                    <tr>
                        <td><p>DIRECTORA DE BIENESTAR ESTUDIANTIL</p></td>
                        <td><p>DIRECTOR/A DE CARRERA</p></td>
                    </tr>
                </table><br><br>    
                <table align="center">   
                    <tr><td height="50"></td></tr>
                    <tr>               
                        <td><p>Lic. Salomé Parra Ms.</p></td>
                    </tr>              
                    <tr>               
                        <td><p>Certifica: Vicerrectora</p></td>
                    </tr>              
                </table><br><br> 
                ';
            }
        }                                                   
    $pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
    $pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
    // set auto page breaks
    $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
    $pdf->writeHTML($bloque1, false, false, false, false, '');
    //===================SALIDA DEL ARCHIVO
    $pdf->Output('record-academico'.$_GET["id"].'.pdf');
    }
}
$a = new imprimirRecord();
$a -> identificacion = $_GET["id"];
$a -> carrera = $_GET["carrera"];
$a -> traerRecordAcademico();

?>
 