"; print "close();"; print ""; } //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina($as_titulo,$as_nombre_empresa,$as_bs,&$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: 29/08/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->line(15,30,1000,30); $io_pdf->rectangle(15,480,988,110); $li_tm=$io_pdf->getTextWidth(12,$as_nombre_empresa); $tm=505-($li_tm/2); $io_pdf->addText($tm,530,12,$as_nombre_empresa); // Agregar el título $li_tm=$io_pdf->getTextWidth(12,$as_titulo); $tm=505-($li_tm/2); $io_pdf->addText($tm,515,12,$as_titulo); // Agregar el título $li_tm=$io_pdf->getTextWidth(12,$as_bs); $tm=505-($li_tm/2); $io_pdf->addText($tm,500,12,$as_bs); // Agregar el título $io_pdf->addText(15,40,10,'Forma: 0402'); // Agregar la Fecha $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_titulo_reporte($ai_ano,$as_meses_trimestre,$as_etiqueta,&$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: 29/08/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->ezSetY(590); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_nombre=$_SESSION["la_empresa"]["nombre"]; $ls_nomorgads=$_SESSION["la_empresa"]["nomorgads"]; $la_data=array(array('name'=>'CODIGO DEL ENTE: '.''.$ls_codemp.''), array('name'=>'DENOMINACION: '.''.$ls_nombre.''), array('name'=>'ORGANO DE ADSCRIPCION: '.''.$ls_nomorgads.'')); $la_columna=array('name'=>'','name'=>'','name'=>''); $la_config =array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xPos'=>265,//65 'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra 'xOrientation'=>'center', // Orientación de la tabla 'width'=>990, // Ancho de la tabla 'maxWidth'=>990, 'cols'=>array('name'=>array('justification'=>'left','width'=>500), 'name'=>array('justification'=>'left','width'=>500))); $io_pdf->ezTable($la_data,$la_columna,'',$la_config); $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_encabezadopagina //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_titulo($as_etiqueta,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_titulo // Access: private // Arguments: as_codper // total de registros que va a tener el reporte // as_nomper // total de registros que va a tener el reporte // io_pdf // total de registros que va a tener el reporte // Description: función que imprime la cabecera de cada página // Creado Por: Ing. Yozelin Barragán // Fecha Creación: 29/08/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->ezSetY(475); $la_data=array(array('name1'=>'','name2'=>'PROGRAMADO', 'name3'=>'EJECUTADO','name4'=>'VARIACION', 'name5'=>'PREVISION PROXIMO MES')); $la_columna=array('name1'=>'','name2'=>'','name3'=>'','name4'=>'','name5'=>''); $la_config =array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xPos'=>509, 'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra 'xOrientation'=>'center', // Orientación de la tabla 'width'=>990, // Ancho de la tabla 'maxWidth'=>990, 'colGap'=>0.5, 'cols'=>array('name1'=>array('justification'=>'center','width'=>225),// Justificación y ancho de la columna 'name2'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name3'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name4'=>array('justification'=>'center','width'=>340),// Justificación y ancho de la columna 'name5'=>array('justification'=>'center','width'=>85),)); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); unset($la_data); unset($la_columna); $la_data=array(array('name1'=>'','name2'=>'', 'name3'=>'','name4'=>'MES', 'name5'=>'ACUMULADA', 'name6'=>'')); $la_columna=array('name1'=>'','name2'=>'','name3'=>'','name4'=>'','name5'=>'','name6'=>''); $la_config =array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xPos'=>509, 'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra 'xOrientation'=>'center', // Orientación de la tabla 'width'=>990, // Ancho de la tabla 'maxWidth'=>990, 'colGap'=>0.5, 'cols'=>array('name1'=>array('justification'=>'center','width'=>225),// Justificación y ancho de la columna 'name2'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name3'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name4'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name5'=>array('justification'=>'center','width'=>170),// Justificación y ancho de la columna 'name6'=>array('justification'=>'center','width'=>85))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_titulo //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_cabecera($as_etiqueta,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_cabecera // Access: private // Arguments: as_codper // total de registros que va a tener el reporte // as_nomper // total de registros que va a tener el reporte // io_pdf // total de registros que va a tener el reporte // Description: función que imprime la cabecera de cada página // Creado Por: Ing. Yozelin Barragán // Fecha Creación: 29/08/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $la_data=array(array('cuenta'=>'Cuenta','denominacion'=>'Denominación','programado'=>'Mes', 'programado_acumulado'=>'Acumulado','ejecutado'=>'Mes', 'ejecutado_acumulado'=>'Acumulado','absoluta'=>'Absoluta', 'porcentaje'=>'Porcentaje (%)','absoluta_acumulado'=>'Absoluta', 'porcentaje_acumulado'=>'Porcentaje (%)','prevision'=>'')); $la_columna=array('cuenta'=>'','denominacion'=>'','programado'=>'','programado_acumulado'=>'','ejecutado'=>'', 'ejecutado_acumulado'=>'','absoluta'=>'','porcentaje'=>'','absoluta_acumulado'=>'', 'porcentaje_acumulado'=>'','prevision'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 8, // Tamaño de Letras de los títulos 'showLines'=>2, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra 'xOrientation'=>'center', // Orientación de la tabla 'xPos'=>509, 'width'=>990, // Ancho de la tabla 'maxWidth'=>990, 'colGap'=>0.5, 'cols'=>array('cuenta'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'center','width'=>140), // Justificación y ancho de la columna 'programado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'programado_acumulado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'ejecutado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'ejecutado_acumulado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'absoluta'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'porcentaje'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'absoluta_acumulado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'porcentaje_acumulado'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'prevision'=>array('justification'=>'center','width'=>85))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_cabecera //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- 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: 29/08/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 8, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xPos'=>509, 'width'=>990, // Ancho de la tabla 'maxWidth'=>990, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'colGap'=>0.5, 'cols'=>array('cuenta'=>array('justification'=>'center','width'=>85), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>140), // Justificación y ancho de la columna 'programado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'programado_acumulado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'ejecutado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'ejecutado_acumulado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'absoluta'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'porcentaje'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'absoluta_acumulado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'porcentaje_acumulado'=>array('justification'=>'right','width'=>85), // Justificación y ancho de la columna 'prevision'=>array('justification'=>'right','width'=>85))); // Justificación y ancho de la columna $la_columnas=array('cuenta'=>'', 'denominacion'=>'', 'programado'=>'', 'programado_acumulado'=>'', 'ejecutado'=>'', 'ejecutado_acumulado'=>'', 'absoluta'=>'', 'porcentaje'=>'', 'absoluta_acumulado'=>'', 'porcentaje_acumulado'=>'', 'prevision'=>''); $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); }// end function uf_print_detalle //-------------------------------------------------------------------------------------------------------------------------------- require_once("../../shared/ezpdf/class.ezpdf.php"); 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(); $ls_tipoformato=$_GET["tipoformato"]; //----------------------------------------------------------------------------------------------------------------------------- global $ls_tipoformato; global $la_data_tot_bsf; global $la_data_tot; if($ls_tipoformato==1) { require_once("sigesp_spg_reporte_comparado_0402_bsf.php"); $io_report = new sigesp_spg_reporte_comparado_0402_bsf(); } else { require_once("sigesp_spg_reporte_comparado_0402.php"); $io_report = new sigesp_spg_reporte_comparado_0402(); } require_once("../../shared/class_folder/sigesp_c_reconvertir_monedabsf.php"); $io_rcbsf= new sigesp_c_reconvertir_monedabsf(); $li_candeccon=$_SESSION["la_empresa"]["candeccon"]; $li_tipconmon=$_SESSION["la_empresa"]["tipconmon"]; $li_redconmon=$_SESSION["la_empresa"]["redconmon"]; //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $ldt_periodo=$_SESSION["la_empresa"]["periodo"]; $ls_nombre=$_SESSION["la_empresa"]["nombre"]; $li_ano=substr($ldt_periodo,0,4); $ls_combo=$_GET["combomes"]; $ls_cant_mes=1; $ls_mes=substr($ls_combo,0,2); $ls_diades="01"; $ls_diahas=$io_fecha->uf_last_day($ls_mes,$li_ano); $ldt_fecdes=$ls_diades."/".$ls_mes."/".$li_ano; $ldt_fechas=$ls_diahas; $ls_etiqueta="Mensual"; //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_nombre_empresa="".$ls_nombre.""; $ls_titulo=" PRESUPUESTO DE CAJA (FORMA 0402)"; $ls_bs="(En Bolívares)"; //-------------------------------------------------------------------------------------------------------------------------------- // Cargar el dts_cab con los datos de la cabecera del reporte( Selecciono todos comprobantes ) $lb_valido=$io_report->uf_spg_reportes_comparados_presupuesto_de_caja($ldt_fecdes,$ldt_fechas,$ls_etiqueta); if($lb_valido==false) // Existe algún error ó no hay registros { print(""); } else // Imprimimos el reporte { //error_reporting(E_ALL); //set_time_limit(1800); $io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra $io_pdf->ezSetCmMargins(6.7,3,3,3); // Configuración de los margenes en centímetros uf_print_encabezado_pagina($ls_titulo,$ls_nombre_empresa,$ls_bs,$io_pdf); // Imprimimos el encabezado de la página $io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página $li_total=$io_report->dts_reporte_final->getRowCount("spg_cuenta"); for($z=1;$z<=$li_total;$z++) { $thisPageNum=$io_pdf->ezPageCount; $ls_spg_cuenta=trim($io_report->dts_reporte_final->data["spg_cuenta"][$z]); $ls_denominacion=trim($io_report->dts_reporte_final->data["denominacion"][$z]); $li_nivel=$io_report->dts_reporte_final->data["nivel"][$z]; $ls_tipo_cuenta=$io_report->dts_reporte_final->data["tipo_cuenta"][$z]; $ls_status=$io_report->dts_reporte_final->data["status"][$z]; $ld_monto_programado=$io_report->dts_reporte_final->data["monto_programado"][$z]; $ld_monto_programado_acumulado=$io_report->dts_reporte_final->data["monto_programado_acumulado"][$z]; $ld_monto_ejecutado=$io_report->dts_reporte_final->data["monto_ejecutado"][$z]; $ld_monto_ejecutado_acumulado=$io_report->dts_reporte_final->data["monto_ejecutado_acumulado"][$z]; $ld_previsto=$io_report->dts_reporte_final->data["previsto"][$z]; $ld_tipo=$io_report->dts_reporte_final->data["tipo"][$z]; $ld_variacion_absoluta=abs($ld_monto_programado-$ld_monto_ejecutado); $ld_variacion_absoluta_acumulado=abs($ld_monto_programado_acumulado-$ld_monto_ejecutado_acumulado); if(($ld_monto_ejecutado==0)or($ld_monto_programado==0)) { $ld_porcentaje_variacion=0; }//if else { $ld_producto=$ld_monto_ejecutado*100; $ld_porcentaje_variacion=$ld_producto/$ld_monto_programado; }//else if(($ld_monto_ejecutado_acumulado==0)or($ld_monto_programado_acumulado==0)) { $ld_porcentaje_variacion_acumulado=0; }//if else { $ld_producto_acumulado=$ld_monto_ejecutado_acumulado*100; $ld_porcentaje_variacion_acumulado=$ld_producto_acumulado/$ld_monto_programado_acumulado; }//else $ld_monto_programado=number_format($ld_monto_programado,2,",","."); $ld_monto_programado_acumulado=number_format($ld_monto_programado_acumulado,2,",","."); $ld_monto_ejecutado=number_format($ld_monto_ejecutado,2,",","."); $ld_monto_ejecutado_acumulado=number_format($ld_monto_ejecutado_acumulado,2,",","."); $ld_variacion_absoluta=number_format($ld_variacion_absoluta,2,",","."); $ld_variacion_absoluta_acumulado=number_format($ld_variacion_absoluta_acumulado,2,",","."); $ld_porcentaje_variacion=number_format($ld_porcentaje_variacion,2,",","."); $ld_porcentaje_variacion_acumulado=number_format($ld_porcentaje_variacion_acumulado,2,",","."); $ld_previsto=number_format($ld_previsto,2,",","."); $la_data[$z]=array('cuenta'=>$ls_spg_cuenta,'denominacion'=>$ls_denominacion,'programado'=>$ld_monto_programado, 'programado_acumulado'=>$ld_monto_programado_acumulado,'ejecutado'=>$ld_monto_ejecutado, 'ejecutado_acumulado'=>$ld_monto_ejecutado_acumulado,'absoluta'=>$ld_variacion_absoluta, 'porcentaje'=>$ld_porcentaje_variacion,'absoluta_acumulado'=>$ld_variacion_absoluta_acumulado, 'porcentaje_acumulado'=>$ld_porcentaje_variacion_acumulado,'prevision'=>$ld_previsto); }//for uf_print_titulo_reporte($li_ano,$ls_mes,$ls_etiqueta,$io_pdf); uf_print_titulo($ls_etiqueta,$io_pdf); uf_print_cabecera($ls_etiqueta,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle unset($la_data); if($z<$li_total) { $io_pdf->ezNewPage(); // Insertar una nueva página } $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); }//else unset($io_report); unset($io_funciones); ?>