";
print "close();";
print "";
}
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_encabezado_pagina($as_titulo,&$io_pdf)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_encabezadopagina
// Acess: private
// Arguments: as_titulo // Título del Reporte
// as_periodo_comp // Descripción del periodo del comprobante
// as_fecha_comp // Descripción del período de la fecha del comprobante
// io_pdf // Instancia de objeto pdf
// Description: función que imprime los encabezados por página
// Creado Por: Ing.Yozelin Barragán
// Fecha Creación: 12/09/2006
////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_encabezado=$io_pdf->openObject();
$io_pdf->saveState();
$io_pdf->line(10,30,1000,30);
// Agregar Logo
$io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],20,535,$_SESSION["ls_width"],$_SESSION["ls_height"]);
$li_tm=$io_pdf->getTextWidth(12,$as_titulo);
$tm=505-($li_tm/2);
$io_pdf->addText($tm,550,12,$as_titulo); // Agregar el título
$io_pdf->addText(900,560,10,$_SESSION["ls_database"]);// Agrerar el nombre de la base de datos actual
$io_pdf->addText(900,550,10,date("d/m/Y")); // Agregar la Fecha
$io_pdf->addText(900,540,10,date("h:i a")); // Agregar la hora
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_encabezadopagina
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_cabecera($io_cabecera,$as_codestpro1,$as_codestpro2,$as_codestpro3,$as_codestpro4,
$as_codestpro5,$as_denestpro1,$as_denestpro2,$as_denestpro3,$as_denestpro4,$as_denestpro5,$ls_desper,$ls_lapso_meses,$ls_text_periodo,&$io_pdf)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_cabecera
// Access: privates
// Arguments: as_programatica // programatica del comprobante
// as_denestpro5 // denominacion de la programatica del comprobante
// io_pdf // Objeto PDF
// Description: función que imprime la cabecera de cada página
// Creado Por: Ing.Yozelin Barragán
// Fecha Creación: 12/09/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->saveState();
$io_pdf->ezSetY(520);
$li_tm=$io_pdf->getTextWidth(10,"PERIODO: ".strtoupper($ls_desper)." CORRESPONDIENTE A ".strtoupper($ls_text_periodo));
$tm=505-($li_tm/2);
$io_pdf->addText($tm,525,10,"PERIODO: ".strtoupper($ls_desper)." CORRESPONDIENTE A ".strtoupper($ls_text_periodo));
$ls_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"];
$ls_codestpro1=substr($as_codestpro1,-$ls_loncodestpro1);
$ls_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"];
$ls_codestpro2=substr($as_codestpro2,-$ls_loncodestpro2);
$ls_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"];
$ls_codestpro3=substr($as_codestpro3,-$ls_loncodestpro3);
if($_SESSION["la_empresa"]["estmodest"] == 2)
{
$ls_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"];
$ls_codestpro4=substr($as_codestpro4,-$ls_loncodestpro4);
$ls_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"];
$ls_codestpro5=substr($as_codestpro5,-$ls_loncodestpro5);
}
if($as_codestpro2!="")
{
$ls_tituto_2=strtoupper($_SESSION["la_empresa"]["nomestpro2"]);
}
else
{
$ls_tituto_2="";
}
if($as_codestpro3!="")
{
$ls_tituto_3=strtoupper($_SESSION["la_empresa"]["nomestpro3"]);
}
else
{
$ls_tituto_3="";
}
if($as_codestpro4!="")
{
$ls_tituto_4=strtoupper($_SESSION["la_empresa"]["nomestpro4"]);
}
else
{
$ls_tituto_4="";
}
if($as_codestpro5!="")
{
$ls_tituto_5=strtoupper($_SESSION["la_empresa"]["nomestpro5"]);
}
else
{
$ls_tituto_5="";
}
if($_SESSION["la_empresa"]["estmodest"] == 1)
{
$la_data=array(array('estructura'=>''.strtoupper($_SESSION["la_empresa"]["nomestpro1"]).': '.$ls_codestpro1." - ".$as_denestpro1),
array('estructura'=>''.$ls_tituto_2.': '.$ls_codestpro2." - ".$as_denestpro2),
array('estructura'=>''.$ls_tituto_3.': '.$ls_codestpro3." - ".$as_denestpro3));
}
elseif($_SESSION["la_empresa"]["estmodest"] == 2)
{
$la_data=array(array('estructura'=>''.strtoupper($_SESSION["la_empresa"]["nomestpro1"]).': '.$ls_codestpro1." - ".$as_denestpro1),
array('estructura'=>''.$ls_tituto_2.': '.$ls_codestpro2." - ".$as_denestpro2),
array('estructura'=>''.$ls_tituto_3.': '.$ls_codestpro3." - ".$as_denestpro3),
array('estructura'=>''.$ls_tituto_4.': '.$ls_codestpro4." - ".$as_denestpro4),
array('estructura'=>''.$ls_tituto_5.': '.$ls_codestpro5." - ".$as_denestpro5));
}
$la_columna=array('estructura'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'shadeCol'=>array(0.9,0.9,0.9),
'shadeCo2'=>array(0.9,0.9,0.9),
//'textCol' =>array(0.1,0.1,0.1) , // color del texto
'colGap'=>0.5, // separacion entre tablas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>280, // Orientación de la tabla
'width'=>550, // Ancho de la tabla
'maxWidth'=>550); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_cabecera,'all');
}// end function uf_print_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_cabecera_estructura($io_encabezado,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,
$ls_denestpro1,$ls_denestpro2,$ls_denestpro3,$ls_denestpro4,$ls_denestpro5,$ls_codestpro1h,
$ls_codestpro2h,$ls_codestpro3h,$ls_codestpro4h,$ls_codestpro5h,$ls_denestpro1h,$ls_denestpro2h,
$ls_denestpro3h,$ls_denestpro4h,$ls_denestpro5h,$ls_desper,$ls_lapso_meses,$ls_text_periodo,&$io_pdf)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_cabecera_estructura
// Access: private
// io_pdf // Objeto PDF
// Description: función que imprime la cabecera de cada página
// Creado Por: Ing. Arnaldo Suarez
// Fecha Creación: 17/11/2008
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$ls_estmodest = $_SESSION["la_empresa"]["estmodest"];
$li_nomestpro1 = $_SESSION["la_empresa"]["nomestpro1"];
$li_nomestpro2 = $_SESSION["la_empresa"]["nomestpro2"];
$li_nomestpro3 = $_SESSION["la_empresa"]["nomestpro3"];
$li_nomestpro4 = $_SESSION["la_empresa"]["nomestpro4"];
$li_nomestpro5 = $_SESSION["la_empresa"]["nomestpro5"];
$li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"];
$li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"];
$li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"];
$li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"];
$li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"];
$ls_codestpro1 = trim(substr($ls_codestpro1,-$li_loncodestpro1));
$ls_codestpro2 = trim(substr($ls_codestpro2,-$li_loncodestpro2));
$ls_codestpro3 = trim(substr($ls_codestpro3,-$li_loncodestpro3));
$ls_codestpro4 = trim(substr($ls_codestpro4,-$li_loncodestpro4));
$ls_codestpro5 = trim(substr($ls_codestpro5,-$li_loncodestpro5));
$ls_codestpro1h = trim(substr($ls_codestpro1h,-$li_loncodestpro1));
$ls_codestpro2h = trim(substr($ls_codestpro2h,-$li_loncodestpro2));
$ls_codestpro3h = trim(substr($ls_codestpro3h,-$li_loncodestpro3));
$ls_codestpro4h = trim(substr($ls_codestpro4h,-$li_loncodestpro4));
$ls_codestpro5h = trim(substr($ls_codestpro5h,-$li_loncodestpro5));
$io_pdf->saveState();
$io_pdf->ezSetY(520);
$li_tm=$io_pdf->getTextWidth(10,"PERIODO: ".strtoupper($ls_desper)." CORRESPONDIENTE A ".strtoupper($ls_text_periodo));
$tm=505-($li_tm/2);
$io_pdf->addText($tm,525,10,"PERIODO: ".strtoupper($ls_desper)." CORRESPONDIENTE A ".strtoupper($ls_text_periodo));
if ($ls_estmodest==1)
{
$ls_datat1[1]=array('nombre'=>''.strtoupper($li_nomestpro1).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro1,'denom'=>$ls_denestpro1,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro1h,'denomh'=>$ls_denestpro1h);
$ls_datat1[2]=array('nombre'=>''.strtoupper($li_nomestpro2).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro2,'denom'=>$ls_denestpro2,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro2h,'denomh'=>$ls_denestpro2h);
$ls_datat1[3]=array('nombre'=>''.strtoupper($li_nomestpro3).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro3,'denom'=>$ls_denestpro3,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro3h,'denomh'=>$ls_denestpro3h);
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' =>7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>1, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'cols'=>array('nombre'=>array('justification'=>'left','width'=>150),
'desde'=>array('justification'=>'center','width'=>30),
'codestpro'=>array('justification'=>'center','width'=>60),
'denom'=>array('justification'=>'left','width'=>300),
'hasta'=>array('justification'=>'center','width'=>30),
'codestproh'=>array('justification'=>'center','width'=>60),
'denomh'=>array('justification'=>'left','width'=>300)));
$la_columna=array('nombre'=>'','desde'=>'','codestpro'=>'','denom'=>'','hasta'=>'','codestproh'=>'','denomh'=>'');
$io_pdf->ezTable($ls_datat1,$la_columna,'',$la_config);
}
else
{
$ls_datat1[1]=array('nombre'=>''.strtoupper($li_nomestpro1).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro1,'denom'=>$ls_denestpro1,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro1h,'denomh'=>$ls_denestpro1h);
$ls_datat1[2]=array('nombre'=>''.strtoupper($li_nomestpro2).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro2,'denom'=>$ls_denestpro2,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro2h,'denomh'=>$ls_denestpro2h);
$ls_datat1[3]=array('nombre'=>''.strtoupper($li_nomestpro3).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro3,'denom'=>$ls_denestpro3,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro3h,'denomh'=>$ls_denestpro3h);
$ls_datat1[4]=array('nombre'=>''.strtoupper($li_nomestpro4).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro5,'denom'=>$ls_denestpro4,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro4h,'denomh'=>$ls_denestpro4h);
$ls_datat1[5]=array('nombre'=>''.strtoupper($li_nomestpro5).": ",'desde'=>"DESDE:",'codestpro'=>$ls_codestpro5,'denom'=>$ls_denestpro5,'hasta'=>"HASTA:",'codestproh'=>$ls_codestpro5h,'denomh'=>$ls_denestpro5h);
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 6, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>1, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>450, // Orientación de la tabla
'cols'=>array('nombre'=>array('justification'=>'left','width'=>75),
'desde'=>array('justification'=>'center','width'=>30),
'codestpro'=>array('justification'=>'center','width'=>60),
'denom'=>array('justification'=>'left','width'=>300),
'hasta'=>array('justification'=>'center','width'=>30),
'codestproh'=>array('justification'=>'center','width'=>60),
'denomh'=>array('justification'=>'left','width'=>300)));
$la_columna=array('nombre'=>'','desde'=>'','codestpro'=>'','denom'=>'','hasta'=>'','codestproh'=>'','denomh'=>'');
$io_pdf->ezTable($ls_datat1,$la_columna,'',$la_config);
}
unset($ls_datat1);
unset($la_config);
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_pie_cabecera($ad_tipper,$as_nomper01,$as_nomper02,$as_nomper03,$ad_total_per1,$ad_total_per2,$ad_total_per3,$ad_total_disponible,$ad_total_comprometido,$ad_total_ajuste,$ad_total_modificaciones,
$ad_total_precompromiso,$ad_total_libPrecompromiso,&$io_pdf,$as_titulo,$ld_total_disponible_ant)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function : uf_print_pie_cabecera
// Acess : private
// Arguments : ad_total // Total General
// Description : función que imprime el fin de la cabecera de cada página
// Creado Por: Ing.Yozelin Barragán
// Fecha Creación: 25/09/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
switch($ad_tipper)
{
case 1:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_data[]=array('codigo'=>'',
'descripcion'=>''.$as_titulo.'',
'disponible'=>$ld_total_disponible_ant,
'periodo01'=>''.$ad_total_per1.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,'libprecompromiso'=>$ad_total_libPrecompromiso,'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'',
'disponible'=>'',
'periodo01'=>'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'',
'disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>510, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>80), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>150), // Justificación y ancho de la
'disponible'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>150), // Justificación y ancho de la columna
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>125), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>120), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>80))); // Justificación y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$la_data=array(array('name'=>''));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center'); // Orientación de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
break;
case 2:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_data[]=array('codigo'=>'',
'descripcion'=>''.$as_titulo.'',
'disponible'=>$ld_total_disponible_ant,
'periodo01'=>''.$ad_total_per1.'',
'periodo02'=>''.$ad_total_per2.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,'libprecompromiso'=>$ad_total_libPrecompromiso,'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'','disponible'=>'',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'','disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
//'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>505, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>85), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>110), // Justificación y ancho de la
'disponible'=>array('justification'=>'right','width'=>110), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>75))); // Justificación y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$la_data=array(array('name'=>''));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center'); // Orientación de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
break;
case 3:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_data[]=array('codigo'=>'','descripcion'=>''.$as_titulo.'',
'disponible'=>$ld_total_disponible_ant,
'periodo01'=>''.$ad_total_per1.'',
'periodo02'=>''.$ad_total_per2.'',
'periodo03'=>''.$ad_total_per3.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,
'libprecompromiso'=>$ad_total_libPrecompromiso,
'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'','disponible'=>'',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'periodo03'=>''.$as_nomper03.'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'','disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
//'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>505, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>90), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>120), // Justificación y ancho de la
'disponible'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la
'periodo03'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>70))); // Justificación y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$la_data=array(array('name'=>''));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center'); // Orientación de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
break;
}
}// end function uf_print_pie_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_pie_partida($ad_tipper,$as_nomper01,$as_nomper02,$as_nomper03,$ad_total_per1,$ad_total_per2,$ad_total_per3,$ad_total_disponible,$ad_total_comprometido,$ad_total_ajuste,$ad_total_modificaciones,
$ad_total_precompromiso,$ad_total_libPrecompromiso,&$io_pdf,$as_titulo)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function : uf_print_pie_partida
// Acess : private
// Arguments : ad_total // Total General
// Description : función que imprime el total por partidas
// Creado Por: Victor Mendoza
// Fecha Creación: 02/06/2009
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
switch($ad_tipper)
{
case 1:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_data[]=array('codigo'=>'',
'descripcion'=>''.$as_titulo.'',
'disponible'=>$ad_total_disponible,
'periodo01'=>''.$ad_total_per1.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,'libprecompromiso'=>$ad_total_libPrecompromiso,'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'',
'disponible'=>'',
'periodo01'=>'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'',
'disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>510, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>80), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>150), // Justificación y ancho de la
'disponible'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>150), // Justificación y ancho de la columna
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>125), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>120), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>80))); // Justificación y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$la_data=array(array('name'=>''));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center'); // Orientación de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
break;
case 2:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_data[]=array('codigo'=>'',
'descripcion'=>''.$as_titulo.'',
'disponible'=>$ad_total_disponible,
'periodo01'=>''.$ad_total_per1.'',
'periodo02'=>''.$ad_total_per2.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,'libprecompromiso'=>$ad_total_libPrecompromiso,'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'','disponible'=>'',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'','disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
//'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>505, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>85), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>110), // Justificación y ancho de la
'disponible'=>array('justification'=>'right','width'=>110), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>75))); // Justificación y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$la_data=array(array('name'=>''));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center'); // Orientación de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
break;
case 3:
$la_datat=array(array('name'=>'___________________________________________________________________________________________________________________________________________________________________________________________________'));
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>500, // Orientación de la tabla
'width'=>990); // Ancho Máximo de la tabla
$io_pdf->ezTable($la_datat,$la_columna,'',$la_config);
$la_datatot[1]=array('codigo'=>'','descripcion'=>''.$as_titulo.'',
'disponible'=>$ad_total_disponible,
'periodo01'=>''.$ad_total_per1.'',
'periodo02'=>''.$ad_total_per2.'',
'periodo03'=>''.$ad_total_per3.'',
'comprometido'=>$ad_total_comprometido,'ajuste'=>$ad_total_ajuste,
'modificaciones'=>$ad_total_modificaciones,'precompromiso'=>$ad_total_precompromiso,
'libprecompromiso'=>$ad_total_libPrecompromiso,
'disponible2'=>$ad_total_disponible);
$la_columnas=array('codigo'=>' ','descripcion'=>'','disponible'=>'',
'periodo01'=>'',
'periodo02'=>'',
'periodo03'=>'',
'comprometido'=>'','ajuste'=>'',
'modificaciones'=>'','precompromiso'=>'','libprecompromiso'=>'','disponible2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 8, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
//'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>505, // Orientación de la tabla
'cols'=>array('codigo'=>array('justification'=>'left','width'=>90), // Justificación y ancho de la
'descripcion'=>array('justification'=>'left','width'=>120), // Justificación y ancho de la
'disponible'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la
'periodo01'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la
'periodo03'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'comprometido'=>array('justification'=>'right','width'=>70), // Justificación
'ajuste'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'modificaciones'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'precompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'libprecompromiso'=>array('justification'=>'right','width'=>100), // Justificación y ancho
'disponible2'=>array('justification'=>'right','width'=>70))); // Justificación y ancho de la
$io_pdf->ezTable($la_datatot,$la_columnas,'',$la_config);
unset($la_datatot);
unset($la_columnas);
unset($la_config);
break;
}
}// end function uf_print_pie_partida
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_cabecera_detalle($io_encabezado,$ls_disponibilidad,$ai_estilo,$as_nomper01,$as_nomper02,$as_nomper03,$ad_fecha,&$io_pdf)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_cabecera_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: 12/09/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->saveState();
switch($ai_estilo)
{
case 1:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>1, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'center','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'center','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'center','width'=>150), // Justificación y ancho de la columna 'totcom'=>array('justification'=>'right','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'center','width'=>70),
'totcom'=>array('justification'=>'center','width'=>70),
'modpres'=>array('justification'=>'center','width'=>70),
'precom'=>array('justification'=>'center','width'=>125),
'libprecom'=>array('justification'=>'center','width'=>125),
'disponible'=>array('justification'=>'center','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponant'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
$la_data=array(array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponant'=>''.$ls_disponibilidad.'',
'periodo01'=>''.$as_nomper01.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>' DISPONIBLE AL: '.$ad_fecha.''));
break;
case 2:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>1, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'center','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'center','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'center','width'=>105), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'center','width'=>105), // Justificación y ancho de la
'totcom'=>array('justification'=>'center','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'center','width'=>70),
'modpres'=>array('justification'=>'center','width'=>70),
'precom'=>array('justification'=>'center','width'=>100),
'libprecom'=>array('justification'=>'center','width'=>100),
'disponible'=>array('justification'=>'center','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
$la_data=array(array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>''.$ls_disponibilidad.'',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>' DISPONIBLE AL: '.$ad_fecha.''));
break;
case 3:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>1, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'center','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'center','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la
'periodo03'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la columna
'totcom'=>array('justification'=>'center','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'center','width'=>70),
'modpres'=>array('justification'=>'center','width'=>70),
'precom'=>array('justification'=>'center','width'=>100),
'libprecom'=>array('justification'=>'center','width'=>100),
'disponible'=>array('justification'=>'center','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'periodo03'=>''.$as_nomper03.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
$la_data=array(array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>''.$ls_disponibilidad.'',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'periodo03'=>''.$as_nomper03.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>' DISPONIBLE AL: '.$ad_fecha.''));
break;
}
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_cabecera_detalle
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_detalle($la_data,$ai_estilo,$as_nomper01,$as_nomper02,$as_nomper03,&$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: 12/09/2006
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//print_r($la_data);
switch($ai_estilo)
{
case 1:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'left','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'left','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'right','width'=>150), // Justificación y ancho de la columna
'totcom'=>array('justification'=>'right','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'right','width'=>70),
'modpres'=>array('justification'=>'right','width'=>70),
'precom'=>array('justification'=>'right','width'=>125),
'libprecom'=>array('justification'=>'right','width'=>125),
'disponible'=>array('justification'=>'right','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
break;
case 2:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'left','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'left','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>105), // Justificación y ancho de la
'totcom'=>array('justification'=>'right','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'right','width'=>70),
'modpres'=>array('justification'=>'right','width'=>70),
'precom'=>array('justification'=>'right','width'=>100),
'libprecom'=>array('justification'=>'right','width'=>100),
'disponible'=>array('justification'=>'right','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
break;
case 3:
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 7, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'colGap'=>0.5, // separacion entre tablas
'width'=>990, // Ancho de la tabla
'maxWidth'=>990, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>502, // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'left','width'=>80), // Justificación y ancho de la
'denominacion'=>array('justification'=>'left','width'=>150), // Justificación y ancho
'disponact'=>array('justification'=>'right','width'=>70), // Justificación y ancho
'periodo01'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'periodo02'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la
'periodo03'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna
'totcom'=>array('justification'=>'right','width'=>70),// Justificación y ancho
'ajucom'=>array('justification'=>'right','width'=>70),
'modpres'=>array('justification'=>'right','width'=>70),
'precom'=>array('justification'=>'right','width'=>100),
'libprecom'=>array('justification'=>'right','width'=>100),
'disponible'=>array('justification'=>'right','width'=>70))); // Justificación y ancho
$la_columnas=array('cuenta'=>'CODIGO',
'denominacion'=>'DENOMINACION',
'disponact'=>'DISPONIBILIDAD',
'periodo01'=>''.$as_nomper01.'',
'periodo02'=>''.$as_nomper02.'',
'periodo03'=>''.$as_nomper03.'',
'totcom'=>'TOTAL CAUSADO',
'ajucom'=>'AJUSTE/COMP',
'modpres'=>'MOD. PRES',
'precom'=>'COMPROMETIDO',
'libprecom'=>'LIBER./COMPROMISO',
'disponible'=>'DISPONIBILIDAD AL: ');
break;
}
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
}// end function uf_print_detalle
//--------------------------------------------------------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------------------------------------------------
require_once("../../shared/ezpdf/class.ezpdf.php");
require_once("sigesp_spg_funciones_reportes.php");
$io_function_report = new sigesp_spg_funciones_reportes();
require_once("../../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
require_once("../../shared/class_folder/class_fecha.php");
$io_fecha = new class_fecha();
//-----------------------------------------------------------------------------------------------------------------------------
require_once("sigesp_spg_reportes_class.php");
$io_report = new sigesp_spg_reportes_class();
$li_candeccon=$_SESSION["la_empresa"]["candeccon"];
$li_tipconmon=$_SESSION["la_empresa"]["tipconmon"];
$li_redconmon=$_SESSION["la_empresa"]["redconmon"];
//------------------------------------------------------------------------------------------------------------------------------
//-------------------------------------------------- Parámetros para Filtar el Reporte ------------------------------------
$li_estmodest = $_SESSION["la_empresa"]["estmodest"];
$ldt_periodo = $_SESSION["la_empresa"]["periodo"];
$li_ano = substr($ldt_periodo,0,4);
$ls_codestpro1 = $_GET["codestpro1"];
$ls_codestpro2 = $_GET["codestpro2"];
$ls_codestpro3 = $_GET["codestpro3"];
$ls_codestpro1h = $_GET["codestpro1h"];
$ls_codestpro2h = $_GET["codestpro2h"];
$ls_codestpro3h = $_GET["codestpro3h"];
$ls_estclades = $_GET["estclades"];
$ls_estclahas = $_GET["estclahas"];
$li_consolidado = $_GET["consolidado"];
$ld_tipper = $_GET["tipper"];
$ld_periodo = $_GET["periodo"];
$ls_cuentades = $_GET["txtcuentades"];
$ls_cuentahas = $_GET["txtcuentahas"];
$ls_text_periodo = $_GET["tperiodo"];
switch($ld_tipper)
{
case 1:
$ld_per01 = intval($ld_periodo);
$ld_per02 = "";
$ld_per03 = "";
$ls_desper = "MENSUAL";
$ld_fecfinrep=$io_fecha->uf_last_day($ld_periodo,$li_ano);
$ld_anterior = 1;
break;
case 2:
$ld_per01 = intval(substr($ld_periodo,0,2));
$ld_per02 = intval(substr($ld_periodo,2,2));
$ls_desper = "BIMENSUAL";
$ld_fecfinrep=$io_fecha->uf_last_day(substr($ld_periodo,2,2),$li_ano);
$ld_per03 = "";
$ld_anterior = 2;
break;
case 3:
$ld_per01 = intval(substr($ld_periodo,0,2));
$ld_per02 = intval(substr($ld_periodo,2,2));
$ld_per03 = intval(substr($ld_periodo,4,2));
$ls_desper = "TRIMESTRAL";
$ld_fecfinrep=$io_fecha->uf_last_day(substr($ld_periodo,4,2),$li_ano);
$ld_anterior = 3;
break;
}
if ($ld_per01==1)
{
$ls_disponibilidad = "PROGRAMADO";
}
else
{
$ls_disponibilidad = "DISP. ANTERIOR";
}
if($li_estmodest==1)
{
$ls_codestpro4 = "0000000000000000000000000";
$ls_codestpro5 = "0000000000000000000000000";
$ls_codestpro4h = "0000000000000000000000000";
$ls_codestpro5h = "0000000000000000000000000";
}
elseif($li_estmodest==2)
{
$ls_codestpro4 = $_GET["codestpro4"];
$ls_codestpro5 = $_GET["codestpro5"];
$ls_codestpro4h = $_GET["codestpro4h"];
$ls_codestpro5h = $_GET["codestpro5h"];
}
///////////////////////////////// SEGURIDAD ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$ls_desc_event="Solicitud de Reporte Ejecucion Financiera del Presupuesto - Causado";
$io_function_report->uf_load_seguridad_reporte("SPG","sigesp_spg_r_ejecucion_financiera_causado.php",$ls_desc_event);
//////////////////////////////// SEGURIDAD ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//---------------------------------------------------- Parámetros del encabezado ----------------------------------------------
$ls_titulo=" EJECUCION FINANCIERA DEL PRESUPUESTO DE GASTO - CAUSADO ".$ls_desper." AL ".$ld_fecfinrep." ";
//--------------------------------------------------------------------------------------------------------------------------------
// Cargar el dts_cab con los datos de la cabecera del reporte( Selecciono todos comprobantes )
if($li_estmodest==1)
{
$ls_codestpro1_min = $ls_codestpro1;
$ls_codestpro2_min = $ls_codestpro2;
$ls_codestpro3_min = $ls_codestpro3;
$ls_codestpro1h_max = $ls_codestpro1h;
$ls_codestpro2h_max = $ls_codestpro2h;
$ls_codestpro3h_max = $ls_codestpro3h;
$ls_codestpro4_min = "0000000000000000000000000";
$ls_codestpro5_min = "0000000000000000000000000";
$ls_codestpro4h_max = "0000000000000000000000000";
$ls_codestpro5h_max = "0000000000000000000000000";
if(($ls_codestpro1_min=="")&&($ls_codestpro2_min=="")&&($ls_codestpro3_min==""))
{
if($io_function_report->uf_spg_reporte_select_min_programatica($ls_codestpro1_min,$ls_codestpro2_min,
$ls_codestpro3_min,$ls_codestpro4_min,
$ls_codestpro5_min,$ls_estclades))
{
$ls_codestpro1 = $ls_codestpro1_min;
$ls_codestpro2 = $ls_codestpro2_min;
$ls_codestpro3 = $ls_codestpro3_min;
$ls_codestpro4 = $ls_codestpro4_min;
$ls_codestpro5 = $ls_codestpro5_min;
}
}
else
{
$ls_codestpro1 = $ls_codestpro1_min;
$ls_codestpro2 = $ls_codestpro2_min;
$ls_codestpro3 = $ls_codestpro3_min;
$ls_codestpro4 = $ls_codestpro4_min;
$ls_codestpro5 = $ls_codestpro5_min;
}
if(($ls_codestpro1h_max=="")&&($ls_codestpro2h_max=="")&&($ls_codestpro3h_max==""))
{
if($io_function_report->uf_spg_reporte_select_max_programatica($ls_codestpro1h_max,$ls_codestpro2h_max,
$ls_codestpro3h_max,$ls_codestpro4h_max,
$ls_codestpro4h_max,$ls_estclahas))
{
$ls_codestpro1h = $ls_codestpro1h_max;
$ls_codestpro2h = $ls_codestpro2h_max;
$ls_codestpro3h = $ls_codestpro3h_max;
$ls_codestpro4h = $ls_codestpro4h_max;
$ls_codestpro5h = $ls_codestpro5h_max;
}
}
else
{
$ls_codestpro1h = $ls_codestpro1h_max;
$ls_codestpro2h = $ls_codestpro2h_max;
$ls_codestpro3h = $ls_codestpro3h_max;
$ls_codestpro4h = $ls_codestpro4h_max;
$ls_codestpro5h = $ls_codestpro5h_max;
}
}
elseif($li_estmodest==2)
{
$ls_codestpro1_min = $ls_codestpro1;
$ls_codestpro2_min = $ls_codestpro2;
$ls_codestpro3_min = $ls_codestpro3;
$ls_codestpro1h_max = $ls_codestpro1h;
$ls_codestpro2h_max = $ls_codestpro2h;
$ls_codestpro3h_max = $ls_codestpro3h;
$ls_codestpro4_min = $_GET["codestpro4"];
$ls_codestpro5_min = $_GET["codestpro5"];
$ls_codestpro4h_max = $_GET["codestpro4h"];
$ls_codestpro5h_max = $_GET["codestpro5h"];
if(($ls_codestpro1_min=='**') ||($ls_codestpro1_min==''))
{
$ls_codestpro1_min='';
}
else
{
$ls_codestpro1_min = $io_funciones->uf_cerosizquierda($ls_codestpro1_min,25);
}
if(($ls_codestpro2_min=='**') ||($ls_codestpro2_min==''))
{
$ls_codestpro2_min='';
}
else
{
$ls_codestpro2_min = $io_funciones->uf_cerosizquierda($ls_codestpro2_min,25);
}
if(($ls_codestpro3_min=='**')||($ls_codestpro3_min==''))
{
$ls_codestpro3_min='';
}
else
{
$ls_codestpro3_min = $io_funciones->uf_cerosizquierda($ls_codestpro3_min,25);
}
if(($ls_codestpro4_min=='**') ||($ls_codestpro4_min==''))
{
$ls_codestpro4_min='';
}
else
{
$ls_codestpro4_min = $io_funciones->uf_cerosizquierda($ls_codestpro4_min,25);
}
if(($ls_codestpro5_min=='**') ||($ls_codestpro5_min==''))
{
$ls_codestpro5_min='';
}else
{
$ls_codestpro5_min = $io_funciones->uf_cerosizquierda($ls_codestpro5_min,25);
}
if(($ls_codestpro1h_max=='**')||($ls_codestpro1h_max==''))
{
$ls_codestpro1h_max='';
}
else
{
$ls_codestpro1h_max = $io_funciones->uf_cerosizquierda($ls_codestpro1h_max,25);
}
if(($ls_codestpro2h_max=='**') ||($ls_codestpro2h_max==''))
{
$ls_codestpro2h_max='';
}else
{
$ls_codestpro2h_max = $io_funciones->uf_cerosizquierda($ls_codestpro2h_max,25);
}
if(($ls_codestpro3h_max=='**') ||($ls_codestpro3h_max==''))
{
$ls_codestpro3h_max='';
}else
{
$ls_codestpro3h_max = $io_funciones->uf_cerosizquierda($ls_codestpro3h_max,25);
}
if(($ls_codestpro4h_max=='**') ||($ls_codestpro4h_max==''))
{
$ls_codestpro4h_max='';
}else
{
$ls_codestpro4h_max = $io_funciones->uf_cerosizquierda($ls_codestpro4h_max,25);
}
if(($ls_codestpro5h_max=='**') || ($ls_codestpro5h_max==''))
{
$ls_codestpro5h_max='';
}else
{
$ls_codestpro5h_max = $io_funciones->uf_cerosizquierda($ls_codestpro5h_max,25);
}
if(($ls_codestpro1_min=="")||($ls_codestpro2_min=="")||($ls_codestpro3_min=="")||($ls_codestpro4_min=="")||($ls_codestpro5_min==""))
{
if($io_function_report->uf_spg_reporte_select_min_programatica($ls_codestpro1_min,$ls_codestpro2_min,$ls_codestpro3_min,
$ls_codestpro4_min,$ls_codestpro5_min,$ls_estclades))
{
$ls_codestpro1 = $ls_codestpro1_min;
$ls_codestpro2 = $ls_codestpro2_min;
$ls_codestpro3 = $ls_codestpro3_min;
$ls_codestpro4 = $ls_codestpro4_min;
$ls_codestpro5 = $ls_codestpro5_min;
}
}
else
{
$ls_codestpro1 = $ls_codestpro1_min;
$ls_codestpro2 = $ls_codestpro2_min;
$ls_codestpro3 = $ls_codestpro3_min;
$ls_codestpro4 = $ls_codestpro4_min;
$ls_codestpro5 = $ls_codestpro5_min;
}
if(($ls_codestpro1h_max=="")||($ls_codestpro2h_max=="")||($ls_codestpro3h_max=="")||($ls_codestpro4h_max=="")||($ls_codestpro5h_max==""))
{
if($io_function_report->uf_spg_reporte_select_max_programatica($ls_codestpro1h_max,$ls_codestpro2h_max,
$ls_codestpro3h_max,$ls_codestpro4h_max,
$ls_codestpro5h_max,$ls_estclahas))
{
$ls_codestpro1h = $ls_codestpro1h_max;
$ls_codestpro2h = $ls_codestpro2h_max;
$ls_codestpro3h = $ls_codestpro3h_max;
$ls_codestpro4h = $ls_codestpro4h_max;
$ls_codestpro5h = $ls_codestpro5h_max;
}
}
else
{
$ls_codestpro1h = $ls_codestpro1h_max;
$ls_codestpro2h = $ls_codestpro2h_max;
$ls_codestpro3h = $ls_codestpro3h_max;
$ls_codestpro4h = $ls_codestpro4h_max;
$ls_codestpro5h = $ls_codestpro5h_max;
}
}
$ls_codestpro1 = $io_funciones->uf_cerosizquierda($ls_codestpro1,25);
$ls_codestpro2 = $io_funciones->uf_cerosizquierda($ls_codestpro2,25);
$ls_codestpro3 = $io_funciones->uf_cerosizquierda($ls_codestpro3,25);
$ls_codestpro4 = $io_funciones->uf_cerosizquierda($ls_codestpro4,25);
$ls_codestpro5 = $io_funciones->uf_cerosizquierda($ls_codestpro5,25);
$ls_codestpro1h = $io_funciones->uf_cerosizquierda($ls_codestpro1h,25);
$ls_codestpro2h = $io_funciones->uf_cerosizquierda($ls_codestpro2h,25);
$ls_codestpro3h = $io_funciones->uf_cerosizquierda($ls_codestpro3h,25);
$ls_codestpro4h = $io_funciones->uf_cerosizquierda($ls_codestpro4h,25);
$ls_codestpro5h = $io_funciones->uf_cerosizquierda($ls_codestpro5h,25);
$lb_valido=$io_report->uf_spg_reportes_ejecucion_financiera_presupuesto_causado($ls_codestpro1,$ls_codestpro2,
$ls_codestpro3,$ls_codestpro4,
$ls_codestpro5,$ls_estclades,
$ls_codestpro1h,$ls_codestpro2h,
$ls_codestpro3h,$ls_codestpro4h,
$ls_codestpro5h,$ls_estclahas,
$ld_per01,$ld_per02,$ld_per03,
$ls_cuentades, $ls_cuentahas,$li_consolidado);
if($lb_valido==false) // Existe algún error ó no hay registros
{
print("");
}
else // Se Transfiere la data a otro arreglo para incluir subtotales por partida
{
$io_report->dts_reporte->group_noorder("programatica");
$li_tot=$io_report->dts_reporte->getRowCount("spg_cuenta");
$ld_totalp_disponible = 0;
$ld_totalp_comprometido = 0;
$ld_totalp_ajuste = 0;
$ld_totalp_modificaciones = 0;
$ld_totalp_precompromiso = 0;
$ld_totalp_libPrecompromiso = 0;
$ld_totalp_per1 = 0;
$ld_totalp_per2 = 0;
$ld_totalp_per3 = 0;
$ld_totalp_disponible_ant = 0;
$suma = 0;
$i=1;
for($z=1;$z<=$li_tot;$z++)
{
$li_tmp = ($z+1);
$ls_programatica = $io_report->dts_reporte->data["programatica"][$z];
$ls_spg_cuenta = trim($io_report->dts_reporte->data["spg_cuenta"][$z]);
$io_function_report->uf_get_spg_cuenta($ls_spg_cuenta,$ls_partida,$ls_generica,$ls_especifica,$ls_subesp);
$ls_status = $io_report->dts_reporte->data["status"][$z];
$ls_denominacion = trim($io_report->dts_reporte->data["denominacion"][$z]);
$ld_asignado = $io_report->dts_reporte->data["asignado"][$z];
if ($ld_per01==1)
{
$ld_dispact = $io_report->dts_reporte->data["asignado"][$z];
}
else
{
$ld_dispact = $io_report->dts_reporte->data["dispant"][$z];
}
//$ld_dispact = $io_report->dts_reporte->data["dispact"][$z];
$ld_disant = $io_report->dts_reporte->data["dispant"][$z];
$ld_periodo01 = $io_report->dts_reporte->data["periodo01"][$z];
$ld_periodo02 = $io_report->dts_reporte->data["periodo02"][$z];
$ld_periodo03 = $io_report->dts_reporte->data["periodo03"][$z];
$ld_modpres = $io_report->dts_reporte->data["modpres"][$z];
$ld_comprometido = $io_report->dts_reporte->data["comprometido"][$z];
$ld_libprecomprometido = $io_report->dts_reporte->data["libcomprometido"][$z];
$ld_libcomprometido = $io_report->dts_reporte->data["libcomprometido"][$z];
$ld_causado = $ld_periodo01 + $ld_periodo02 + $ld_periodo03;
$ld_disponible = $ld_disant + $ld_modpres - $ld_comprometido;
//$ld_disponible = $ld_disant;
$ls_estcla = $io_report->dts_reporte->data["estcla"][$z];
if ($z<$li_tot)
{
$ls_programatica_next=$io_report->dts_reporte->data["programatica"][$li_tmp];
$ls_partida_next=substr($io_report->dts_reporte->data["spg_cuenta"][$li_tmp],0,3);
}
elseif($z==$li_tot)
{
$ls_programatica_next='no_next';
$ls_partida_next='no_next';
}
if ($ls_partida!=$ls_partida_next)
{
$lb_partida = true;
}
else
{
$lb_partida = false;
}
switch($ld_tipper)
{
case 1:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>$ld_dispact,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible,
'lprintsub'=>false);
break;
case 2:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>$ld_dispact,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible,
'lprintsub'=>false);
break;
case 3:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>$ld_dispact,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible,
'lprintsub'=>false);
break;
}// switch
if($ls_status=="C")
{
//$ls_partida_aux=$ls_partida;
$ld_totalp_disponible = $ld_totalp_disponible + $ld_disponible;
$ld_totalp_comprometido = $ld_totalp_comprometido + $ld_causado;
$ld_totalp_disponible_ant = $ld_totalp_disponible_ant + $ld_disant;
$ld_totalp_ajuste = $ld_totalp_ajuste + $ld_libcomprometido;
$ld_totalp_modificaciones = $ld_totalp_modificaciones + $ld_modpres;
$ld_totalp_precompromiso = $ld_totalp_precompromiso + $ld_comprometido;
$ld_totalp_libPrecompromiso= $ld_totalp_libPrecompromiso + $ld_libprecomprometido;
$ld_totalp_per1 = $ld_totalp_per1 + $ld_periodo01;
$ld_totalp_per2 = $ld_totalp_per2 + $ld_periodo02;
$ld_totalp_per3 = $ld_totalp_per3 + $ld_periodo03;
//echo $ls_programatica." - ".$ls_spg_cuenta." - ".$ld_totalp_precompromiso."
";
//echo $ls_spg_cuenta." - ".$ld_totalp_precompromiso."
";
}
if ($ls_partida!=$ls_partida_next)
{
$i++;
switch($ld_tipper)
{
case 1:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>$ld_dispact,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>'Total Partida '.$ls_partida.'',
'denominacion'=>'',
'disponact'=>$ld_totalp_disponible_ant,
'periodo01'=>$ld_totalp_per1,
'periodo02'=>$ld_totalp_per2,
'periodo03'=>$ld_totalp_per3,
'totcom'=>$ld_totalp_comprometido,
'ajucom'=>$ld_totalp_ajuste,
'modpres'=>$ld_totalp_modificaciones,
'precom'=>$ld_totalp_precompromiso,
'libprecom'=>$ld_totalp_libPrecompromiso,
'disponible'=>$ld_totalp_disponible,
'lprintsub'=>true);
break;
case 2:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>$ld_dispact,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>'Total Partida '.$ls_partida.'',
'denominacion'=>'',
'disponact'=>$ld_totalp_disponible_ant,
'periodo01'=>$ld_totalp_per1,
'periodo02'=>$ld_totalp_per2,
'periodo03'=>$ld_totalp_per3,
'totcom'=>$ld_totalp_comprometido,
'ajucom'=>$ld_totalp_ajuste,
'modpres'=>$ld_totalp_modificaciones,
'precom'=>$ld_totalp_precompromiso,
'libprecom'=>$ld_totalp_libPrecompromiso,
'disponible'=>$ld_totalp_disponible,
'lprintsub'=>true);
break;
case 3:
$la_data_temp[$i]=array('programatica'=>$ls_programatica,
'dispact'=>0,
'dispant'=>$ld_disant,
'precomprometido'=>$ld_comprometido,
'libprecomprometido'=>$ld_libprecomprometido,
'libcomprometido'=>$ld_libcomprometido,
'status'=>$ls_status,
'estcla'=>$ls_estcla,
'cuenta'=>'Total Partida '.$ls_partida.'',
'denominacion'=>'',
'disponact'=>$ld_totalp_disponible_ant,
'periodo01'=>$ld_totalp_per1,
'periodo02'=>$ld_totalp_per2,
'periodo03'=>$ld_totalp_per3,
'totcom'=>$ld_totalp_comprometido,
'ajucom'=>$ld_totalp_ajuste,
'modpres'=>$ld_totalp_modificaciones,
'precom'=>$ld_totalp_precompromiso,
'libprecom'=>$ld_totalp_libPrecompromiso,
'disponible'=>$ld_totalp_disponible,
'lprintsub'=>true);
break;
}// switch
$ld_totalp_disponible = 0;
$ld_totalp_comprometido = 0;
$ld_totalp_ajuste = 0;
$ld_totalp_modificaciones = 0;
$ld_totalp_precompromiso = 0;
$ld_totalp_libPrecompromiso = 0;
$ld_totalp_per1 = 0;
$ld_totalp_per2 = 0;
$ld_totalp_per3 = 0;
$ld_totalp_disponible_ant = 0;
}
$i++;
}//for
$i++;
//error_reporting(E_ALL);
//set_time_limit(1800);
ini_set('memory_limit','2000M');
$io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
if($_SESSION["la_empresa"]["estmodest"] == 1)
{
$io_pdf->ezSetCmMargins(5.4,3,3,3); // Configuración de los margenes en centímetros
}
elseif($_SESSION["la_empresa"]["estmodest"] == 2)
{
$io_pdf->ezSetCmMargins(6.1,3,3,3); // Configuración de los margenes en centímetros
}
uf_print_encabezado_pagina($ls_titulo,$io_pdf); // Imprimimos el encabezado de la página
$io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página
if($li_consolidado == 0)
{
$io_report->dts_reporte->group_noorder("programatica");
}
$li_tot=$io_report->dts_reporte->getRowCount("spg_cuenta");
$ls_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"];
$ls_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"];
$ls_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"];
$ls_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"];
$ls_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"];
$ls_denestpro1="";
$ls_denestpro2="";
$ls_denestpro3="";
$ls_denestpro4="";
$ls_denestpro5="";
$ls_partida="";
$ls_partida_next="";
$ld_total_disponible = 0;
$ld_total_disponible_ant = 0;
$ld_total_comprometido = 0;
$ld_total_ajuste = 0;
$ld_total_modificaciones = 0;
$ld_total_precompromiso = 0;
$ld_total_libPrecompromiso = 0;
$ld_total_per1 = 0;
$ld_total_per2 = 0;
$ld_total_per3 = 0;
$ls_partida_aux="";
$ls_denestpro1="";
$ls_denestpro2="";
$ls_denestpro3="";
$ls_denestpro4="";
$ls_denestpro5="";
$ls_denestpro1h="";
$ls_denestpro2h="";
$ls_denestpro3h="";
$ls_denestpro4h="";
$ls_denestpro5h="";
$ld_totalp_disponible = 0;
$ld_totalp_comprometido = 0;
$ld_totalp_ajuste = 0;
$ld_totalp_modificaciones = 0;
$ld_totalp_precompromiso = 0;
$ld_totalp_libPrecompromiso = 0;
$ld_totalp_per1 = 0;
$ld_totalp_per2 = 0;
$ld_totalp_per3 = 0;
$ld_totalp_disponible_ant = 0;
for($z=1;$z<=($i-2);$z++)
{
$li_tmp = ($z+1);
$thisPageNum = $io_pdf->ezPageCount;
$ls_programatica = $la_data_temp[$z]["programatica"];
$ls_spg_cuenta = trim($la_data_temp[$z]["cuenta"]);
$ls_status = $la_data_temp[$z]["status"];
$lb_lprintsub = $la_data_temp[$z]["lprintsub"];
$io_function_report->uf_get_spg_cuenta($ls_spg_cuenta,$ls_partida,$ls_generica,$ls_especifica,$ls_subesp);
if ($z<($i-2))
{
$ls_programatica_next=$la_data_temp[$li_tmp]["programatica"];
$ls_partida_next=substr($la_data_temp[$li_tmp]["cuenta"],0,3);
}
elseif($z==($i-2))
{
$ls_programatica_next='no_next';
$ls_partida_next='no_next';
}
if(!empty($ls_programatica))
{
$ls_estcla=$la_data_temp[$z]["estcla"];
$ls_codestpro1=substr($ls_programatica,0,25);
$ls_denestpro1="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro1($ls_codestpro1,$ls_denestpro1,$ls_estcla);
if($lb_valido)
{
$ls_denestpro1=trim($ls_denestpro1);
}
$ls_codestpro2=substr($ls_programatica,25,25);
if($lb_valido)
{
$ls_denestpro2="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro2($ls_codestpro1,$ls_codestpro2,$ls_denestpro2,$ls_estcla);
$ls_denestpro2=trim($ls_denestpro2);
}
$ls_codestpro3=substr($ls_programatica,50,25);
if($lb_valido)
{
$ls_denestpro3="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro3($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_denestpro3,$ls_estcla);
$ls_denestpro3=trim($ls_denestpro3);
}
if($li_estmodest==2)
{
$ls_codestpro4=substr($ls_programatica,75,25);
if($lb_valido)
{
$ls_denestpro4="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro4($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_denestpro4,$ls_estcla);
$ls_denestpro4=trim($ls_denestpro4);
}
$ls_codestpro5=substr($ls_programatica,100,25);
if($lb_valido)
{
$ls_denestpro5="";
$lb_valido=$io_function_report->uf_spg_reporte_select_denestpro5($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_denestpro5,$ls_estcla);
$ls_denestpro5=trim($ls_denestpro5);
}
$ls_denestpro_ant=trim($ls_denestpro1)." , ".trim($ls_denestpro2)." , ".trim($ls_denestpro3)." , ".trim($ls_denestpro4)." , ".trim($ls_denestpro5);
$ls_programatica_ant=substr($ls_codestpro1,-$ls_loncodestpro1)."-".substr($ls_codestpro2,-$ls_loncodestpro2)."-".substr($ls_codestpro3,-$ls_loncodestpro3)."-".substr($ls_codestpro4,-$ls_loncodestpro4)."-".substr($ls_codestpro5,-$ls_loncodestpro5);
}
else
{
$ls_denestpro_ant=$ls_denestpro1." , ".$ls_denestpro2." , ".$ls_denestpro3;
$ls_programatica_ant=substr($ls_codestpro1,-$ls_loncodestpro1)."-".substr($ls_codestpro2,-$ls_loncodestpro2)."-".substr($ls_codestpro3,-$ls_loncodestpro3);
}
}
if($li_consolidado == 1)
{
$ls_codestpro1 = $io_funciones->uf_cerosizquierda($ls_codestpro1_min,25);
$ls_codestpro2 = $io_funciones->uf_cerosizquierda($ls_codestpro2_min,25);
$ls_codestpro3 = $io_funciones->uf_cerosizquierda($ls_codestpro3_min,25);
$ls_codestpro4 = $io_funciones->uf_cerosizquierda($ls_codestpro4_min,25);
$ls_codestpro5 = $io_funciones->uf_cerosizquierda($ls_codestpro5_min,25);
$ls_codestpro1h = $io_funciones->uf_cerosizquierda($ls_codestpro1h_max,25);
$ls_codestpro2h = $io_funciones->uf_cerosizquierda($ls_codestpro2h_max,25);
$ls_codestpro3h = $io_funciones->uf_cerosizquierda($ls_codestpro3h_max,25);
$ls_codestpro4h = $io_funciones->uf_cerosizquierda($ls_codestpro4h_max,25);
$ls_codestpro4h = $io_funciones->uf_cerosizquierda($ls_codestpro5h_max,25);
if($ls_codestpro1!="")
{
$ls_denestpro1="";
$io_function_report->uf_spg_reporte_select_denestpro1($ls_codestpro1,$ls_denestpro1,$ls_estclades);
}
if($ls_codestpro1h!="")
{
$ls_denestpro1h="";
$io_function_report->uf_spg_reporte_select_denestpro1($ls_codestpro1h,$ls_denestpro1h,$ls_estclahas);
}
if($ls_codestpro2!="")
{
$ls_denestpro2="";
$io_function_report->uf_spg_reporte_select_denestpro2($ls_codestpro1,$ls_codestpro2,$ls_denestpro2,$ls_estclades);
}
if($ls_codestpro2h!="")
{
$ls_denestpro2h="";
$io_function_report->uf_spg_reporte_select_denestpro2($ls_codestpro1h,$ls_codestpro2h,$ls_denestpro2h,$ls_estclahas);
}
if($ls_codestpro3!="")
{
$ls_denestpro3="";
$io_function_report->uf_spg_reporte_select_denestpro3($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_denestpro3,$ls_estclades);
}
if($ls_codestpro3h!="")
{
$ls_denestpro3h="";
$io_function_report->uf_spg_reporte_select_denestpro3($ls_codestpro1h,$ls_codestpro2h,$ls_codestpro3h,$ls_denestpro3h,$ls_estclahas);
}
if($li_estmodest==2)
{
if($ls_codestpro4!="")
{
$ls_denestpro4="";
$io_function_report->uf_spg_reporte_select_denestpro4($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_denestpro4,$ls_estclades);
}
if($ls_codestpro4h!="")
{
$ls_denestpro4h="";
$io_function_report->uf_spg_reporte_select_denestpro4($ls_codestpro1h,$ls_codestpro2h,$ls_codestpro3h,$ls_codestpro4h,$ls_denestpro4h,$ls_estclahas);
}
if($ls_codestpro5!="")
{
$ls_denestpro5="";
$io_function_report->uf_spg_reporte_select_denestpro5($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_denestpro5,$ls_estclades);
}
if($ls_codestpro5h!="")
{
$ls_denestpro5h="";
$io_function_report->uf_spg_reporte_select_denestpro5($ls_codestpro1h,$ls_codestpro2h,$ls_codestpro3h,$ls_codestpro4h,$ls_codestpro5h,$ls_denestpro5h,$ls_estclahas);
}
}
}
$ls_denominacion =trim($la_data_temp[$z]["denominacion"]);
$ld_dispact =$la_data_temp[$z]["dispact"];
$ld_disant =$la_data_temp[$z]["dispant"];
$ld_periodo01 =$la_data_temp[$z]["periodo01"];
$ld_periodo02 =$la_data_temp[$z]["periodo02"];
$ld_periodo03 =$la_data_temp[$z]["periodo03"];
$ld_modpres =$la_data_temp[$z]["modpres"];
if($lb_lprintsub)
{
$ld_comprometido =$la_data_temp[$z]["precom"];
$ld_disponact =$la_data_temp[$z]["disponact"];
$ld_disponible =$ld_disponact + $ld_modpres - $ld_comprometido; //- $ld_comprometido
}
else
{
$ld_comprometido =$la_data_temp[$z]["precomprometido"];
$ld_disponact =$la_data_temp[$z]["disponible"];
$ld_disponible =$ld_disant + $ld_modpres - $ld_comprometido; //- $ld_comprometido
}
$ld_libprecomprometido =$la_data_temp[$z]["libprecomprometido"];
$ld_libcomprometido =$la_data_temp[$z]["libcomprometido"];
$ld_causado =$ld_periodo01 + $ld_periodo02 + $ld_periodo03;
//print "ld_disant menos ld_comprometido mas ld_modpres menos ld_precomprometido
";
//print "$ld_disant menos $ld_causado mas $ld_modpres menos $ld_comprometido
";
//print "disponible: $ld_disponible
";
if(($ls_status == "C")&&(!$lb_lprintsub))
{
$ld_causado = $ld_periodo01 + $ld_periodo02 + $ld_periodo03;
$ld_disponible = $ld_disant + $ld_modpres - $ld_comprometido ; //- $ld_comprometido
//print "$ld_disponible
";
if ($ld_per01==1)
{
$ld_total_disponible_ant = $ld_total_disponible_ant+$la_data_temp[$z]["dispant"];
}
else
{
$ld_total_disponible_ant = $ld_total_disponible_ant+$la_data_temp[$z]["dispact"];
}
$ld_total_disponible = $ld_total_disponible + $ld_disponible;
$ld_total_comprometido = $ld_total_comprometido + $ld_causado;
$ld_total_ajuste = $ld_total_ajuste + $ld_libcomprometido;
$ld_total_modificaciones = $ld_total_modificaciones + $ld_modpres;
$ld_total_precompromiso = $ld_total_precompromiso + $ld_comprometido;
$ld_total_libPrecompromiso = $ld_total_libPrecompromiso + $ld_libprecomprometido;
$ld_total_per1 = $ld_total_per1 + $ld_periodo01;
$ld_total_per2 = $ld_total_per2 + $ld_periodo02;
$ld_total_per3 = $ld_total_per3 + $ld_periodo03;
}
$ld_disant =number_format($ld_disant,2,",",".");
$ld_dispact =number_format($ld_dispact,2,",",".");
$ld_periodo01 =number_format($ld_periodo01,2,",",".");
$ld_periodo02 =number_format($ld_periodo02,2,",",".");
$ld_periodo03 =number_format($ld_periodo03,2,",",".");
$ld_modpres =number_format($ld_modpres,2,",",".");
$ld_causado =number_format($ld_causado,2,",",".");
$ld_comprometido =number_format($ld_comprometido,2,",",".");
$ld_disponible =number_format($ld_disponible,2,",",".");
$ld_libprecomprometido =number_format($ld_libprecomprometido,2,",",".");
$ld_libcomprometido =number_format($ld_libcomprometido,2,",",".");
$ld_disponact =number_format($ld_disponact,2,",",".");
if (!empty($ls_programatica))
{
switch($ld_tipper)
{
case 1:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 2:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 3:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
}// switch
}
else
{
switch($ld_tipper)
{
case 1:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 2:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 3:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
} // switch
} //if
if (!empty($ls_programatica_next))
{
switch($ld_tipper)
{
case 1:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponact);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 2:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponact);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
case 3:
if ($lb_lprintsub)
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_disponact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponact);
}
else
{
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,
'denominacion'=>$ls_denominacion,
'disponact'=>$ld_dispact,
'periodo01'=>$ld_periodo01,
'periodo02'=>$ld_periodo02,
'periodo03'=>$ld_periodo03,
'totcom'=>$ld_causado,
'ajucom'=>$ld_libcomprometido,
'modpres'=>$ld_modpres,
'precom'=>$ld_comprometido,
'libprecom'=>$ld_libprecomprometido,
'disponible'=>$ld_disponible);
}
break;
} // switch
$ls_lapso_meses='';
//------>
switch($ld_tipper)
{
case 1:
{
$ls_lapso_meses=''.$ld_periodo01.'';
}
break;
case 2:
{
$ls_lapso_meses=''.$ld_periodo01.' - '.$ld_periodo02.'';
}
break;
case 3:
{
$ls_lapso_meses=''.$ld_periodo01.' - '.$ld_periodo03.'';
}
break;
} // switch
//print $ls_lapso_meses.'
';
//------->
$io_cabecera=$io_pdf->openObject();
if($li_consolidado == 0)
{
uf_print_cabecera($io_cabecera,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,
$ls_codestpro5,$ls_denestpro1,$ls_denestpro2,$ls_denestpro3,$ls_denestpro4,$ls_denestpro5,$ls_desper,$ls_lapso_meses,$ls_text_periodo,$io_pdf);
}
elseif($li_consolidado == 1)
{
uf_print_cabecera_estructura($io_cabecera,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,
$ls_denestpro1,$ls_denestpro2,$ls_denestpro3,$ls_denestpro4,$ls_denestpro5,$ls_codestpro1h,
$ls_codestpro2h,$ls_codestpro3h,$ls_codestpro4h,$ls_codestpro5h,$ls_denestpro1h,$ls_denestpro2h,
$ls_denestpro3h,$ls_denestpro4h,$ls_denestpro5h,$ls_desper,$ls_lapso_meses,$ls_text_periodo,$io_pdf);
}
$io_encabezado=$io_pdf->openObject();
$io_function_report->uf_get_nom_mes($ld_per01,$as_nomper01);
$io_function_report->uf_get_nom_mes($ld_per02,$as_nomper02);
$io_function_report->uf_get_nom_mes($ld_per03,$as_nomper03);
uf_print_cabecera_detalle($io_encabezado,$ls_disponibilidad,$ld_tipper,$as_nomper01,$as_nomper02,$as_nomper03,$ld_fecfinrep,$io_pdf);
if($_SESSION["la_empresa"]["estmodest"] == 1)
{
$io_pdf->ezSetCmMargins(5.75,3,3,3);
}
elseif($_SESSION["la_empresa"]["estmodest"] == 2)
{
$io_pdf->ezSetCmMargins(6.35,3,3,3);
}
uf_print_detalle($la_data,$ld_tipper,$as_nomper01,$as_nomper02,$as_nomper03,$io_pdf); // Imprimimos el detalle
$ld_total_disponible =number_format($ld_total_disponible,2,",",".");
$ld_total_comprometido =number_format($ld_total_comprometido,2,",",".");
$ld_total_ajuste =number_format($ld_total_ajuste,2,",",".");
$ld_total_modificaciones =number_format($ld_total_modificaciones,2,",",".");
$ld_total_precompromiso =number_format($ld_total_precompromiso,2,",",".");
$ld_total_libPrecompromiso =number_format($ld_total_libPrecompromiso,2,",",".");
$ld_total_per1 =number_format($ld_total_per1,2,",",".");
$ld_total_per2 =number_format($ld_total_per2,2,",",".");
$ld_total_per3 =number_format($ld_total_per3,2,",",".");
$ld_total_disponible_ant =number_format($ld_total_disponible_ant,2,",",".");
uf_print_pie_cabecera($ld_tipper,$as_nomper01,$as_nomper02,$as_nomper03,$ld_total_per1,$ld_total_per2,$ld_total_per3,$ld_total_disponible,$ld_total_comprometido,$ld_total_ajuste,
$ld_total_modificaciones,$ld_total_precompromiso,$ld_total_libPrecompromiso,$io_pdf,'Total Bs.',$ld_total_disponible_ant);
//Reinicializa valores
$ld_total_disponible = 0;
$ld_total_disponible_ant = 0;
$ld_total_comprometido = 0;
$ld_total_ajuste = 0;
$ld_total_modificaciones = 0;
$ld_total_precompromiso = 0;
$ld_total_libPrecompromiso = 0;
$ld_total_per1 = 0;
$ld_total_per2 = 0;
$ld_total_per3 = 0;
//---
$io_pie_pagina=$io_pdf->openObject();
$io_pdf->stopObject($io_pie_pagina);
$io_pie_pagina=$io_pdf->openObject();
$io_pdf->stopObject($io_cabecera);
$io_pdf->stopObject($io_encabezado);
$io_pdf->stopObject($io_pie_pagina);
if ((!empty($ls_programatica_next))&&($z<$li_tot))
{
$io_pdf->ezNewPage(); // Insertar una nueva página
}
$ld_total_general_cuenta=0;
unset($la_data);
unset($la_data_tot);
}//if
}//for
$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 '';
}
elseif ($li_tot>0)
{
$io_pdf->ezStream();
}
else
{
print("");
}
unset($io_pdf);
}
unset($io_report);
unset($io_funciones);
unset($io_function_report);
unset($io_fecha);
?>