<?php
define ('FPDF_FONTPATH','/var/www/html/archivo/fpdf153/font/');
require('/var/www/html/archivo/fpdf153/fpdf.php');

class PDF extends FPDF
{
//Cabecera de pagina
function Header()
{
       $area=$_POST['narea'];
       $secc=$_POST['sseccion'];
       //$serie=$_POST['serie'];
       $nano1=$_POST['nano'];
       $nano=$nano1+1;
       $fecha1=$_POST['fecha'];
       $serie="4S.4.1";
       //$fecha1=date("d-m");
       $fecha="$fecha1"."-"."$nano";
       pg_connect("dbname='inv_expedientes' port='5432' user='telerin' password='aplicaciones'") or die ("Error en la conexion");


 $querybhomol="select homologa from cat_series1 where cve_serie='$serie' and cve_cat like'%$nano1'";
                  $datohom=pg_query($querybhomol);
       $homologas=pg_fetch_result($datohom,0); 
 
       $query="SELECT nom_area,titular_area,nom_direccion FROM cat_area,cat_direccion WHERE 
       cat_area.cve_direccion=cat_direccion.cve_direccion and cat_area.cve_area='$area'";
       $narea=pg_query($query);
       $nombarea=pg_fetch_result($narea,0);
       $titular=pg_fetch_result($narea,1); 
       $direccion=pg_fetch_result($narea,2);
   

       $querynsecc="SELECT cve_seccion,nom_seccion FROM cat_seccion WHERE cve_seccion='$secc'";
       $nsecc=pg_query($querynsecc);
       $cvesc=Strtoupper(pg_fetch_result($nsecc,0));
       $nsec=Strtoupper(pg_fetch_result($nsecc,1)); 
       $concatnsecc1="$cvesc".": "."$nsec";   

       $search = array("Á", "É", "Í", "Ó", "Ú", "á", "é", "í", "ó", "ú", "Ñ", "ñ");
       $replace = array("Á", "É", "Í", "Ó", "Ú", "Á", "É", "Í", "Ó", "Ú", "Ñ", "Ñ");


       $concatnsecc=str_replace($search, $replace, $concatnsecc1); 
  

       $querybcser="SELECT distinct(cve_serie) AS cserie,TIPO_SERIE,SERIES FROM cat_series1 WHERE cat_series1.homologa=$homologas and cat_series1.cve_serie='$serie'";
       $datocser=pg_query($querybcser);
       $cveserie=pg_fetch_result($datocser,0);
       $tipo=pg_fetch_result($datocser,1);
       $tiposer=pg_fetch_result($datocser,2);
    

       if($tipo=='SUB'){
          $qbcseri="SELECT nom_serie,cve_serie from cat_series1 WHERE cat_series1.cve_serie ='$tiposer' and  CVE_CAT LIKE'%$nano1' ";
          $dcser=pg_query($qbcseri);
          $nsers=pg_fetch_result($dcser,0);
          $cvesers=pg_fetch_result($dcser,1);
          $concatserser1=Strtoupper("$cvesers".": "."$nsers");

          $search = array("Á", "É", "Í", "Ó", "Ú", "á", "é", "í", "ó", "ú", "Ñ", "ñ");
          $replace = array("Á", "É", "Í", "Ó", "Ú", "Á", "É", "Í", "Ó", "Ú", "Ñ", "Ñ");
          $concatserser=str_replace($search, $replace, $concatserser1);
       }


       $querybser="SELECT distinct(datos_generales.cve_serie) AS cserie,nom_serie FROM cat_series1,datos_generales
       WHERE cat_series1.homologa=$homologas and cat_series1.cve_serie='$serie' and cat_series1.cve_serie=datos_generales.cve_serie  and cve_area='$area'";
    
       $datoser=pg_query($querybser);
       $filabser=pg_num_rows($datoser);

      // for($bs=0;$bs<$filabser;$bs++){
          //$cveserie=pg_fetch_result($datoser,$bs,0);
          $nomserie=pg_fetch_result($datoser,1); 
          $concatn="$cveserie".""."$concatn";
       // }
        
        $codigo="DGBEH".""."$area"."*"."$concatn"; 
        $concatn11=Strtoupper("$concatn".": "."$nomserie");    

        $search = array("Á", "É", "Í", "Ó", "Ú", "á", "é", "í", "ó", "ú", "Ñ", "ñ");
        $replace = array("Á", "É", "Í", "Ó", "Ú", "Á", "É", "Í", "Ó", "Ú", "Ñ", "Ñ");


       $concatn1=str_replace($search, $replace, $concatn11); 
  
        $this->Image('imagenes/hgo.jpg',23,4,25);
        $this->Image('imagenes/bachillerato.jpg',300,6,55);
	//Arial bold 15
	$this->SetFont('Arial','B',11);
	//Movernos a la derecha
	//Título
        

        $this->SetXY(285,20);
        $this->Cell(285,20,'TIPO DE INVENTARIO: TRÁMITE ',0,1,'L');

        $this->SetXY(285,23);
        $this->Cell(285,23,'FECHA DE EMISIÓN: ',0,1,'');
        $this->SetXY(324,23);

        $this->Cell(324,23,$fecha1,0,1,'');

        $this->SetXY(257,26);
	 $this->Cell(0,26,'HOJA '.$this->PageNo().' DE {nb}',0,0,'C');
        $pagina=$this->PageNo();


        $this->SetXY(285,29);
        $this->Cell(285,29,'CÓDIGO:',0,1,'');

        $this->SetXY(303,42);
        $this->MultiCell(45,3.49,$codigo,0,'','j');

        $this->SetFillColor(200,200,200);
        $this->Rect(23,60,55,8.24,'FD');
        $this->SetXY(33,43);
        $this->Cell(33,43,'UBICACIÓN FÍSICA',0,'C');

        $this->SetFillColor(200,200,200);
        $this->Rect(78,60,55,8.24,'FD');
        $this->SetXY(70,43);
        $this->Cell(70,43,'UBICACIÓN TOPOGRÁFICA',0,1,'C');

        $this->SetFillColor(200,200,200);
        $this->Rect(133,60,67,8.24,'FD');
        $this->SetXY(112,43);
        $this->Cell(115,43,'NO. EXPEDIENTE',0,1,'C');

        $this->SetFillColor(200,200,200);
        $this->Rect(200,60,62,8.24,'FD');
        $this->SetXY(154,43);
        $this->Cell(154,43,'DESCRIPCIÓN DEL EXPEDIENTE',0,1,'C');

        $this->SetFillColor(200,200,200);
        $this->Rect(262,60,44,4,'FD');
        $this->SetXY(190,41.5);
        $this->Cell(190,41.5,'FECHAS EXTREMAS',0,1,'C');
        $this->SetFillColor(200,200,200);
        $this->Rect(262,64,22,4.24,'FD');
        $this->SetXY(183,44);
        $this->Cell(183,44,'INICIO',0,1,'C');

        $this->SetFillColor(200,200,200);
        $this->Rect(284,64,22,4.24,'FD');
        $this->SetXY(196,44);
        $this->Cell(196,44,'FINAL',0,1,'C');
        
        $this->SetFillColor(200,200,200);
        $this->Rect(305,60,49,8.24,'FD');
        $this->SetXY(220,43);
        $this->Cell(220,43,'OBSERVACIONES',0,1,'C');
   
        $this->SetFont('Arial','B',13);
        $this->SetXY(150,15);
	 $this->Cell(18,15,'INVENTARIO DOCUMENTAL',0,1,'B');
        $this->SetFont('Arial','B',11);
        $this->SetXY(23,20);
	 $this->Cell(23,20,'FONDO:',0,1,'');
    

        $this->SetXY(23,23);
	 $this->Cell(23,23,'UNIDAD ADMINISTRACIÓN:',0,1,'B');
        $this->SetXY(23,26);
	 $this->Cell(23,26,'UNIDAD GENERADORA:',0,1,'B');
        $this->SetXY(23,29);
	 $this->Cell(23,29,'NOMBRE DEL RESPONSABLE:',0,1,'B');
        $this->SetXY(23,32);
	 $this->Cell(23,32,'SECCIÓN: ',0,1,'B');
        

        $this->SetXY(23,35);
	 $this->Cell(23,35,'SERIE:',0,1,'B');
          
        $this->SetXY(23,38);
	 $this->Cell(23,38,'SUBSERIE:',0,1,'B');


        $this->SetFont('Arial','B',11);
        $this->SetXY(39,20);
	 $this->Cell(39,20,'BACHILLERATO DEL ESTADO DE HIDALGO',0,1,'b');
        $this->SetXY(75,23);
	 $this->Cell(75,23,$direccion,0,1,'');
        $this->SetXY(69,26);
	 $this->Cell(69,26,$nombarea,0,1,'B');
        $this->SetXY(82,29);
	 $this->Cell(82,29,$titular,0,1,'B');
        $this->SetXY(42.5,32);
	 $this->Cell(42.5,32,$concatnsecc,0,1,'B');
        if($tipo!='SUB'){
           $this->SetXY(37,50.5);
	    $this->MultiCell(220,3.8, $concatn1,0,'1','J');
        

        }else{  
           $this->SetXY(37,50.5);
	    $this->MultiCell(220,3.8,$concatserser,0,'1','J');
           $this->SetXY(44.5,55.1); 
	    $this->MultiCell(220,3.8, $concatn1,0,'1','J');
        

        }


	//Salto de línea
	$this->Ln(0);
}
//Pie de página

function Footer()
{
       //BUSCA DATOS DE QUIEN FIRMA INVENTARIO EN TRÁMITE
       $area=$_POST['narea'];
      
       
       $fecha=date("d-m-Y");
       pg_connect("dbname='inv_expedientes' port='5432' user='telerin' password='aplicaciones'") or die ("Error en la conexion"); 
       $queryres="SELECT titular_area,nom_responsable FROM cat_area WHERE  cve_area='$area'";
       $datores=pg_query($queryres);
       $titulara=pg_fetch_result($datores,0);
       $responsable=pg_fetch_result($datores,1); 


       $queryenlace="SELECT nom_responsable FROM cat_area WHERE  cve_area='1.3'";
       $datoenlace=pg_query($queryenlace);
       $nenlace=pg_fetch_result($datoenlace,0);
       

        $this->SetFont('Arial','B',11);
        $this->SetXY(5,260);
        $this->Line(15,200,90,200);
        $this->SetXY(15,180);
        $this->Cell(70,10,'ELABORÓ',2,1,'C');
        $this->SetXY(35,197);
        $this->Cell(35,10,$responsable,2,1,'C');
        $this->SetXY(35,201);
        $this->Cell(35,10,'UNIDAD DE ARCHIVO EN TRÁMITE',2,1,'C');
      

        //$this->SetXY(207,260);
        $this->Line(230,200,150,200);
        $this->SetXY(150,180);
        $this->Cell(80,10,'AUTORIZÓ',0,0,'C');
        $this->SetXY(127,197);
        $this->Cell(127,10,$nenlace,2,1,'C');
        $this->SetXY(127,201);
        $this->Cell(127,10,'ENLACE NORMATIVO',2,1,'C');

        $this->SetXY(200,260);
        $this->Line(270,200,354,200);
        $this->SetXY(280,180);
        $this->Cell(70,10,'VALIDÓ',0,0,'C');
        $this->SetXY(193,197);
        $this->Cell(240,10,'ÓRGANO RECTOR',2,1,'C');
 
      }
}

//Creación del objeto de la clase heredada
$pdf=new PDF('L','mm','Legal');
$pdf->AliasNbPages();
$pdf->AddPage();
$pdf->SetFont('Arial','',11);
$area=$_POST['narea'];
$secc=$_POST['sseccion'];
//$serie=$_POST['serie'];
$ano=$_POST['nano']; //año que se debe reportar
$anotr=$ano+1; //año en que se elabora el documento, es un año posterior 
$anop='2007';
$serie="4S.4.1";
$concatcod="DGBEH"."$area*"."$serie/";

$tiempovigencia=$anotr-2008; //calcula el tiempo que ha transcurrido del año inicial con el año en que se elabora el documento


$ubica='Circuito Ex-Hacienda la Concepción, Lte. 17, San Juan Tilcuautla, Mpio. de San Agustín Tlaxiaca';


pg_connect("dbname='inv_expedientes' port='5432' user='telerin' password='aplicaciones'") or die ("Error en la conexion"); 

         $borrareg="delete from tmp_inventario";
         $borrareg1=pg_query($borrareg);


for($t=0;$t<$tiempovigencia;$t++){

   $anop=$anop+1; //calcula los años que se deben reportar  

   $querybhomol="select at,homologa from cat_series1 where cve_serie='$serie' and cve_cat like'%$anop'";
   $datohom=pg_query($querybhomol);
   $at=pg_fetch_result($datohom,0);
   $homologas=pg_fetch_result($datohom,1);
    
   if(($tiempovigencia<=$at) OR ($anop==$ano) or ($at=='0') OR ($at=='Ø')){//COMPARA EL TIEMPO DE VIGENCIA DEL EXPEDIENTE CON LOS AÑOS TRANSCURRIDOS O CON EL AÑO QUE SE ESTÁ REPORTANDO

      $querybdts="select lugar,codigo,asunto,fecha_inicio,fecha_final,observacion,substring(fecha_inicio,7,4) as anoi,substring(fecha_final,7,4) as anof,ano,cve_serie,no_tomo,no_caja,lugar1 
      from datos_generales where cve_area='$area' and cve_serie='$serie' and  (ano=$anop) and baja_por_error is null  order by ANO,codigo";
      $datoat=pg_query($querybdts);
      $filadat=pg_num_rows($datoat);
echo"$querybdts";

   //and ((ano>=2008) and (ano<=$ano))

      for($i=0;$i< $filadat;$i++){ 

              $lugar=pg_fetch_result($datoat,$i,0); 
              $codigor=pg_fetch_result($datoat,$i,1);
              $asunto=pg_fetch_result($datoat,$i,2);
              $fechai=pg_fetch_result($datoat,$i,3);
              $fechaf=pg_fetch_result($datoat,$i,4);
              $observac=pg_fetch_result($datoat,$i,5);
              $anoin=pg_fetch_result($datoat,$i,6);
              $anofi=pg_fetch_result($datoat,$i,7);              
              $anoexp=pg_fetch_result($datoat,$i,8);
              $cveser=pg_fetch_result($datoat,$i,9);
              $notomo=pg_fetch_result($datoat,$i,10);
              $nocaja=pg_fetch_result($datoat,$i,11);
              $lugar1=pg_fetch_result($datoat,$i,12);
              $baja=pg_fetch_result($datoat,$i,13);


              if(($lugar=='Caja') or ($lugar=='CD')){
                 $ubicatp=$lugar1;
              }else{
                $ubicatp="$lugar"." "."$lugar1"." "."$nocaja";
                
              }

              $valor1='/';

        
              $posicion1=strpos($codigor,$valor1);
              $numeromax=substr($codigor,($posicion1+1),4);
              $bar = (int) $numeromax;


             if($fechai=='.' or $fechai=='' or $fechai=='__/__/____' ){ //IF 4
                 $finicio=$anoexp;            
              }else{
                 $finicio=$fechai;
              } //FIN DE IF 4


              if($fechaf=='.' or $fechaf=='' or $fechaf=='__/__/____'  OR $anofi>'2009'){ //IF 4
                 $ffinal=$ano;            
              }else{
                 $ffinal=$fechaf;
              } //FIN DE IF 4

             $guardainv="INSERT INTO tmp_inventario (ubicacion_fisica,codigo,asunto,fecha_i,fecha_f,no,ano,cve_serie,observaciones,baja ) values ('$ubicatp','$codigor','$asunto','$finicio','$ffinal',$bar,'$anoexp','$cveser','$observac','$baja')";
             $guarda=pg_query($guardainv);
             if($notomo!=Null){
                $gtomo=pg_query("UPDATE tmp_inventario  SET tomo=$notomo WHERE codigo='$codigor'");
                $gtomo1=pg_query("UPDATE tmp_inventario  SET tomo1='*' WHERE codigo='$codigor'");
             }
             

      }//fin del for
  
   }//COMPARA EL TIEMPO DE VIGENCIA DEL EXPEDIENTE CON LOS AÑOS TRANSCURRIDOS O CON EL AÑO QUE SE ESTÁ REPORTANDO
}

  $querymexp1="select max(no) as  maximo,ano from tmp_inventario group by ano order by ano"; 
             $datomax1=pg_query($querymexp1);
             $filamax1=pg_num_rows($datomax1);
             $max1=pg_fetch_result($datomax1,0,0);
             $total1=$total1+$max1;


             $querymexp="select max(no) as  maximo,ano from tmp_inventario group by ano order by ano"; 
             $datomax=pg_query($querymexp);
             $filamax=pg_num_rows($datomax);
 

              for($m=0;$m<$filamax;$m++){ //FOR QUE DETERMINA LA CANTIDAD DE REGISTROS POR AÑO
                  $max=pg_fetch_result($datomax,$m,0);
                  $anocomp=pg_fetch_result($datomax,$m,1);
                  $total=$total+$max;
                  $contador=0;


                  for($d=0;$d<$max;$d++){ //INICIO DE FOR QUE BUSCA LOS DATOS EN LA TABLA TEMPORAL TMP_INVENTARIO
                     
                     $contador++;

                   
                  switch($contador){
                    case ($contador<='9'):
                      $b1="000"."$contador";
                    break;
                    case ($contador>='10' AND $contador<='99' ):
                      $b1="00"."$contador";
                    break;
                    case ($contador>='100'):
                      $b1="0"."$contador";
                    break;
                    case ($contador>='1000'):
                      $b1=$contador;
                    break;
                  }


                    $concat="$concatcod"."$b1"."-$anocomp";

                    $hresta= $total1-$contador; 

                     $querybdatos="select ubicacion_fisica,codigo,asunto,fecha_i,fecha_f,observaciones,tomo,tomo1 from tmp_inventario where ano='$anocomp' and no=$contador order by ano,no,codigo"; 
                     $datobdatos=pg_query($querybdatos);
                     $filabdatos=pg_num_rows($datobdatos);

                     //for($t=0;$t<$filabdatos;$t++){ //FOR QUE DETERMINA LA CANTIDAD DE REGISTROS POR AÑO

                        $ubicatp1=pg_fetch_result($datobdatos,0,0);
                        $codigor1=pg_fetch_result($datobdatos,0,1);
                        $asunto1=pg_fetch_result($datobdatos,0,2);
                        $fechai1=pg_fetch_result($datobdatos,0,3);
                        $fechaf1=pg_fetch_result($datobdatos,0,4);
                        $observac1=pg_fetch_result($datobdatos,0,5);    
                        $tomo=pg_fetch_result($datobdatos,0,6);  
                        $tomo1=pg_fetch_result($datobdatos,0,7);        

                        $longitud=strlen($asunto1);


                        if($tomo1!='*'){ //IF PARA DETERMINAR SI HAY TOMOS
                          

                            $pdf->SetFont('Arial','',11);
                           $pdf->SetXY(23,($c+2.74)*26);
                           $pdf->MultiCell(55,3.49,$ubica,0,'J'); 
                           $pdf->Rect(23,($c+2.73)*25,55,25,'');
            
                           $pdf->SetXY(78,($c+2.74)*27);
                           $pdf->MultiCell(50,3.49,$ubicatp1,0,'J');
                           $pdf->Rect(78,($c+2.73)*25,55,25,'');

                        IF($codigor1==''){                        

                           $pdf->SetXY(133,($c+2.74)*25);
                           $pdf->MultiCell(67,3.49,"El expediente no $concat no se creó",0,'J');
                           $pdf->Rect(133,($c+2.73)*25,67,25,'');
                        }ELSE{
                           $pdf->SetXY(133,($c+2.74)*27);
                           $pdf->MultiCell(67,3.49,$codigor1,0,'J');
                           $pdf->Rect(133,($c+2.73)*25,67,25,'');

                        }
            
                           if($longitud<=90){            

                           $pdf->SetXY(200,($c+2.74)*27);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');
                          // $pdf->Rect(200,($c+2.73)*25,62,25,'');
                        }
                        if($longitud>=91 AND $longitud<=130){

                           $pdf->SetXY(200,($c+2.74)*26);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');
                           
                        }
                        if($longitud>=131){
                           $pdf->SetXY(200,($c+2.74)*25);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');

                        }
                           $pdf->Rect(200,($c+2.73)*25,62,25,'');
               
                           $pdf->SetXY(262,($c+2.74)*28);
                           $pdf->MultiCell(22,3.49,$fechai1,0,'C');
                           $pdf->Rect(262,($c+2.73)*25,22,25,'');
            
                           $pdf->SetXY(284,($c+2.74)*28);
                           $pdf->MultiCell(21.5,3.49,$fechaf1,0,'C');
                           $pdf->Rect(284,($c+2.73)*25,21,25,'');
                
                           $pdf->SetFont('Arial','',8);

                           $pdf->SetXY(305,($c+2.74)*27);
                           $pdf->MultiCell(50,3.49,$observac1,0,'J');
                           $pdf->Rect(305,($c+2.73)*25,49,25,'');  
                                
                              if($total1 >=4){ //IF 5
                                  $resto = $total1 % 4;     
                                  $resf=$total1-1;
                                  $indice++;
                               }   // FIN DE IF 5    
                               $c++;
                               IF($resto==0){ //IF 6
                                
                        //   if($hresta>=4){               
                             if ($c>=4){ // IF 9
	                           $c=0;   
                                  $pdf->AddPage();
                               } // FIN DE IF 9
                        //}
                        //     if($hresta==4){               
                        //           if ($c>=4){ // IF 9
	                 //              $c=0;   
                        //              $pdf->AddPage();
                        //          } // FIN DE IF 9
                        //    }
                                }else{
                                                                 
                        //       if($hresta>=4){               
                        //        if ($c>=4){ // IF 9
	                 //             $c=0;   
                        //              $pdf->AddPage();
                        //          } // FIN DE IF 9
                        //     }
                        //   if($hresta==4){               
                                 if ($c>=4){ // IF 9
	                            $c=0;   
                                    $pdf->AddPage();
                              } // FIN DE IF 9  
                       //      }
                                
                              
                               }// FIN DE IF 6

                      }else{//EN CASO DE SI HABER TOMOS 
                            $querybdatos1="select ubicacion_fisica,codigo,asunto,fecha_i,fecha_f,observaciones,tomo from tmp_inventario where ano='$anocomp' and no=$contador order by ano,no,tomo,codigo"; 
                            $datobdatos1=pg_query($querybdatos1);
                            $filabdatos1=pg_num_rows($datobdatos1);

                            for($t=0;$t<$filabdatos1;$t++){ //FOR QUE DETERMINA LA CANTIDAD DE TOMOS

                               $ubicatp1=pg_fetch_result($datobdatos1,$t,0);
                               $codigor1=pg_fetch_result($datobdatos1,$t,1);
                               $asunto1=pg_fetch_result($datobdatos1,$t,2);
                               $fechai1=pg_fetch_result($datobdatos1,$t,3);
                               $fechaf1=pg_fetch_result($datobdatos1,$t,4);
                               $observac1=pg_fetch_result($datobdatos1,$t,5); 

                               $pdf->SetFont('Arial','',11);
                           $pdf->SetXY(23,($c+2.74)*26);
                           $pdf->MultiCell(55,3.49,$ubica,0,'J'); 
                           $pdf->Rect(23,($c+2.73)*25,55,25,'');
            
                           $pdf->SetXY(78,($c+2.74)*27);
                           $pdf->MultiCell(50,3.49,$ubicatp1,0,'J');
                           $pdf->Rect(78,($c+2.73)*25,55,25,'');

                        IF($codigor1==''){                        

                           $pdf->SetXY(133,($c+2.74)*25);
                           $pdf->MultiCell(67,3.49,"El expediente no $concat no se creó",0,'J');
                           $pdf->Rect(133,($c+2.73)*25,67,25,'');
                        }ELSE{
                           $pdf->SetXY(133,($c+2.74)*27);
                           $pdf->MultiCell(67,3.49,$codigor1,0,'J');
                           $pdf->Rect(133,($c+2.73)*25,67,25,'');

                        }
            
                           if($longitud<=90){            

                           $pdf->SetXY(200,($c+2.74)*27);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');
                          // $pdf->Rect(200,($c+2.73)*25,62,25,'');
                        }
                        if($longitud>=91 AND $longitud<=130){

                           $pdf->SetXY(200,($c+2.74)*26);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');
                           
                        }
                        if($longitud>=131){
                           $pdf->SetXY(200,($c+2.74)*25);
                           $pdf->MultiCell(62,3.49,$asunto1,0,'J');

                        }
                           $pdf->Rect(200,($c+2.73)*25,62,25,'');
               
                           $pdf->SetXY(262,($c+2.74)*28);
                           $pdf->MultiCell(22,3.49,$fechai1,0,'C');
                           $pdf->Rect(262,($c+2.73)*25,22,25,'');
            
                           $pdf->SetXY(284,($c+2.74)*28);
                           $pdf->MultiCell(21.5,3.49,$fechaf1,0,'C');
                           $pdf->Rect(284,($c+2.73)*25,21,25,'');
                
                           $pdf->SetFont('Arial','',7.5);

                           $pdf->SetXY(305,($c+2.74)*25);
                           $pdf->MultiCell(50,3.49,$observac1,0,'J');
                           $pdf->Rect(305,($c+2.73)*25,49,25,'');  
                                
                               if($total1 >=4){ //IF 5
                                  $resto = $total1 % 4;     
                                  $resf=$total1-1;
                                  $indice++;
                               }   // FIN DE IF 5    
                               $c++;
                               IF($resto==0){ //IF 6
                                
                              //  if($hresta>=4){               
                                if ($c>=4){ // IF 9
	                             $c=0;   
                                    $pdf->AddPage();
                                 } // FIN DE IF 9
                              //   }
                              //   if($hresta==4){               
                              //     if ($c>=4){ // IF 9
	                       //       $c=0;   
                              //        $pdf->AddPage();
                              //    } // FIN DE IF 9 
                              //   }

                                }else{
                              //   if($hresta>=4){               
                              //     if ($c>=4){ // IF 9
	                       //        $c=0;   
                              //        $pdf->AddPage();
                              //     } // FIN DE IF 9
                              //  }
                              //  if($hresta==4){               
                                 if ($c>=4){ // IF 9
	                             $c=0;   
                                    $pdf->AddPage();
                                 } // FIN DE IF 9
                              //  }

                               }// FIN DE IF 6 
                            }//FIN DEL FOR QUE DETERMINA LA CANTIDAD DE TOMOS
                        }  //FIN DE SI HAY TOMOS
             }//FIN DE FOR QUE BUSCA LOS DATOS EN LA TABLA TEMPORAL TMP_INVENTARIO
       //}//FIN DEL FOR QUE DETERMINA LA CANTIDAD DE REGISTROS POR AÑO 
      }
           

        $querybtot="select count(codigo) as total from tmp_inventario  "; 
         
         $datotot=pg_query($querybtot);
         $dtotal=pg_fetch_result($datotot,0,0); 
           
          $pdf->SetFont('Arial','B',11);      
          $pdf->SetFillColor(200,200,200);
          $pdf->Rect(78,($c+2.73)*25,67,10,'FD');
          $pdf->SetXY(100,($c+2.7)*26);
          $pdf->MultiCell(40,3.49,'TOTAL',0,'','j');
         
          $pdf->SetFillColor(200,200,200);
          $pdf->Rect(133,($c+2.73)*25,67,10,'FD');
          $pdf->SetXY(160,($c+2.7)*26);
          $pdf->MultiCell(60,3.49,$dtotal,'','j');
    
$pdf->Output();
?>