"; print "close();"; print "opener.document.form1.submit();"; print ""; } //----------------------------------------------------------------------------------------------------------------------------------- function uf_insert_seguridad($as_titulo) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_insert_seguridad // Access: private // Arguments: as_titulo // Título del reporte // Description: función que guarda la seguridad de quien generó el reporte // Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang // Fecha Creación: 11/03/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_fun_sep; $ls_descripcion="Generó el Reporte ".$as_titulo; $lb_valido=$io_fun_sep->uf_load_seguridad_reporte("SEP","sigesp_sep_p_solicitud.php",$ls_descripcion); return $lb_valido; } //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina($as_titulo,$as_numsol,$ad_fecregsol,$as_estsol,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_encabezado_pagina // Access: private // Arguments: as_titulo // Título del Reporte // as_numsol // numero de la solicitud // ad_fecregsol // fecha de registro de la solicitud // io_pdf // Instancia de objeto pdf // Description: Función que imprime los encabezados por página // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->setStrokeColor(0,0,0); $io_pdf->line(480,700,480,760); //vertical $io_pdf->line(480,730,590,730); //Horizontal $io_pdf->Rectangle(40,700,550,60); $io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],45,705,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo if ($as_estsol=="A") { $io_pdf->addText(470,765,10,"ANULADO"); // Agregar la Fecha } $li_tm=$io_pdf->getTextWidth(11,$as_titulo); $tm=296-($li_tm/2); $io_pdf->addText($tm,730,11,$as_titulo); // Agregar el título $io_pdf->addText(485,740,9,"No. ".$as_numsol); // Agregar el título $io_pdf->addText(485,710,9,"Fecha ".$ad_fecregsol); // Agregar el título $io_pdf->addText(543,765,7,"Pág."); // Agregar texto // cuadro inferior $io_pdf->rectangle(40,60,550,100); // Agregar rectangulo grande $io_pdf->line(40,145,590,145); //Horizontal $io_pdf->line(315,60,315,160); //vertical $io_pdf->line(40,75,590,75); //Horizontal $io_pdf->addText(120,147,7,"ELABORADO POR"); // Agregar texto $io_pdf->addText(42,95,7,"Nombre:"); // Agregar texto $io_pdf->addText(48,78,7,"Cargo:"); // Agregar texto $io_pdf->addText(110,65,7,"FIRMA"); // Agregar texto $io_pdf->addText(420,147,7,"REVISADO POR"); // Agregar texto $io_pdf->addText(318,95,7,"Nombre:"); // Agregar texto $io_pdf->addText(323,78,7,"Cargo:"); // Agregar texto $io_pdf->addText(390,65,7,"SUB GERENCIA DE SERVIVIOS GENERALES"); // Agregar texto $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_encabezado_pagina //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_cabecera($as_numsol,$as_dentipsol,$as_denuniadm,$as_denfuefin,$as_codigo,$as_nombre,$as_consol,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_cabecera // Access: private // Arguments: as_numsol // numero de la solicitud de ejecucion presupuestaria // as_dentipsol // Denominacion del tipo de solicitud // as_denuniadm // Denominacion de la Unidad Ejecutora solicitante // as_denfuefin // Denominacion de la fuente de financiamiento // as_codigo // Codigo del Proveedor / Beneficiario // as_nombre // Nombre del Proveedor / Beneficiario // as_consol // Concepto // io_pdf // Instancia de objeto pdf // Description: función que imprime la cabecera por concepto // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $la_data[1]=array('titulo'=>'Unidad Solicitante','contenido'=>$as_denuniadm); $la_columnas=array('titulo'=>'', 'contenido'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'xPos'=>320, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'left','width'=>100), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'left','width'=>450))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); $la_data[1]=array('titulo'=>'Concepto','contenido'=>$as_consol,); $la_columnas=array('titulo'=>'', 'contenido'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'xPos'=>320, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'left','width'=>100), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'left','width'=>450))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); }// end function uf_print_cabecera //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle($la_data,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle // Access: private // Arguments: la_data // arreglo de información // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle por concepto // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-2); $la_datatitulos= array(array('numero'=>"No.",'codigo'=>"CODIGO",'denominacion'=>"DENOMINACION", 'cantidad'=>"CANTIDAD",'presentacion'=>"PRESENTACION")); $la_columna=array('numero'=>'No.', 'codigo'=>'CODIGO', 'denominacion'=>'DENOMINACION', 'cantidad'=>'CANTIDAD', 'presentacion'=>'PRESENTACION'); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol2'=>array(0.9,0.9,0.9), // Sombra entre líneas 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho Máximo de la tabla 'xPos'=>320, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('numero'=>array('justification'=>'center','width'=>40), // Justificación y ancho de la columna 'codigo'=>array('justification'=>'center','width'=>100), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'center','width'=>200), // Justificación y ancho de la columna 'cantidad'=>array('justification'=>'center','width'=>60), // Justificación y ancho de la columna 'presentacion'=>array('justification'=>'center','width'=>150))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatitulos,$la_columna,'',$la_config); unset($la_colunma); unset($la_config); $la_columna=array('numero'=>'No.', 'codigo'=>'Código', 'denominacion'=>'Denominación', 'cantidad'=>'Cantidad', 'presentacion'=>'Presentacion'); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>2, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho Máximo de la tabla 'xPos'=>320, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('numero'=>array('justification'=>'center','width'=>40), // Justificación y ancho de la columna 'codigo'=>array('justification'=>'center','width'=>100), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>200), // Justificación y ancho de la columna 'cantidad'=>array('justification'=>'center','width'=>60), // Justificación y ancho de la columna 'presentacion'=>array('justification'=>'center','width'=>150))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_cargos($la_data,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_cargos // Access: private // Arguments: la_data // arreglo de información // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle por concepto // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); $la_datatit[1]=array('titulo'=>' Detalle de Cargos '); $la_columnas=array('titulo'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'center','width'=>570))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatit,$la_columnas,'',$la_config); unset($la_datatit); unset($la_columnas); unset($la_config); $io_pdf->ezSetDy(-2); $la_columnas=array('codigo'=>'Código', 'dencar'=>'Denominación', 'monbasimp'=>'Base Imp.', 'monimp'=>'Cargo', 'monto'=>'Total'); $la_config=array('showHeadings'=>1, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('codigo'=>array('justification'=>'center','width'=>115), // Justificación y ancho de la columna 'dencar'=>array('justification'=>'left','width'=>200), // Justificación y ancho de la columna 'monbasimp'=>array('justification'=>'right','width'=>80), // Justificación y ancho de la columna 'monimp'=>array('justification'=>'right','width'=>80), // Justificación y ancho de la columna 'monto'=>array('justification'=>'right','width'=>95))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_cuentas($la_data,$as_programatica,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_cuentas // Access: private // Arguments: la_data // arreglo de información // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle por concepto // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); global $ls_estmodest; if($ls_estmodest==1) { $ls_titcuentas="Estructura Presupuestaria"; } else { $ls_titcuentas="Estructura Programatica"; } //--------------------------------- ESTRUCTURA PRESUPUESTARIA ----------------------------------------------------------- $la_dataest= array(array('name'=>'ESTRUCT. PRESUPUESTARIA: '.$as_programatica.'')); $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 'xPos'=>315, // Orientación de la tabla 'width'=>550, // Ancho de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'maxWidth'=>550); // Ancho Máximo de la tabla $io_pdf->ezTable($la_dataest,$la_columna,'',$la_config); unset($la_dataest); unset($la_columna); unset($la_config); //--------------------------------- TABLA CON EL TITULO DEL DETALLE PRESUPUESTARIO ----------------------------------------------------------- $la_datasercon= array(array('denominacion'=>"DENOMINACION",'cuenta'=>"PARTIDA",'monto'=>"DISPONIBLE")); $la_columna=array('denominacion'=>'DENOMINACION', 'cuenta'=>'PARTIDA ', 'monto'=>'DISPONIBLE'); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol2'=>array(0.9,0.9,0.9), // Sombra entre líneas 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho Máximo de la tabla 'xPos'=>320, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('denominacion'=>array('justification'=>'left','width'=>350), // Justificación y ancho de la columna 'cuenta'=>array('justification'=>'center','width'=>100), 'monto'=>array('justification'=>'center','width'=>100))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datasercon,$la_columna,'',$la_config); unset($la_datasercon); unset($la_columna); unset($la_config); //--------------------------------- TABLA CON EL DETALLE PRESUPUESTARIO ----------------------------------------------------------- $la_columna=array('denominacion'=>'DENOMINACION', 'cuenta'=>'PARTIDA', 'monto'=>'DISPONIBLE'); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // 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 'width'=>500, // Ancho de la tabla 'maxWidth'=>500, // Ancho Máximo de la tabla 'xPos'=>315, // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('denominacion'=>array('justification'=>'left','width'=>350), // Justificación y ancho de la columna 'cuenta'=>array('justification'=>'center','width'=>100), 'monto'=>array('justification'=>'center','width'=>100))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_piecabecera($li_subtot,$li_totcar,$li_montot,$ls_monlet,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_piecabecera // Acess: private // Arguments: li_subtot // Subtotal del articulo // li_totcar // Total cargos // li_montot // Monto total // ls_monlet //Monto en letras // io_pdf : Instancia de objeto pdf // Description: función que imprime los totales // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Modificado por: Ing. Yozelin Barragan // Fecha Creación: 11/03/2007 Fecha Última Modificación : 10/04/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_tipoformato; if($ls_tipoformato==1) { $ls_titsub="Bs.F."; $ls_titcar="Bs.F."; $ls_tittot="Bs.F."; } else { $ls_titsub="Bs."; $ls_titcar="Bs."; $ls_tittot="Bs."; } $la_data[1]=array('titulo'=>'Sub Total '.$ls_titsub.'','contenido'=>$li_subtot,); $la_columnas=array('titulo'=>'', 'contenido'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'right','width'=>450), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'right','width'=>120))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); $la_data[1]=array('titulo'=>'Cargos '.$ls_titcar.'','contenido'=>$li_totcar,); $la_columnas=array('titulo'=>'', 'contenido'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'right','width'=>450), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'right','width'=>120))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); $la_data[1]=array('titulo'=>'Total '.$ls_tittot.'','contenido'=>$li_montot,); $la_columnas=array('titulo'=>'', 'contenido'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>0, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'right','width'=>450), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'right','width'=>120))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); $io_pdf->ezSetDy(-5); $la_data[1]=array('titulo'=>' Son: '.$ls_monlet.''); $la_columnas=array('titulo'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'titleFontSize' => 12, // Tamaño de Letras de los títulos 'showLines'=>1, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'width'=>540, // Ancho de la tabla 'maxWidth'=>540, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('titulo'=>array('justification'=>'center','width'=>570))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_data); unset($la_columnas); unset($la_config); } //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------- Instancia de las clases ------------------------------------------------ require_once("../../shared/ezpdf/class.ezpdf.php"); require_once("../../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); require_once("../class_folder/class_funciones_sep.php"); $io_fun_sep=new class_funciones_sep(); $ls_estmodest=$_SESSION["la_empresa"]["estmodest"]; if($ls_estmodest==1) { $ls_titcuentas="Estructura Presupuestaria"; } else { $ls_titcuentas="Estructura Programatica"; } //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $ls_numsol=$io_fun_sep->uf_obtenervalor_get("numsol",""); $ls_tipoformato=$io_fun_sep->uf_obtenervalor_get("tipoformato",0); //-------------------------------------------------------------------------------------------------------------------------------- global $ls_tipoformato; if($ls_tipoformato==1) { require_once("sigesp_sep_class_reportbsf.php"); $io_report=new sigesp_sep_class_reportbsf(); } else { require_once("sigesp_sep_class_report.php"); $io_report=new sigesp_sep_class_report(); } //Instancio a la clase de conversión de numeros a letras. include("../../shared/class_folder/class_numero_a_letra.php"); $numalet= new class_numero_a_letra(); //imprime numero con los valore por defecto //cambia a minusculas $numalet->setMayusculas(1); //cambia a femenino $numalet->setGenero(1); //cambia moneda if($ls_tipoformato==1) { $numalet->setMoneda("Bolivares Fuerte"); $ls_moneda="EN Bs.F."; } else { $numalet->setMoneda("Bolivares"); $ls_moneda="EN Bs."; } //cambia prefijo $numalet->setPrefijo("***"); //cambia sufijo $numalet->setSufijo("***"); //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_titulo='VALIDACION PRESUPUESTARIA '.$ls_moneda.''; //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $lb_valido=uf_insert_seguridad($ls_titulo); // Seguridad de Reporte if($lb_valido) { $lb_valido=$io_report->uf_select_solicitud($ls_numsol); // Cargar el DS con los datos del reporte 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('LETTER','portrait'); // Instancia de la clase PDF $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra $io_pdf->ezSetCmMargins(3.6,2.5,3,3); // Configuración de los margenes en centímetros $io_pdf->ezStartPageNumbers(588,765,7,'','',1); // Insertar el número de página $li_totrow=$io_report->DS->getRowCount("numsol"); for($li_i=1;$li_i<=$li_totrow;$li_i++) { $ls_numsol=$io_report->DS->data["numsol"][$li_i]; $ls_dentipsol=$io_report->DS->data["dentipsol"][$li_i]; $ls_denuniadm=$io_report->DS->data["denuniadm"][$li_i]; $ls_denfuefin=$io_report->DS->data["denfuefin"][$li_i]; $ls_codpro=$io_report->DS->data["cod_pro"][$li_i]; $ls_cedbene=$io_report->DS->data["ced_bene"][$li_i]; $ls_nombre=$io_report->DS->data["nombre"][$li_i]; $ld_fecregsol=$io_report->DS->data["fecregsol"][$li_i]; $ls_consol=$io_report->DS->data["consol"][$li_i]; $li_monto=$io_report->DS->data["monto"][$li_i]; $li_monbasimptot=$io_report->DS->data["monbasinm"][$li_i]; $li_montotcar=$io_report->DS->data["montotcar"][$li_i]; $ls_estsol=$io_report->DS->data["estsol"][$li_i]; $numalet->setNumero($li_monto); $ls_monto= $numalet->letra(); $li_monto=number_format($li_monto,2,",","."); $li_monbasimptot=number_format($li_monbasimptot,2,",","."); $li_montotcar=number_format($li_montotcar,2,",","."); $ld_fecregsol=$io_funciones->uf_convertirfecmostrar($ld_fecregsol); if($ls_codpro!="----------") { $ls_codigo=$ls_codpro; } else { $ls_codigo=$ls_cedbene; } uf_print_encabezado_pagina($ls_titulo,$ls_numsol,$ld_fecregsol,$ls_estsol,$io_pdf); uf_print_cabecera($ls_numsol,$ls_dentipsol,$ls_denuniadm,$ls_denfuefin,$ls_codigo,$ls_nombre,$ls_consol,$io_pdf); $io_report->ds_detalle->reset_ds(); $lb_valido=$io_report->uf_select_dt_solicitud($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $li_totrowdet=$io_report->ds_detalle->getRowCount("codigo"); $la_data=""; for($li_s=1;$li_s<=$li_totrowdet;$li_s++) { $ls_codigo=$io_report->ds_detalle->data["codigo"][$li_s]; $ls_tipo=$io_report->ds_detalle->data["tipo"][$li_s]; $ls_denominacion=$io_report->ds_detalle->data["denominacion"][$li_s]; $ls_unidad=$io_report->ds_detalle->data["unidad"][$li_s]; $li_cantidad=$io_report->ds_detalle->data["cantidad"][$li_s]; $li_cosuni=$io_report->ds_detalle->data["monpre"][$li_s]; $li_basimp=$li_cosuni*$li_cantidad; $li_monart=$io_report->ds_detalle->data["monto"][$li_s]; $ls_denunimed=""; if(($ls_tipo=="B")&&($ls_unidad=="M")) { $li_unidad=$io_report->uf_select_dt_unidad($ls_codigo); $li_basimp=$li_cosuni*($li_cantidad*$li_unidad); $ls_codunimed = ""; $lb_valido=$io_report->uf_sep_select_unidad_medida($ls_codigo,$ls_codunimed); if($lb_valido) { $lb_valido=$io_report->uf_sep_select_denominacion_unidad_medida($ls_codigo,$ls_codunimed,$ls_denunimed); } } $li_monart=number_format($li_monart,2,".",""); $li_basimp=number_format($li_basimp,2,".",""); $li_cargos=($li_monart-$li_basimp); if($ls_unidad=="M") { $ls_unidad="MAYOR"; } else { $ls_unidad="DETAL"; } $li_cosuni=number_format($li_cosuni,2,",","."); $li_basimp=number_format($li_basimp,2,",","."); $li_monart=number_format($li_monart,2,",","."); $li_cargos=number_format($li_cargos,2,",","."); $la_data[$li_s]=array('numero'=>$li_s,'codigo'=>$ls_codigo,'denominacion'=>$ls_denominacion, 'cantidad'=>$li_cantidad,'presentacion'=>$ls_denunimed); } uf_print_detalle($la_data,$io_pdf); unset($la_data); $lb_valido=$io_report->uf_select_dt_cargos($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $li_totrowcargos=$io_report->ds_cargos->getRowCount("codigo"); $la_data=""; for($li_s=1;$li_s<=$li_totrowcargos;$li_s++) { $ls_codigo=$io_report->ds_cargos->data["codcar"][$li_s]; $ls_dencar=$io_report->ds_cargos->data["dencar"][$li_s]; $li_monbasimp=$io_report->ds_cargos->data["monbasimp"][$li_s]; $li_monimp=$io_report->ds_cargos->data["monimp"][$li_s]; $li_montocar=$io_report->ds_cargos->data["monto"][$li_s]; $li_monbasimp=number_format($li_monbasimp,2,",","."); $li_monimp=number_format($li_monimp,2,",","."); $li_montocar=number_format($li_montocar,2,",","."); $la_data[$li_s]=array('codigo'=>$ls_codigo,'dencar'=>$ls_dencar,'monbasimp'=>$li_monbasimp, 'monimp'=>$li_monimp,'monto'=>$li_montocar); } //uf_print_detalle_cargos($la_data,&$io_pdf); unset($la_data); $lb_valido=$io_report->uf_select_dt_spgcuentas($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $li_totrowcuentas=$io_report->ds_cuentas->getRowCount("codestpro1"); $la_data=""; for($li_s=1;$li_s<=$li_totrowcuentas;$li_s++) { $ls_codestpro1=trim($io_report->ds_cuentas->data["codestpro1"][$li_s]); $ls_codestpro2=trim($io_report->ds_cuentas->data["codestpro2"][$li_s]); $ls_codestpro3=trim($io_report->ds_cuentas->data["codestpro3"][$li_s]); $ls_codestpro4=trim($io_report->ds_cuentas->data["codestpro4"][$li_s]); $ls_codestpro5=trim($io_report->ds_cuentas->data["codestpro5"][$li_s]); $ls_spgcuenta=$io_report->ds_cuentas->data["spg_cuenta"][$li_s]; $ls_estcla=$io_report->ds_cuentas->data["estcla"][$li_s]; $ls_dencuenta=""; $lb_valido1=false; $lb_valido1 = $io_report->uf_select_denominacionspg($ls_spgcuenta,$ls_dencuenta); $ld_disponible =0; $lb_valido2=false; $lb_valido2 = $io_report->uf_select_disponible($ls_spgcuenta,$ls_codestpro1,$ls_codestpro2, $ls_codestpro3,$ls_codestpro4,$ls_codestpro5, $ls_estcla,$ld_disponible); $ld_disponible = number_format($ld_disponible,2,',','.'); if($ls_estmodest==1) { $ls_codestpro=$ls_codestpro1.$ls_codestpro2.$ls_codestpro3; } else { $ls_codestpro=$ls_codestpro1." - ".$ls_codestpro2." - ".$ls_codestpro3." - ".$ls_codestpro4." - ".$ls_codestpro5; } $li_montocta=$io_report->ds_cuentas->data["monto"][$li_s]; $li_montocta=number_format($li_montocta,2,",","."); $la_data[$li_s]=array('denominacion'=>$ls_dencuenta,'cuenta'=>$ls_spgcuenta,'monto'=>$ld_disponible); } uf_print_detalle_cuentas($la_data,$ls_codestpro,$io_pdf); unset($la_data); } } } } } //uf_print_piecabecera($li_monbasimptot,$li_montotcar,$li_monto,$ls_monto,&$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print(""); } } ?>