"; 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_cxp; $ls_descripcion="Generó el Reporte ".$as_titulo; $lb_valido=$io_fun_cxp->uf_load_seguridad_reporte("CXP","sigesp_cxp_p_solicitudpago.php",$ls_descripcion); return $lb_valido; } //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina($as_titulo,$as_numsol,$ad_fecregsol,$as_estprosol,&$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 / // Fecha Creación: 11/03/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->line(480,700,480,780); $io_pdf->line(480,740,585,740); $io_pdf->Rectangle(15,700,570,80); $io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],30,705,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo $io_pdf->addJpegFromFile('../../shared/imagebank/comunas_idena.jpg',15,43,528,35); // Agregar banne inferior if ($as_estprosol=="A") { $io_pdf->addText(487,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,750,9,"No. ".$as_numsol); // Agregar el título $io_pdf->addText(485,715,9,"Fecha ".$ad_fecregsol); // Agregar el título $io_pdf->addText(540,770,7,date("d/m/Y")); // Agregar la Fecha $io_pdf->addText(546,764,6,date("h:i a")); // Agregar la Hora // cuadro inferior $io_pdf->Rectangle(15,85,570,70); $io_pdf->line(15,145,585,145); // Horizontal Firmante Superior $io_pdf->addText(40,148,7,"ELABORADO POR"); // Agregar el título $io_pdf->addText(42,90,7,$_SESSION["la_nomusu"], $_SESSION["la_apeusu"]); // Agregar el título $io_pdf->line(145,85,145,155); // Vertical $io_pdf->addText(195,148,7,"APROBADO POR"); // Agregar el título $io_pdf->addText(185,90,7,"FIRMA / SELLO / FECHA"); // Agregar el título $io_pdf->line(290,85,290,155); // Vertical $io_pdf->addText(335,148,7,"AUTORIZADO POR"); // Agregar el título $io_pdf->addText(315,90,7,"ADMINISTRACIÓN Y FINANZAS"); // Agregar el título $io_pdf->line(435,85,435,155); // Vertical $io_pdf->addText(470,148,7,"CONTABILIZADO POR"); // Agregar el título $io_pdf->addText(465,90,7,"FIRMA / SELLO / FECHA"); // Agregar el título $io_pdf->line(15,100,585,100); // Horizontal Firmante Inferior $io_pdf->line(15,40,585,40); // Linea Horizontal pie de pagina $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_codigo,$as_nombre,$as_denfuefin,$ad_fecemisol,$as_consol,$as_obssol, $ai_monsol,$as_monto,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_cabecera // Access: private // Arguments: as_numsol // Numero de la Solicitud de Pago // as_codigo // Codigo del Proveedor / Beneficiario // as_nombre // Nombre del Proveedor / Beneficiario // as_denfuefin // Denominacion de la fuente de financiamiento // ad_fecemisol // Fecha de Emision de la Solicitud // as_consol // Concepto de la Solicitud // as_obssol // Observaciones de la Solicitud // ai_monsol // Monto de la Solicitud // as_monto // Monto de la Solicitud en letras // io_pdf // Instancia de objeto pdf // Description: función que imprime la cabecera // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Fecha Creación: 17/05/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $la_data[1]=array('titulo'=>' Beneficiario'); $la_data[2]=array('titulo'=>" ".$as_nombre); $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 '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'=>'left','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); $la_data[1]=array('titulo'=>' Concepto: '.$as_consol); $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 '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'=>'left','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); $la_data[1]=array('titulo'=>'Monto en Letras: '.$as_monto,); $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 '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'=>'left','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); global $ls_tiporeporte; if($ls_tiporeporte==1) { $ls_titulo=" Bs.F."; } else { $ls_titulo=" Bs."; } $la_data[1]=array('titulo'=>''.$ls_titulo.'','contenido'=>$ai_monsol,); $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'=>1, // 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'=>400), // Justificación y ancho de la columna 'contenido'=>array('justification'=>'center','width'=>170))); // 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_recepcion($la_data,$ai_totsubtot,$ai_tottot,$ai_totcar,$ai_totded,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle // Access: private // Arguments: la_data // arreglo de información // ai_totsubtot // acumulado del subtotal // ai_tottot // acumulado del total // ai_totcar // acumulado de los cargos // ai_totded // acumulado de las deducciones // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Fecha Creación: 20/05/2006 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_tiporeporte; if($ls_tiporeporte==1) { $ls_titulo=" Bs.F."; } else { $ls_titulo=" Bs."; } $io_pdf->ezSetDy(-2); $la_datatit[1]=array('numrecdoc'=>'Factura','fecemisol'=>'Fecha','subtotdoc'=>'Monto', 'moncardoc'=>'Cargos','mondeddoc'=>'Deducciones','montotdoc'=>'Total'); $la_columnas=array('numrecdoc'=>'Factura', 'fecemisol'=>'Fecha', 'subtotdoc'=>'Monto', 'moncardoc'=>'Cargos', 'mondeddoc'=>'Deducciones', 'montotdoc'=>'Total'); $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('numrecdoc'=>array('justification'=>'center','width'=>130), // Justificación y ancho de la columna 'fecemisol'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la columna 'subtotdoc'=>array('justification'=>'center','width'=>92), // Justificación y ancho de la columna 'moncardoc'=>array('justification'=>'center','width'=>92), // Justificación y ancho de la columna 'mondeddoc'=>array('justification'=>'center','width'=>92), // Justificación y ancho de la columna 'montotdoc'=>array('justification'=>'center','width'=>92))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatit,$la_columnas,'',$la_config); $la_columnas=array('numrecdoc'=>'Factura', 'fecemisol'=>'Fecha', 'subtotdoc'=>'Monto', 'moncardoc'=>'Cargos', 'mondeddoc'=>'Deducciones', 'montotdoc'=>'Total'); $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'=>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('numrecdoc'=>array('justification'=>'center','width'=>130), // Justificación y ancho de la columna 'fecemisol'=>array('justification'=>'left','width'=>70), // Justificación y ancho de la columna 'subtotdoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'moncardoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'mondeddoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'montotdoc'=>array('justification'=>'right','width'=>92))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); $la_datatot[1]=array('numrecdoc'=>'Totales '.$ls_titulo.'','subtotdoc'=>$ai_totsubtot, 'moncardoc'=>$ai_totcar,'mondeddoc'=>$ai_totded,'montotdoc'=>$ai_tottot); $la_columnas=array('numrecdoc'=>'Factura', 'subtotdoc'=>'Monto', 'moncardoc'=>'Cargos', 'mondeddoc'=>'Deducciones', 'montotdoc'=>'Total'); $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'=>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('numrecdoc'=>array('justification'=>'right','width'=>200), // Justificación y ancho de la columna 'subtotdoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'moncardoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'mondeddoc'=>array('justification'=>'right','width'=>92), // Justificación y ancho de la columna 'montotdoc'=>array('justification'=>'right','width'=>92))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatot,$la_columnas,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_spg($aa_data,$ai_totpre,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_cuentas // Access: private // Arguments: aa_data // arreglo de información // ai_totpre // monto total de presupuesto // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle presupuestario // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Fecha Creación: 27/04/2006 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); global $ls_estmodest; global $ls_tiporeporte; if($ls_estmodest==1) { $ls_titcuentas="Estructura Presupuestaria"; } else { $ls_titcuentas="Estructura Programatica"; } if($ls_tiporeporte==1) { $ls_titulo=" Bs.F."; } else { $ls_titulo=" Bs."; } $la_datatit[1]=array('titulo'=>' Detalle de Presupuesto '); $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('codestpro'=>''.$ls_titcuentas.'', 'spg_cuenta'=>'Cuenta', 'denominacion'=>'Denominacion', '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('codestpro'=>array('justification'=>'center','width'=>200), // Justificación y ancho de la columna 'spg_cuenta'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>200), // Justificación y ancho de la columna 'monto'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna $io_pdf->ezTable($aa_data,$la_columnas,'',$la_config); $la_datatot[1]=array('titulo'=>'Totales '.$ls_titulo.'','totpre'=>$ai_totpre); $la_columnas=array('titulo'=>'Factura', 'totpre'=>'Total'); $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'=>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('titulo'=>array('justification'=>'right','width'=>480), // Justificación y ancho de la columna 'totpre'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatot,$la_columnas,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_scg($aa_data,$ai_totdeb,$ai_tothab,&$io_pdf) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_cuentas // Access: private // Arguments: aa_data // arreglo de información // si_totdeb // total monto debe // si_tothab // total monto haber // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle contable // Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang // Fecha Creación: 27/05/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); global $ls_tiporeporte; if($ls_tiporeporte==1) { $ls_titulo=" Bs.F."; } else { $ls_titulo=" Bs."; } $la_datatit[1]=array('titulo'=>' Detalle de Contable '); $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_data[1]=array('sc_cuenta'=>'Cuenta','denominacion'=>'Denominacion','mondeb'=>'Debe', 'monhab'=>'Haber'); $la_columnas=array('sc_cuenta'=>'Cuenta', 'denominacion'=>'Denominacion', 'mondeb'=>'Debe', 'monhab'=>'Haber'); $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'=>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('sc_cuenta'=>array('justification'=>'center','width'=>190), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'center','width'=>200), // Justificación y ancho de la columna 'mondeb'=>array('justification'=>'center','width'=>90), // Justificación y ancho de la columna 'monhab'=>array('justification'=>'center','width'=>90))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); unset($la_datatit); unset($la_columnas); unset($la_config); $la_columnas=array('sc_cuenta'=>'Cuenta', 'denominacion'=>'Denominacion', 'mondeb'=>'Debe', 'monhab'=>'Haber'); $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'=>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('sc_cuenta'=>array('justification'=>'center','width'=>190), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>200), // Justificación y ancho de la columna 'mondeb'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna 'monhab'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna $io_pdf->ezTable($aa_data,$la_columnas,'',$la_config); $la_datatot[1]=array('titulo'=>'Totales '.$ls_titulo.'','totdeb'=>$ai_totdeb, 'tothab'=>$ai_tothab); $la_columnas=array('titulo'=>'Factura', 'totdeb'=>'Deducciones', 'tothab'=>'Total'); $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'=>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('titulo'=>array('justification'=>'right','width'=>390), // Justificación y ancho de la columna 'totdeb'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna 'tothab'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatot,$la_columnas,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------- 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_cxp.php"); $io_fun_cxp=new class_funciones_cxp(); $ls_estmodest=$_SESSION["la_empresa"]["estmodest"]; $ls_conrecdoc=$_SESSION["la_empresa"]["conrecdoc"]; //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 $numalet->setMoneda("Bolivares"); //cambia prefijo $numalet->setPrefijo("***"); //cambia sufijo $numalet->setSufijo("***"); if($ls_estmodest==1) { $ls_titcuentas="Estructura Presupuestaria"; } else { $ls_titcuentas="Estructura Programatica"; } //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_titulo=" ORDEN DE PAGO"; //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $ls_numsol=$io_fun_cxp->uf_obtenervalor_get("numsol",""); $ls_tiporeporte=$io_fun_cxp->uf_obtenervalor_get("tiporeporte",0); global $ls_tiporeporte; require_once("../../shared/ezpdf/class.ezpdf.php"); require_once("sigesp_cxp_class_report.php"); $io_report=new sigesp_cxp_class_report(); require_once("../class_folder/class_funciones_cxp.php"); $io_fun_cxp=new class_funciones_cxp(); $ls_estretiva=$_SESSION["la_empresa"]["estretiva"]; //-------------------------------------------------------------------------------------------------------------------------------- $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,5,3,3); // Configuración de los margenes en centímetros $io_pdf->ezStartPageNumbers(570,47,8,'','',1); // Insertar el número de página $li_totrow=$io_report->DS->getRowCount("numsol"); $li_monretiva=0; for($li_i=1;$li_i<=$li_totrow;$li_i++) { $ls_numsol=$io_report->DS->data["numsol"][$li_i]; $ls_codpro=$io_report->DS->data["cod_pro"][$li_i]; $ls_cedbene=$io_report->DS->data["ced_bene"][$li_i]; $ls_denfuefin=$io_report->DS->data["denfuefin"][$li_i]; $ls_nombre=$io_report->DS->data["nombre"][$li_i]; $ld_fecemisol=$io_report->DS->data["fecemisol"][$li_i]; $ls_consol=$io_report->DS->data["consol"][$li_i]; $ls_obssol=$io_report->DS->data["obssol"][$li_i]; $li_monsol=$io_report->DS->data["monsol"][$li_i]; $ls_estprosol=$io_report->DS->data["estprosol"][$li_i]; if($ls_estretiva=="B") { $li_monretiva=$io_report->uf_select_det_deducciones_solpag($ls_numsol); $li_monsol=$li_monsol+$li_monretiva; } $numalet->setNumero($li_monsol); $ls_monto= $numalet->letra(); $li_monsol=number_format($li_monsol,2,",","."); $ld_fecemisol=$io_funciones->uf_convertirfecmostrar($ld_fecemisol); if($ls_codpro!="----------") { $ls_codigo=$ls_codpro; } else { $ls_codigo=$ls_cedbene; } uf_print_encabezado_pagina($ls_titulo,$ls_numsol,$ld_fecemisol,$ls_estprosol,&$io_pdf); uf_print_cabecera($ls_numsol,$ls_codigo,$ls_nombre,$ls_denfuefin,$ld_fecemisol,$ls_consol,$ls_obssol,$li_monsol,$ls_monto,&$io_pdf); ////////////////////////// GRID RECEPCIONES DE DOCUMENTOS ////////////////////////////////////// $io_report->ds_detalle->reset_ds(); $lb_valido=$io_report->uf_select_rec_doc_solicitud($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $li_totrowdet=$io_report->ds_detalle_rec->getRowCount("numrecdoc"); $la_data=""; $li_totsubtot=0; $li_tottot=0; $li_totcar=0; $li_totded=0; for($li_s=1;$li_s<=$li_totrowdet;$li_s++) { $ls_numrecdoc=$io_report->ds_detalle_rec->data["numrecdoc"][$li_s]; $ls_codpro=$io_report->ds_detalle_rec->data["cod_pro"][$li_s]; $ls_cedben=$io_report->ds_detalle_rec->data["ced_bene"][$li_s]; $ls_codtipdoc=$io_report->ds_detalle_rec->data["codtipdoc"][$li_s]; $ls_numrecdoc=$io_report->ds_detalle_rec->data["numrecdoc"][$li_s]; $ld_fecemidoc=$io_report->ds_detalle_rec->data["fecemidoc"][$li_s]; $ls_numdoccomspg=$io_report->ds_detalle_rec->data["numdoccomspg"][$li_s]; $li_mondeddoc=$io_report->ds_detalle_rec->data["mondeddoc"][$li_s]; $li_moncardoc=$io_report->ds_detalle_rec->data["moncardoc"][$li_s]; $li_montotdoc=$io_report->ds_detalle_rec->data["montotdoc"][$li_s]; $li_subtotdoc=($li_montotdoc-$li_moncardoc+$li_mondeddoc); if($ls_estretiva=="B") { $li_monretiva=$io_report->uf_select_det_deducciones($ls_numrecdoc,$ls_codpro,$ls_cedben,$ls_codtipdoc); $li_mondeddoc=$li_mondeddoc-$li_monretiva; $li_montotdoc=$li_montotdoc+$li_monretiva; } $li_totsubtot=$li_totsubtot + $li_subtotdoc; $li_tottot=$li_tottot + $li_montotdoc; $li_totcar=$li_totcar + $li_moncardoc; $li_totded=$li_totded + $li_mondeddoc; $ld_fecemidoc=$io_funciones->uf_convertirfecmostrar($ld_fecemidoc); $li_mondeddoc=number_format($li_mondeddoc,2,",","."); $li_moncardoc=number_format($li_moncardoc,2,",","."); $li_montotdoc=number_format($li_montotdoc,2,",","."); $li_subtotdoc=number_format($li_subtotdoc,2,",","."); $la_data[$li_s]=array('numrecdoc'=>$ls_numrecdoc,'fecemisol'=>$ld_fecemidoc,'mondeddoc'=>$li_mondeddoc, 'moncardoc'=>$li_moncardoc,'montotdoc'=>$li_montotdoc,'subtotdoc'=>$li_subtotdoc); } $li_totsubtot=number_format($li_totsubtot,2,",","."); $li_tottot=number_format($li_tottot,2,",","."); $li_totcar=number_format($li_totcar,2,",","."); $li_totded=number_format($li_totded,2,",","."); uf_print_detalle_recepcion($la_data,$li_totsubtot,$li_tottot,$li_totcar,$li_totded,&$io_pdf); unset($la_data); ////////////////////////// GRID RECEPCIONES DE DOCUMENTOS ////////////////////////////////////// if($ls_conrecdoc!=1) { ////////////////////////// GRID DETALLE PRESUPUESTARIO ////////////////////////////////////// $lb_valido=$io_report->uf_select_detalle_spg($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $io_report->ds_detalle_spg->group_by(array('0'=>'codestpro','1'=>'estcla','2'=>'spg_cuenta'),array('0'=>'monto'),array('0'=>'codestpro','1'=>'estcla','2'=>'spg_cuenta')); $li_totrowspg=$io_report->ds_detalle_spg->getRowCount("codestpro"); $la_data=""; $li_totpre=0; for($li_s=1;$li_s<=$li_totrowspg;$li_s++) { $ls_codestpro=$io_report->ds_detalle_spg->data["codestpro"][$li_s]; $ls_spgcuenta=$io_report->ds_detalle_spg->data["spg_cuenta"][$li_s]; $ls_denominacion=$io_report->ds_detalle_spg->data["denominacion"][$li_s]; $li_monto=$io_report->ds_detalle_spg->data["monto"][$li_s]; $li_totpre=$li_totpre+$li_monto; $li_monto=number_format($li_monto,2,",","."); $io_fun_cxp->uf_loadmodalidad(&$li_len1,&$li_len2,&$li_len3,&$li_len4,&$li_len5,&$ls_titulo); $ls_codestpro1=substr($ls_codestpro,0,25); $ls_codestpro2=substr($ls_codestpro,25,25); $ls_codestpro3=substr($ls_codestpro,50,25); $ls_codestpro4=substr($ls_codestpro,75,25); $ls_codestpro5=substr($ls_codestpro,100,25); $ls_codestpro1=substr($ls_codestpro1,(25-$li_len1),$li_len1); $ls_codestpro2=substr($ls_codestpro2,(25-$li_len2),$li_len2); $ls_codestpro3=substr($ls_codestpro3,(25-$li_len3),$li_len3); $ls_codestpro4=substr($ls_codestpro4,(25-$li_len4),$li_len4); $ls_codestpro5=substr($ls_codestpro5,(25-$li_len5),$li_len5); if($ls_estmodest==1) { $la_data[$li_s]=array('codestpro'=>$ls_codestpro1." - ".$ls_codestpro2." - ".$ls_codestpro3,'spg_cuenta'=>$ls_spgcuenta, 'denominacion'=>$ls_denominacion,'monto'=>$li_monto); } else { $ls_titcuentas="Estructura Programatica"; $la_data[$li_s]=array('codestpro'=>$ls_codestpro1." - ".$ls_codestpro2." - ".$ls_codestpro3." - ".$ls_codestpro4." - ".$ls_codestpro5,'spg_cuenta'=>$ls_spgcuenta, 'denominacion'=>$ls_denominacion,'monto'=>$li_monto); } } $li_totpre=number_format($li_totpre,2,",","."); uf_print_detalle_spg($la_data,$li_totpre,&$io_pdf); unset($la_data); } } ////////////////////////// GRID DETALLE PRESUPUESTARIO ////////////////////////////////////// if($ls_conrecdoc!=1) { ////////////////////////// GRID DETALLE CONTABLE ////////////////////////////////////// $lb_valido=$io_report->uf_select_detalle_scg($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $io_report->ds_detalle_scg->group_by(array('0'=>'sc_cuenta','1'=>'debhab'),array('0'=>'monto'),'sc_cuenta'); $li_totrowscg=$io_report->ds_detalle_scg->getRowCount("sc_cuenta"); $la_data=""; $li_totdeb=0; $li_tothab=0; for($li_s=1;$li_s<=$li_totrowscg;$li_s++) { $ls_sccuenta=trim($io_report->ds_detalle_scg->data["sc_cuenta"][$li_s]); $ls_debhab=trim($io_report->ds_detalle_scg->data["debhab"][$li_s]); $ls_denominacion=trim($io_report->ds_detalle_scg->data["denominacion"][$li_s]); $li_monto=$io_report->ds_detalle_scg->data["monto"][$li_s]; if($ls_debhab=="D") { $li_montodebe=$li_monto; $li_montohab=""; $li_totdeb=$li_totdeb+$li_montodebe; $li_montodebe=number_format($li_montodebe,2,",","."); } else { $li_montodebe=""; $li_montohab=$li_monto; $li_tothab=$li_tothab+$li_montohab; $li_montohab=number_format($li_montohab,2,",","."); } $la_data[$li_s]=array('sc_cuenta'=>$ls_sccuenta,'denominacion'=>$ls_denominacion, 'mondeb'=>$li_montodebe,'monhab'=>$li_montohab); } $li_totdeb=number_format($li_totdeb,2,",","."); $li_tothab=number_format($li_tothab,2,",","."); uf_print_detalle_scg($la_data,$li_totdeb,$li_tothab,&$io_pdf); unset($la_data); } } else { $lb_valido=$io_report->uf_select_detalleconrecdoc_scg($ls_numsol); // Cargar el DS con los datos del reporte if($lb_valido) { $io_report->ds_detalle_scg->group_by(array('0'=>'sc_cuenta','1'=>'debhab'),array('0'=>'monto'),'sc_cuenta'); $li_totrowscg=$io_report->ds_detalle_scg->getRowCount("sc_cuenta"); $la_data=""; $li_totdeb=0; $li_tothab=0; for($li_s=1;$li_s<=$li_totrowscg;$li_s++) { $ls_sccuenta=trim($io_report->ds_detalle_scg->data["sc_cuenta"][$li_s]); $ls_debhab=trim($io_report->ds_detalle_scg->data["debhab"][$li_s]); $ls_denominacion=trim($io_report->ds_detalle_scg->data["denominacion"][$li_s]); $li_monto=$io_report->ds_detalle_scg->data["monto"][$li_s]; if($ls_debhab=="D") { $li_montodebe=$li_monto; $li_montohab=""; $li_totdeb=$li_totdeb+$li_montodebe; $li_montodebe=number_format($li_montodebe,2,",","."); } else { $li_montodebe=""; $li_montohab=$li_monto; $li_tothab=$li_tothab+$li_montohab; $li_montohab=number_format($li_montohab,2,",","."); } $la_data[$li_s]=array('sc_cuenta'=>$ls_sccuenta,'denominacion'=>$ls_denominacion, 'mondeb'=>$li_montodebe,'monhab'=>$li_montohab); } $li_totdeb=number_format($li_totdeb,2,",","."); $li_tothab=number_format($li_tothab,2,",","."); uf_print_detalle_scg($la_data,$li_totdeb,$li_tothab,&$io_pdf); unset($la_data); } } ////////////////////////// GRID DETALLE CONTABLE ////////////////////////////////////// } } } 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(""); } } ?>