";
print "close();";
print "";
}
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_encabezado_pagina($as_titulo,$as_procede,$ad_fecha,$as_fuentefin="",&$io_pdf){
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_encabezado_pagina
// Acess: private
// Arguments: as_titulo // Título del Reporte
// io_pdf // Instancia de objeto pdf
// Description: Función que imprime los encabezados por página
// Creado Por: Ing. Néstor Falcon
// Fecha Creación: 18/05/2007.
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_encabezado=$io_pdf->openObject();
$io_pdf->saveState();
$io_pdf->setStrokeColor(0,0,0);
$io_pdf->setLineStyle(1);
$io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],25,720,$_SESSION["ls_width"],60); // Agregar Logo
$li_tm=$io_pdf->getTextWidth(11,$as_titulo);
$tm=306-($li_tm/2);
$io_pdf->rectangle(20,690,570,95);
$io_pdf->addText($tm,750,8,"ORGANO:{$_SESSION['la_empresa']['nombre']}");
$io_pdf->addText(383,750,8,"PÁGINA N°.");
$io_pdf->addText(510,745,8,"COD.");
$io_pdf->addText(25,705,7,"FECHA:".$ad_fecha);
$io_pdf->addText(25,695,7,"FUENTE DE FINANCIAMIENTO: ".$as_fuentefin);
$io_pdf->addText($tm,730,10,$as_titulo);
$io_pdf->rectangle(20,625,570,60);
$io_pdf->addText(30,660,7,"INSUBSISTENCIA");$io_pdf->rectangle(95,658,10,10);
$io_pdf->addText(130,660,7,"REDUCCIÓN");$io_pdf->rectangle(180,658,10,10);
$io_pdf->addText(220,675,7,"RECURSOS ADICIONALES");
$io_pdf->addText(223,660,7,"CRÉDITO ADICIONAL");$io_pdf->rectangle(300,658,10,10);
$io_pdf->addText(238,638,7,"RECTIFICACIÓN");$io_pdf->rectangle(300,635,10,10);
$io_pdf->addText(470,675,7,"TRASPASO");
$io_pdf->addText(450,660,7,"GASTOS CORRIENTES");$io_pdf->rectangle(540,658,10,10);
$io_pdf->addText(460,638,7,"GASTOS DE CAPITAL");$io_pdf->rectangle(540,635,10,10);
//Impresión de las X para el Marcado de Operacion.
switch ($as_procede){
case 'SPGINS':
$io_pdf->addText(97.5,660.5,7,"X");//Insubsistencia
break;
case 'SPGCRA':
$io_pdf->addText(302.5,660.5,7,"X");//Crédito Adicional.
break;
case 'SPGREC':
$io_pdf->addText(302.5,637.5,7,"X");//Rectificacion.
break;
case 'SPGTRA':
$io_pdf->addText(542.5,660.5,7,"X");//Traspaso.
break;
}
// cuadro inferior
$io_pdf->Rectangle(15,60,570,70);
$io_pdf->line(15,117,585,117);
$io_pdf->line(130,60,130,130);
$io_pdf->line(240,60,240,130);
$io_pdf->line(445,60,445,130);
$io_pdf->addText(40,122,7,"ELABORADO POR"); // Agregar el título
$io_pdf->addText(157,122,7,"VERIFICADO POR"); // Agregar el título
$io_pdf->addText(270,122,7,"GERENCIA DE ADMINISTRACIÓN Y FINANZAS"); // Agregar el título
$io_pdf->addText(480,122,7,"PRESIDENCIA"); // Agregar el título
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_encabezado_pagina
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_detalle($la_data,&$io_pdf){
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_detalle
// Acess: private
// Arguments: la_data // arreglo de información
// io_pdf // Objeto PDF
// Description: función que imprime el detalle
// Creado Por: Ing.Yozelin Barragán
// Fecha Creación: 13/09/2006
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->setStrokeColor(1,1,1);
$io_pdf->ezSetY(615);
$la_config=array('showHeadings'=>1, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>1, // Mostrar Líneas
'shaded'=>1, // Sombra entre líneas
'colGap'=>1, // separacion entre tablas
'width'=>580, // Ancho de la tabla
'maxWidth'=>580, // Ancho Máximo de la tabla
'xPos'=>305, // Orientación de la tabla
'cols'=>array('proyecto'=>array('justification'=>'center','width'=>65), // Justificación y ancho de la
'accion'=>array('justification'=>'center','width'=>45),
'ejecutora'=>array('justification'=>'center','width'=>25),
'partida'=>array('justification'=>'center','width'=>25),
'generica'=>array('justification'=>'center','width'=>25),
'especifica'=>array('justification'=>'center','width'=>25),
'subespecifica'=>array('justification'=>'center','width'=>25),
'denominacion'=>array('justification'=>'left','width'=>255),
'monto'=>array('justification'=>'right','width'=>80))); // Justificación y ancho
$la_columnas = array('proyecto'=>'PROYECTO O ACCION CENTRALIZADA',
'accion'=>'ACCIÓN ESPECÍFICA',
'ejecutora'=>'UEL',
'partida'=>'PART',
'generica'=>'GEN',
'especifica'=>'ESP',
'subespecifica'=>'SUB',
'denominacion'=>'DENOMINACIÓN',
'monto'=>'BOLÍVARES');
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
unset($la_data);
unset($la_columnas);
unset($la_config);
}// end function uf_print_detalle
//--------------------------------------------------------------------------------------------------------------------------------
$ls_procede = $_GET["procede"];
$ls_comprobante = $_GET["comprobante"];
$ld_fecha = $_GET["fecha"];
require_once("../../shared/ezpdf/class.ezpdf.php");
require_once("sigesp_spg_reportes_class.php");
$io_report = new sigesp_spg_reportes_class();
$io_pdf = new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(6.2,5,3,3); // Configuración de los margenes en centímetros
$ls_titulo = "SOLICITUD DE MODIFICACIÓN PRESUPUESTARIA Nº. ".$ls_comprobante."";
$ls_fuentefin = $io_report->uf_obtener_fuente_financiamiento_comprobante($ls_comprobante,$ls_procede,$ld_fecha);
uf_print_encabezado_pagina($ls_titulo,$ls_procede,$ld_fecha,$ls_fuentefin,$io_pdf); // Imprimimos el encabezado de la página
$la_result= $io_report->uf_buscar_detalle_comprobaten($_SESSION["la_empresa"]["codemp"],$ls_procede,$ls_comprobante,$ld_fecha);
if ($la_result->EOF){
print("");
}
else{
$la_data_detalle = $io_report->uf_obtener_datadetalle($la_result);
uf_print_detalle($la_data_detalle,$io_pdf);
}
$io_pdf->ezStopPageNumbers(1,1);
if (isset($d) && $d)
{
$ls_pdfcode = $io_pdf->ezOutput(1);
$ls_pdfcode = str_replace("\n","\n
",htmlspecialchars($ls_pdfcode));
echo '';
echo trim($ls_pdfcode);
echo '';
}
else
{
$io_pdf->ezStream();
}
unset($io_pdf);
unset($io_report);
?>