<?php 
session_start();   
header("Pragma: public");
header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
header("Cache-Control: private",false);
if(!array_key_exists("la_logusr",$_SESSION))
{
	print "<script language=JavaScript>";
	print "close();";		
	print "</script>";		
}
//ini_set('memory_limit','2048M');
//ini_set('max_execution_time','0');

function error($tipo){

		switch($tipo){				
			case 'tamaño_fila':
				$mensaje = 'ERROR DE TABLA: El tamaño de la fila es mas grande que el de la página.';
				break;		
		}
		
		 print "<script language=JavaScript>";
		 print "alert('".$mensaje."');";
		 print "close();";		
		 print "</script>";	
		 exit();

}

function columna($id,$dato,$prop,$textalign='L',$valign='T'){
	
	global $pdf,$margen_tabla,$ancho,$altura;
	// MultiCell($w, $h, $txt, $border=0, $align='J', $fill=0, $ln=1, $x='', $y='', $reseth=true, $stretch=0, $ishtml=false, $autopadding=true, $maxh=0, $valign='T', $fitcell=false,opciones_adicionales)
	$pdf->MultiCell($ancho[$id], $prop['alturamaxima'], utf8_encode($dato), 1, $textalign, 1, 0, '', '', true, 0, true, false, 0, $valign,false,$prop);
	if($pdf->saltopag){return false;}
	$altura[$id]=$pdf->altura_celda;
	
	return $altura;

}

function procesar_fila($datos){
		
		global $pdf,$margen_tabla,$ancho;
		
		$altura_pagina = $pdf->getPageHeight();
		$prop['alturamaxima']=3;
		$prop['check_pagebreak']=0;
		
		$pdf->startMultipleTransaction();								
		$prop['alturamaxima'] = fila($datos,$prop);
		if($prop['alturamaxima']>$altura_pagina){error('tamaño_fila');}
		$salto = $pdf->saltopag;									
		$pdf = $pdf->rollbackMultipleTransaction();
						
		if($salto){
			$pdf->AddPage();
			encabezado();
			$pdf->startMultipleTransaction();											
			$prop['alturamaxima'] = fila($datos,$prop);													
			$pdf = $pdf->rollbackMultipleTransaction();
			$salto = 0;		
		}
		
		
		$pdf->startMultipleTransaction();
		$pagina = $pdf->getPage();
		
		fila($datos,$prop);
		
		$pagina2 = $pdf->getPage();				
		if($pagina!=$pagina2){
			
				$pdf = $pdf->rollbackMultipleTransaction();									
				$pdf->AddPage();
				encabezado();
				fila($datos,$prop);											
		}	
		else{					  
														
				$pdf->commitMultipleTransaction();
		} 

}

$ruta = '../../';
require_once("../clases/covensol_fop_c_formulacion.php");
$objfop=new covensol_fop_c_formulacion($propiedades);
$objfop->cargar_seguridad("FOP","covensol_fop_d_dt_ep3.php");

$fecha_actual = date("d/m/Y");

if(!$_GET['anopresup'] or !$_GET['estcla'] or !$_GET['codestpro1'] or !$_GET['codplangob']){

		print "<script language=JavaScript>";
		echo "alert('ERROR: Faltan datos para generar el reporte');";
		print "close();";		
		print "</script>";
		exit();
}

$param = $_GET;		
$param['criterio']='por_datos';

require_once('../../shared/tcpdf_new/config/lang/ita.php');
require_once('../../shared/tcpdf_new/tcpdf_rep.php');  

$parametros = array();
//$objfop->io_conexiones->decodificar_get();
$parametros = $objfop->io_conexiones->asignar_get();

$datos_encabezado = '<p  style="text-align:rigth;"><b> '.'FECHA Y HORA: </b>'.date('d/m/Y').' - '.date('H:i').'<br/><b>USUARIO: </b>'.$_SESSION["la_logusr"].'</p>';

$pdf = new TCPDFREP('PORTRAIT', PDF_UNIT, 'LETTER', true, 'UTF-8', false);
$pdf->SetMargins(PDF_MARGIN_LEFT, 15, PDF_MARGIN_RIGHT);
$pdf->setHeaderFont(array('', '', 8));
$pdf->ancho_logo = $_SESSION["ls_width"]*0.3;
$pdf->alto_logo = $_SESSION["ls_height"]*0.3;
$pdf->SetHeaderData('../../shared/imagebank/'.$_SESSION["ls_logo"], $_SESSION["ls_width"], '', $datos_encabezado);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
$pdf->setFooterFont(array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);		
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
$pdf->SetAutoPageBreak(TRUE, 10);
$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
$pdf->setPrintHeader(true);
//$pdf->setTextoFooter(utf8_encode(''));

$pdf->AddPage();
$pdf->Ln();
$pdf->SetLineStyle(array('width' => 0.1, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(200, 200, 200))); 


$objfop->RepParam['ancho'][1] = 110;
$objfop->RepParam['ancho'][2] = 250;
$objfop->RepParam['ancho'][3] = 300;
$objfop->RepParam['ancho']['total'] = array_sum($objfop->RepParam['ancho']);
$objfop->RepParam['encabezado']['color_fondo'] = '#000066';
$objfop->RepParam['encabezado']['color_letra'] = '#FFFFFF';
$objfop->RepParam['encabezado']['tamaño'] = 10;
$objfop->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
$objfop->RepParam['encabezado2']['color_letra'] = '#000000';
$objfop->RepParam['fila']['color_fondo'] = '#FFFFFF';
$objfop->RepParam['fila']['color_letra'] = '#000000';
$objfop->RepParam['fila']['tamaño'] = 8;

$paramrep=array();
$paramrep['color_tit']="#FFFFFF";
$paramrep['color_dato']="#000000";
$paramrep['color_etiqueta']="#000055";
$paramrep['fondo_tit']="#000066";
$paramrep['fondo_tit2']="#E1F0FF";
$paramrep['color_tit2']="#000000";


$paramrep['ancho_total'] = 660;
$paramrep['fondo_dato']="#FFFFFF";
$paramrep['ancho_etiqueta']="250";
$paramrep['ancho_dato']=$paramrep['ancho_total']-$paramrep['ancho_etiqueta'];
$paramrep['tamano_letra']="10";
$paramrep['ancho_tit']=$paramrep['ancho_total'];

$paramrep['ancho_etiqueta_numcor']="440";
$paramrep['ancho_dato_numcor']="110";
$paramrep['tamano_letra_numcor']="8";
$paramrep['color_numcor']="#0000AA";
$paramrep['color_etiqueta_numcor']="#000000";
$paramrep['fondo_numcor']="#FFFFFF";

$ancho_firma = $paramrep['ancho_total']/3;



function NombreReporte($parametro=array()){		
			
	$HTML = '<p  style="text-align:center;"><span bgcolor="#FFFFFF" color="#000066"><font size="14"><b> FICHA DE ACCIÓN ESPECÍFICA </b></font></span></p>';	
										
	return $HTML; 
}


function DatosBasicosIdent($parametro=array()){		
			
	global $paramrep,$datos,$objfop,$parametros;
	$tabla="";
	
	//$datosenc = $objfop->FormatLonCodEstPro($parametros);
	
	$tabla = '<table cellspacing="0" cellpadding="1" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_tit'].'" color="'.$paramrep['color_tit'].'" height="12">
								<td align="center" width="'.$paramrep['ancho_tit'].'"><font size="12"><b> DATOS BASICOS DE IDENTIFICACIÓN DEL PROYECTO Y/O ACCION CENTRALIZADA </b></font></td>									
							</tr>
						</thead>
				</table>';			

	
	$tabla = $tabla.'<table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Plan de Gobierno: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['desplangob'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Año: </b></font></td>
								<td align="left"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['anopresup'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Codigo del Proyecto: </b></font></td>
								<td align="left"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['codestpro1'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Tipo de Estructura: </b></font></td>
								<td align="left"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['estcla'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Denominación: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['denestpro1'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Monto Total del Proyecto: </b></font></td>
								<td align="left"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['montotpry'].' </font></td>																							
							</tr>
						</thead>
				     </table>';
																				
	return $tabla; 
}


function DatosBasicosEp2($parametro=array()){		
			
	global $paramrep,$datos,$objfop,$parametros;
	$tabla="";
	
	//$datosenc = $objfop->FormatLonCodEstPro($parametros);
	
	$tabla = '<table cellspacing="0" cellpadding="1" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_tit'].'" color="'.$paramrep['color_tit'].'" height="12">
								<td align="center" width="'.$paramrep['ancho_tit'].'"><font size="12"><b> DATOS BASICOS DE LA ACCIÓN ESPECÍFICA </b></font></td>									
							</tr>
						</thead>
				</table>';			
	
	$tabla = $tabla.'<table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Código: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['codestpro2'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Descripción: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['denestpro2'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Fecha de Inicio: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['feciniep2'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Fecha de Culminación: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['fecfinep2'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Ejecutor: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['denuniadm'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Descripción del Bien o Servicio: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['desbienserv'].' </font></td>																							
							</tr>
						</thead>
				     </table>
					 <table cellspacing="0" cellpadding="2" border="1">
						<thead>
							<tr bgcolor="'.$paramrep['fondo_dato'].'" color="'.$paramrep['color_dato'].'" height="6">
								<td align="right" width="'.$paramrep['ancho_etiqueta'].'" color="'.$paramrep['color_etiqueta'].'"><font size="'.$paramrep['tamano_letra'].'"><b> Ponderación: </b></font></td>
								<td align="justify"  width="'.$paramrep['ancho_dato'].'"><font size="'.$paramrep['tamano_letra'].'"> '.$parametro['pondera'].' </font></td>																							
							</tr>
						</thead>
				     </table>';
																				
	return $tabla; 
}

function FirmaSello($param=array()){
    global $ancho_firma;
	$FirmaSello = '<table cellspacing="0" cellpadding="3" border="1">
					  <tr bgcolor="#E8F3FD">					
						<td  align="center" width="'.$ancho_firma.'"><font size="8">ELABORADO</font></td>
						<td  align="center" width="'.$ancho_firma.'"><font size="8">VERIFICADO</font></td>
						<td align="center" width="'.$ancho_firma.'"><font size="8">AUTORIZADO</font></td>
					  </tr>
					  <tr>
						<td height="65" align="center">					   
						</td>
						<td>					
						</td>
						<td>					
						</td>
					  </tr>				 
					</table>';
	return $FirmaSello;
}



function ParametrosDtEp2(){
		
		global $objfop;
		$objfop->RepParam=array();
		$objfop->RepParam['ancho'][1] = 30;
		$objfop->RepParam['ancho'][2] = 130;
		$objfop->RepParam['ancho'][3] = 220;
		$objfop->RepParam['ancho'][4] = 80;
		$objfop->RepParam['ancho'][5] = 80;
		$objfop->RepParam['ancho'][6] = 120;		
		$objfop->RepParam['ancho']['total'] = array_sum($objfop->RepParam['ancho']);
		$objfop->RepParam['encabezado']['color_fondo'] = '#000066';
		$objfop->RepParam['encabezado']['color_letra'] = '#FFFFFF';
		$objfop->RepParam['encabezado']['tamaño'] = 8;
		$objfop->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
		$objfop->RepParam['encabezado2']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['color_fondo'] = '#FFFFFF';
		$objfop->RepParam['fila']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['tamaño'] = 7;
}

function ParametrosPartidas(){

        global $objfop,$ancho_firma;	
		
		$objfop->RepParam=array();
		$objfop->RepParam['ancho'][1] = 50;
		$objfop->RepParam['ancho'][2] = 200;
		$objfop->RepParam['ancho'][3] = 80;
		$objfop->RepParam['ancho'][4] = 80;
		$objfop->RepParam['ancho'][5] = 80;
		
		$objfop->RepParam['ancho'][6] = 80;
		$objfop->RepParam['ancho'][7] = 80;
		$objfop->RepParam['ancho'][8] = 80;
		$objfop->RepParam['ancho'][9] = 80;
		$objfop->RepParam['ancho'][10] = 80;
		
		$objfop->RepParam['ancho']['total'] = array_sum($objfop->RepParam['ancho']);
		$objfop->RepParam['encabezado']['color_fondo'] = '#000066';
		$objfop->RepParam['encabezado']['color_letra'] = '#FFFFFF';
		$objfop->RepParam['encabezado']['tamaño'] = 7;
		$objfop->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
		$objfop->RepParam['encabezado2']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['color_fondo'] = '#FFFFFF';
		$objfop->RepParam['fila']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['tamaño'] = 7;
		$ancho_firma = $objfop->RepParam['ancho']['total']/3;
}

function ParametrosSPG(){

        global $objfop,$ancho_firma;	
		
		$objfop->RepParam=array();
		$objfop->RepParam['ancho'][1] = 80;
		$objfop->RepParam['ancho'][2] = 270;
		$objfop->RepParam['ancho'][3] = 90;
		$objfop->RepParam['ancho'][4] = 130;
		$objfop->RepParam['ancho'][5] = 130;
		$objfop->RepParam['ancho'][6] = 130;
		$objfop->RepParam['ancho']['total'] = array_sum($objfop->RepParam['ancho']);
		$objfop->RepParam['encabezado']['color_fondo'] = '#000066';
		$objfop->RepParam['encabezado']['color_letra'] = '#FFFFFF';
		$objfop->RepParam['encabezado']['tamaño'] = 10;
		$objfop->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
		$objfop->RepParam['encabezado2']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['color_fondo'] = '#FFFFFF';
		$objfop->RepParam['fila']['color_letra'] = '#000000';
		$objfop->RepParam['fila']['tamaño'] = 10;
		$ancho_firma = $objfop->RepParam['ancho']['total']/3;
}



$y_actual = $pdf->GetY();
$pdf->Ln();
$resp = $objfop->ConsultaEp1($param);
$datosrep = $resp['rs']->fields;
$datos = $objfop->FormatDatosEp1($datosrep);
$resp=array();
$param['criterio']='por_codigo';
$resp = $objfop->ConsultaEp2($param);
$datosrep = $resp['rs']->fields;
$datosEp2 = $objfop->FormatDatosEp2($datosrep);
ParametrosDtEp2();
$infoDt = $objfop->InfoDtEp2($param);
ParametrosPartidas();
$infoPartidas = $objfop->RepInfoResumenPartidas($param);
ParametrosSPG();
$InfoSpg = $objfop->RepInfoResumenCuentas($param);

$pdf->writeHTML(utf8_encode(NombreReporte($datos)), true, false, false, false, '');
$pdf->Ln();
$pdf->writeHTML(utf8_encode(DatosBasicosIdent($datos)), true, false, false, false, '');
$pdf->Ln();
$pdf->writeHTML(utf8_encode(DatosBasicosEp2($datosEp2)), true, false, false, false, '');
if($infoDt){
	$pdf->Ln();
	$pdf->writeHTML(utf8_encode($infoDt), true, false, false, false, '');
}

$pdf->AddPage();
$pdf->setPageOrientation("LANDSCAPE");
if($infoPartidas){
	$pdf->Ln();
	$pdf->writeHTML(utf8_encode($infoPartidas), true, false, false, false, '');
}
$pdf->AddPage();
if($InfoSpg){
	$pdf->Ln();
	$pdf->writeHTML(utf8_encode($InfoSpg), true, false, false, false, '');
}

//$pdf->Ln();				
$y = $pdf->GetY();

if($y>175){$pdf->AddPage();}
$pdf->SetY(175);
$pdf->SetLineStyle(array('width' => 0.85 / $pdf->getScaleFactor(), 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)));
$pdf->writeHTML(utf8_encode(FirmaSello()), true, false, false, false, '');

$pdf->Output('reporte_ficha_ep2_'.$datos['estcla'].'_'.$datos['codestpro1'].'_'.$datosEp2['codestpro2'].'_'.date('dmY').'.pdf', 'I');

?>