"; print "close();"; print "opener.document.form1.submit();"; print ""; } //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina($as_estcondat,$as_numordcom,$ad_fecordcom,$as_nompro,$as_rifpro,$as_nitpro,$as_obscom,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_encabezado_pagina // Access: private // Arguments: as_estcondat ---> tipo de la orden de compra // as_numordcom ---> numero de la orden de compra // ad_fecordcom ---> fecha de registro de la orden de compra // io_pdf // Instancia de objeto pdf // Description: Función que imprime los encabezados por página // Creado Por: Ing. Yozelin Barragan // Fecha Creación: 21/06/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetY(690); $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],25,705,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo if (($as_estcondat=="B") || ($as_estcondat=="-") || ($as_estcondat=="")) { $ls_titulo = "ORDEN DE COMPRA"; $ls_operacion = "ADQUISICIONES"; $la_data = array(array('name'=>'Proveedor: '.$as_nompro), array('name'=>'R.I.F.: '.$as_rifpro.' - N.I.T.: '.$as_nitpro), array('name'=>'Concepto: '.$as_obscom)); } else { $ls_titulo = "ORDEN DE SERVICIO"; $ls_operacion = "SERVICIOS"; $la_data = array(array('name'=>'Proveedor: '.$as_nompro), array('name'=>'Observación: '.$as_obscom)); } $li_tm = $io_pdf->getTextWidth(12,$ls_titulo); $tm = 230; $la_columna = array('name'=>''); $la_config = array('showHeadings'=>0, // Mostrar encabezados 'fontSize' =>9, // Tamaño de Letras 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xOrientation'=>'center', // Orientación de la tabla 'width'=>570, // Ancho de la tabla 'maxWidth'=>570); // Ancho Máximo de la tabla $io_pdf->ezTable($la_data,$la_columna,'',$la_config); unset($la_data); unset($la_columna); unset($la_config); $io_pdf->setStrokeColor(0,0,0); $io_pdf->addText(165,715,14,"".$ls_titulo.""); // Agregar el título $io_pdf->addText(360,725,10," No. ".$as_numordcom); // Agregar el título $io_pdf->addText(355,705,10,"Fecha ".$ad_fecordcom); // Agregar el título // cuadro inferior $io_pdf->Rectangle(15,75,570,70); $io_pdf->line(15,132,585,132); //HORIZONTAL $io_pdf->line(15,117,585,117); //HORIZONTAL $io_pdf->addText(40,122,7,"ELABORADO POR"); // Agregar el título $io_pdf->addText(40,136,7,"OBSERVACIONES:"); // Agregar el título $io_pdf->addText(50,63,7,"COMPRAS"); // Agregar el título $io_pdf->line(130,60,130,132); //VERTICAL $io_pdf->addText(167,122,7,"APROBADO POR"); // Agregar el título $io_pdf->addText(160,63,7,"ADMINISTRACION"); // Agregar el título $io_pdf->line(260,60,260,132); //VERTICAL $io_pdf->addText(295,122,7,"AUTORIZADO POR"); // Agregar el título $io_pdf->addText(300,63,7,"PRESIDENCIA"); // Agregar el título $io_pdf->line(410,60,410,132); //VERTICAL $io_pdf->line(15,60,15,132); //VERTICAL $io_pdf->line(585,60,585,132); //VERTICAL $io_pdf->addText(470,122,7,"PROVEEDOR"); // Agregar el título $io_pdf->addText(435,63,7,"FIRMA AUTOGRAFA,SELLO,FECHA"); // Agregar el título $io_pdf->line(15,60,585,60); //HORIZONTAL $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_encabezado_pagina //----------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_cabecera($as_condicion,$as_lugcom,$as_fecentordcom,$as_formapago,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_cabecera // Access: private // Arguments: $as_condicion : Condición de la entrega. // $as_lugcom : Lugar donde se realiza la Compra. // $ad_fecent : Fecha de Entrega de la Compra. // $as_formapago : Forma de cancelación de la Compra. // $io_pdf : Objeto que instancia de la clase PDF. // Description: Función que imprime la cabecera de cada página // Creado Por: Ing. Yesenia Moreno Modificado Por: Ing. Néstor Falcón. // Fecha Creación: 17/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// //------------------------------------------------ Datos de la Entrega ---------------------------------------------------- //------------------------------------------------ Datos del Pago ---------------------------------------------------------- $la_data[1]=array('condicion'=>'Condiciones de Entrega','forma'=>'Condiciones de Pago'); $la_data[2]=array('condicion'=>"Condicion: ".$as_condicion." Lugar: ".$as_lugcom." Fecha: ".$as_fecentordcom."" ,'forma'=>$as_formapago); $la_columna=array('condicion'=>'','forma'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'showLines'=>1, // Mostrar Líneas 'shaded'=>0, // Sombra entre líneas 'xOrientation'=>'center', // Orientación de la tabla 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, 'cols'=>array('condicion'=>array('justification'=>'left','width'=>331), // Justificación y ancho de la columna 'forma'=>array('justification'=>'center','width'=>239))); // Ancho Máximo de la tabla $io_pdf->ezTable($la_data,$la_columna,'',$la_config); unset($la_data); unset($la_columna); unset($la_config); } //-------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle($as_tipordcom,$la_data,$ld_subtot,$ld_totcar,$ld_montot,&$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 // Creado Por: Ing. Yozelin Barragan // Fecha Creación: 21/06/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_bolivares; if ($as_tipordcom=='B') { $ls_titulo_grid="Bienes"; } elseif($as_tipordcom=='S') { $ls_titulo_grid="Servicios"; } $io_pdf->ezSetDy(-10); $la_datatitulo[1]=array('columna1'=>' Detalle de los '.$ls_titulo_grid.''); $la_columnas=array('columna1'=>''); $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 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('columna1'=>array('justification'=>'center','width'=>570))); // Justificación y ancho de la columna $io_pdf->ezTable($la_datatitulo,$la_columnas,'',$la_config); unset($la_datatitulo); unset($la_columnas); unset($la_config); $io_pdf->ezSetDy(-2); if ($as_tipordcom=='B') { $la_columnas=array('codigo'=>'Código', 'denominacion'=>'Denominación', 'cantidad'=>'Cant', 'precio'=>'Precio ('.$ls_bolivares.')', 'unidad'=>'Unid', 'subtotal'=>'Sub-Total ('.$ls_bolivares.')', 'cargos'=>'Cargos ('.$ls_bolivares.')', 'total'=>'Total ('.$ls_bolivares.')'); $la_config=array('showHeadings'=>1, // 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 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('codigo'=>array('justification'=>'center','width'=>99), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>138), // Justificación y ancho de la columna 'cantidad'=>array('justification'=>'right','width'=>40), // Justificación y ancho de la columna 'precio'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'unidad'=>array('justification'=>'center','width'=>33), // Justificación y ancho de la columna 'subtotal'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'cargos'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'total'=>array('justification'=>'right','width'=>65))); // Justificación y ancho de la columna } elseif($as_tipordcom=='S') { $la_columnas=array('codigo'=>'Código', 'denominacion'=>'Denominación', 'cantidad'=>'Cant', 'precio'=>'Precio ('.$ls_bolivares.')', 'subtotal'=>'Sub-Total ('.$ls_bolivares.')', 'cargos'=>'Cargos ('.$ls_bolivares.')', 'total'=>'Total ('.$ls_bolivares.')'); $la_config=array('showHeadings'=>1, // 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 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('codigo'=>array('justification'=>'center','width'=>99), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>171), // Justificación y ancho de la columna 'cantidad'=>array('justification'=>'right','width'=>40), // Justificación y ancho de la columna 'precio'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'subtotal'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'cargos'=>array('justification'=>'right','width'=>65), // Justificación y ancho de la columna 'total'=>array('justification'=>'right','width'=>65))); // 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'=>'Sub Total '.$ls_bolivares.'','contenido'=>$ld_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 '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_bolivares.'','contenido'=>$ld_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 '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_bolivares.'','contenido'=>$ld_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'=>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 '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); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_cuentas($la_data,&$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. Yozelin Barragan // Fecha Creación: 21/06/2007 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); global $ls_estmodest, $ls_bolivares; if($ls_estmodest==1) { $ls_titulo="Estructura Presupuestaria"; } else { $ls_titulo="Estructura Programática"; } $io_pdf->ezSetDy(-2); $la_data2 = array(array('codestpro'=>"Estructura Presupuestaria", 'cuenta'=>"Cuenta Presupuestaria", 'denominacion'=>"Denominación", 'monto'=>'Monto ('.$ls_bolivares.')')); $la_columna = array('codestpro'=>'','cuenta'=>'','denominacion'=>'','monto'=>''); $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'=>1, // Sombra entre líneas 'shadeCol2'=>array(0.9,0.9,0.9), // Sombra entre líneas 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('codestpro'=>array('justification'=>'center','width'=>170), // Justificación y ancho de la columna 'cuenta'=>array('justification'=>'center','width'=>100), 'denominacion'=>array('justification'=>'center','width'=>200), 'monto'=>array('justification'=>'right','width'=>100))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data2,$la_columna,'',$la_config); unset($la_data2); unset($la_columna); unset($la_config); $la_columnas=array('codestpro'=>'','cuenta'=>'','denominacion'=>'','monto'=>''); $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'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('codestpro'=>array('justification'=>'center','width'=>170), // Justificación y ancho de la columna 'cuenta'=>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 'monto'=>array('justification'=>'right','width'=>100))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); }// end function uf_print_detalle //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_piecabecera($ld_subtot,$ld_totcar,$ld_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. Yozelin Barragan // Fecha Creación: 21/06/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_bolivares; $io_pdf->ezSetDy(-5); $la_data[1] = array('monlet'=>'MONTO TOTAL EN LETRAS ('.$ls_bolivares.')', 'monnum'=>'MONTO TOTAL ('.$ls_bolivares.')'); $la_data[2] = array('monlet'=>$ls_monlet,'monnum'=>$ld_montot); $la_columnas = array('monlet'=>'','monnum'=>''); $la_config = array('showHeadings'=>0, // Mostrar encabezados 'fontSize'=> 7, // Tamaño de Letras 'showLines'=>0, // Mostrar Líneas 'colGap'=>1, // Sombra entre líneas 'shaded'=>0, // Sombra entre líneas 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('monlet'=>array('justification'=>'left','width'=>400), 'monnum'=>array('justification'=>'right','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); } //----------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_piecabeceramonto_bsf($li_montotaux,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_piecabecera // Acess: private // Arguments: li_montotaux ---> Total de la Orden Bs.F. // io_pdf : Instancia de objeto pdf // Description: Función que imprime el total de la Orden de Compra en Bolivares Fuertes. // Creado Por: Ing. Luis Anibal Lang // Fecha Creación: 25/09/2007 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $la_data[1]=array('titulo'=>'Monto Bs.F.','contenido'=>$li_montotaux,); $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 '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); } //----------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_sep($la_datasep,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_sep // Access: private // Arguments: la_data // arreglo de información // io_pdf // Objeto PDF // Description: función que imprime el detalle // Creado Por: Ing. Selena Lucena // Fecha Creación: 17/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-5); $la_columna=array('codigo'=>'N° Ejecucion Presupuestaria','denuniadm'=>'Gerencia /Oficina Solicitante'); $la_config =array('showHeadings'=>1, // Mostrar encabezados 'fontSize' => 8, // 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 'xOrientation'=>'center', // Orientación de la tabla 'width'=>570, // Ancho de la tabla 'maxWidth'=>570, 'cols'=>array('codigo'=>array('justification'=>'center','width'=>150), 'denuniadm'=>array('justification'=>'left','width'=>420)) ); // Justificación y ancho de la columna $io_pdf->ezTable($la_datasep,$la_columna,'',$la_config); } //-------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------- Instancia de las clases ------------------------------------------------ require_once("sigesp_soc_class_report.php"); require_once("../../shared/ezpdf/class.ezpdf.php"); require_once("../../shared/class_folder/class_sql.php"); require_once("../class_folder/class_funciones_soc.php"); require_once("../../shared/class_folder/sigesp_include.php"); require_once("../../shared/class_folder/class_funciones.php"); $in = new sigesp_include(); $con = $in->uf_conectar(); $io_sql = new class_sql($con); $io_funciones = new class_funciones(); $io_fun_soc = new class_funciones_soc(); $io_report = new sigesp_soc_class_report($con); $ls_estmodest = $_SESSION["la_empresa"]["estmodest"]; $ls_codemp = $_SESSION["la_empresa"]["codemp"]; //Instancio a la clase de conversión de numeros a letras. require_once("../../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("***"); $ls_tiporeporte=$io_fun_soc->uf_obtenervalor_get("tiporeporte",1); $ls_bolivares="Bs."; if($ls_tiporeporte==1) { require_once("sigesp_soc_class_reportbsf.php"); $io_report=new sigesp_soc_class_reportbsf(); $ls_bolivares="Bs.F."; $numalet->setMoneda("Bolivares Fuerte"); } //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $ls_numordcom = $io_fun_soc->uf_obtenervalor_get("numordcom",""); $ls_estcondat = $io_fun_soc->uf_obtenervalor_get("tipord",""); //-------------------------------------------------------------------------------------------------------------------------------- $rs_data = $io_report->uf_select_orden_imprimir($ls_numordcom,$ls_estcondat,&$lb_valido); // Cargar los datos del reporte if($lb_valido==false) // Existe algún error ó no hay registros { print(""); } else // Imprimimos el reporte { $ls_descripcion="Generó el Reporte de Orden de Compra"; $lb_valido=$io_fun_soc->uf_load_seguridad_reporte("SOC","sigesp_soc_p_registro_orden_compra.php",$ls_descripcion); if($lb_valido) { //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(5.6,6,3,3); // Configuración de los margenes en centímetros $io_pdf->ezStartPageNumbers(588,710,7,'','',1); if ($row=$io_sql->fetch_row($rs_data)) { $ls_numordcom = $row["numordcom"]; $ls_estcondat = $row["estcondat"]; $ls_coduniadm = $row["coduniadm"]; $ls_denuniadm = $row["denuniadm"]; $ls_codfuefin = $row["codfuefin"]; $ls_denfuefin = $row["denfuefin"]; $ls_diaplacom = $row["diaplacom"]; $ls_forpagcom = $row["forpagcom"]; $ls_codpro = $row["cod_pro"]; $ls_nompro = $row["nompro"]; $ls_rifpro = $row["rifpro"]; $ls_nitpro = $row["nitpro"]; $ls_dirpro = $row["dirpro"]; $ls_obscom = $row["obscom"]; $ld_monsubtot = $row["monsubtot"]; $ld_monimp = $row["monimp"]; $ld_montot = $row["montot"]; $ls_condicion = $row["concom"]; $ls_lugcom = $row["estlugcom"]; $ls_codmoneda = $row["codmon"]; $ls_pais = $row["codpai"]; $ls_estado = $row["codest"]; $ls_municipio = $row["codmun"]; $ls_parroquia = $row["codpar"]; if ($ls_codfuefin!="--") { $ls_denfuefin = $io_report->uf_select_denominacion('sigesp_fuentefinanciamiento','codfuefin','WHERE codfuefin='.$ls_codfuefin); } else { $ls_denfuefin=""; $ls_codfuefin=""; } if ($ls_codmoneda!="---") { $ls_moneda = $io_report->uf_select_denmoneda($ls_codmoneda); } else { $ls_moneda = ""; $ls_codmoneda = ""; } if ($ls_lugcom==0) { $ls_lugcom="Nacional"; } else { $ls_lugcom="Extranjero"; } if (($ls_pais=="---") || ($ls_pais=="s1") || ($ls_pais=="---seleccione---")) { $ls_pais=""; } if (($ls_estado=="---") || ($ls_estado=="s1") || ($ls_estado=="---seleccione---")) { $ls_estado=""; } if (($ls_municipio=="---") || ($ls_municipio=="s1") || ($ls_municipio=="---seleccione---")) { $ls_municipio=""; } if (($ls_parroquia=="---") || ($ls_parroquia=="s1") || ($ls_parroquia=="---seleccione---")) { $ls_parroquia=""; } if ($ls_tiporeporte==0) { $ld_montotaux = $row["montotaux"]; $ld_montotaux = number_format($ld_montotaux,2,",","."); } $numalet->setNumero($ld_montot); $ls_monto = $numalet->letra(); $ld_montot = number_format($ld_montot,2,",","."); $ld_monsubtot = number_format($ld_monsubtot,2,",","."); $ld_monimp = number_format($ld_monimp,2,",","."); $ld_fecordcom = $io_funciones->uf_convertirfecmostrar($row["fecordcom"]); $ls_fecentordcom = $io_funciones->uf_convertirfecmostrar($row["fechentdesde"]); uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,$ls_nompro,$ls_rifpro,$ls_nitpro,$ls_obscom,&$io_pdf); uf_print_cabecera($ls_condicion,$ls_lugcom,$ls_fecentordcom,$ls_forpagcom,&$io_pdf); //-----------------------------SEP----------------------------------- $lb_validosep = true; $li_totrow = 0; $lb_validosep = $io_report->uf_select_soc_sep($ls_codemp,$ls_numordcom,$ls_estcondat); if ($lb_validosep) { $li_totrow = $io_report->ds_soc_sep->getRowCount("numordcom"); for ($li_row=1;$li_row<=$li_totrow;$li_row++) { $ls_numsep = $io_report->ds_soc_sep->data["numsol"][$li_row]; $ls_denunadm = $io_report->ds_soc_sep->data["denuniadm"][$li_row]; $la_datasep[$li_row] = array('codigo'=>$ls_numsep,'denuniadm'=>$ls_denunadm); } uf_print_detalle_sep($la_datasep,$io_pdf); } /////DETALLE DE LA ORDEN DE COMPRA $rs_datos = $io_report->uf_select_detalle_orden_imprimir($ls_numordcom,$ls_estcondat,&$lb_valido); if ($lb_valido) { $li_totrows = $io_sql->num_rows($rs_datos); if ($li_totrows>0) { $li_i = 0; while($row=$io_sql->fetch_row($rs_datos)) { $li_i=$li_i+1; $ls_codartser=$row["codartser"]; $ls_denartser=$row["denartser"]; if($ls_estcondat=="B") { $ls_unidad=$row["unidad"]; } else { $ls_unidad=""; } if($ls_unidad=="D") { $ls_unidad="Detal"; } elseif($ls_unidad=="M") { $ls_unidad="Mayor"; } $li_cantartser = $row["cantartser"]; $ld_preartser = $row["preartser"]; $ld_subtotartser = $ld_preartser*$li_cantartser; $ld_totartser = $row["monttotartser"]; $ld_carartser = ($ld_totartser-$ld_subtotartser); $ld_preartser = number_format($ld_preartser,2,",","."); $ld_subtotartser = number_format($ld_subtotartser,2,",","."); $ld_totartser = number_format($ld_totartser,2,",","."); $ld_carartser = number_format($ld_carartser,2,",","."); $la_data[$li_i] = array('codigo'=>$ls_codartser, 'denominacion'=>$ls_denartser, 'cantidad'=>$li_cantartser, 'precio'=>$ld_preartser, 'unidad'=>$ls_unidad, 'subtotal'=>$ld_subtotartser, 'cargos'=>$ld_carartser, 'total'=>$ld_totartser); } uf_print_detalle($ls_estcondat,$la_data,$ld_monsubtot,$ld_monimp,$ld_montot,&$io_pdf); unset($la_data); /////DETALLE DE LAS CUENTAS DE GASTOS DE LA ORDEN DE COMPRA $rs_datos_cuenta=$io_report->uf_select_cuenta_gasto($ls_numordcom,$ls_estcondat,&$lb_valido); if($lb_valido) { $li_totrows = $io_sql->num_rows($rs_datos); if ($li_totrows>0) { $li_s = 0; while($row=$io_sql->fetch_row($rs_datos_cuenta)) { $li_s++; $ls_codestpro1 = trim($row["codestpro1"]); $ls_codestpro2 = trim($row["codestpro2"]); $ls_codestpro3 = trim($row["codestpro3"]); $ls_codestpro4 = trim($row["codestpro4"]); $ls_codestpro5 = trim($row["codestpro5"]); $ls_spg_cuenta = $row["spg_cuenta"]; $ld_monto = $row["monto"]; $ld_monto = number_format($ld_monto,2,",","."); $ls_dencuenta = ""; $lb_valido = $io_report->uf_select_denominacionspg($ls_spg_cuenta,$ls_dencuenta); if($ls_estmodest==1) { $ls_codestpro=$ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3; } else { $ls_codestpro=substr($ls_codestpro1,-2)."-".substr($ls_codestpro2,-2)."-".substr($ls_codestpro3,-2)."-".substr($ls_codestpro4,-2)."-".substr($ls_codestpro5,-2); } $la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta, 'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto); } uf_print_detalle_cuentas($la_data,&$io_pdf); unset($la_data); } } } } } } uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,&$io_pdf); if ($ls_tiporeporte==0) { uf_print_piecabeceramonto_bsf($ld_montotaux,&$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(""); } unset($io_report); unset($io_funciones); unset($io_fun_soc); ?>