$io_pdf->ezSetCmMargins(2, 11, 3, 2); // Configuracion de los margenes en centimetros $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_codpro = $io_report->DS->data["cod_pro"][$li_i]; $ls_rifpro = $io_report->DS->data["rifpro"][$li_i]; $ls_cedbene = $io_report->DS->data["ced_bene"][$li_i]; $ls_denfuefin = $io_report->DS->data["denfuefin"][$li_i]; $ls_nomproben = $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]; $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_codproben = $ls_codpro; } else { $ls_codproben = $ls_cedbene; } if ($ls_tiporeporte == 0) { $li_monsolaux = $io_report->DS->data["monsolaux"][$li_i]; $li_monsolaux = number_format($li_monsolaux, 2, ",", "."); } uf_print_encabezado_pagina($ls_titulo, $ls_numsol, $ld_fecemisol, $ls_codproben, $ls_nomproben, $ls_rifpro, $ls_consol, $ls_monto, $li_monsol, &$io_pdf); ////////////////////////// GRID RECEPCIONES DE DOCUMENTOS ////////////////////////////////////// $io_report->ds_detalle->reset_ds(); $lb_valido = $io_report->uf_select_rec_doc_solicitud($ls_numsol);
function uf_print_pie_detalle($as_estpro,$as_numordcom,$as_nombre,$as_montotart,$as_ciuemp,$adt_fecrec,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_pie_detalle // Acess: private // Arguments: la_data // arreglo de informaci�n // io_pdf // Objeto PDF // Description: funci�n que imprime el detalle // Creado Por: Ing. Yesenia Moreno // Modificado Por: Ing. Yozelin Barrag�n // Fecha Creaci�n: 05/02/2007 ////////////////////////////////////////////////////////////////////////////////////////// /*require_once("../../shared/class_folder/cnumero_letra.php"); $io_letra = new cnumero_letra();*/ //Instancio a la clase de conversi�n de numeros a letras. global $ls_tipoformato; 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."; $ls_titulo="Bs.F:"; } else { $numalet->setMoneda("Bolivares"); $ls_moneda="EN Bs."; $ls_titulo="Bs:"; } //cambia prefijo $numalet->setPrefijo("***"); //cambia sufijo $numalet->setSufijo("***"); require_once("../../shared/class_folder/class_fecha.php"); $io_fecha = new class_fecha(); if($as_estpro==0) { $ls_tipo_orden=" Orden de Compra "; } else { $ls_tipo_orden=" Factura "; } $ls_prefijo=""; $ls_sufijo=""; //$ls_monto_letras=$io_letra->uf_convertir_letra($as_montotart,$ls_prefijo,$ls_sufijo); $numalet->setNumero($as_montotart); $ls_monto_letras= $numalet->letra(); require_once("../../shared/class_folder/class_funciones.php"); $funciones=new class_funciones(); $gestor=$_SESSION["ls_gestor"]; if ($gestor=="INFORMIX") { $adt_fecrec=$funciones->uf_formatovalidofecha($adt_fecrec); $adt_fecrec=$funciones->uf_convertirfecmostrar($adt_fecrec); } $li_dia=substr($adt_fecrec,0,2); $li_mes=substr($adt_fecrec,3,2); $li_agno=substr($adt_fecrec,6,4); $ls_mes=$io_fecha->uf_load_nombre_mes($li_mes); $io_pdf->ezSetY(350); $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $la_data=array(array('name'=>'los cuales fueron recibidos '.$adt_fecrec.' segun <b>'.$ls_tipo_orden.' No. '.$as_numordcom.'</b> Acta levantada '), array('name'=>'al efecto, en la forma siguiente: El represenante del <b>"'.trim($as_nombre).'"</b> '), array('name'=>'luego de haber constatado que <b>"LA EMPRESA"</b> ejecuto el suministro señalado en la referida '.$ls_tipo_orden.', declarada <b>ACEPTADA</b> la compra .'), array('name'=>'El monto correspondiente a este suministro es de ('.$ls_titulo.' '.number_format($as_montotart,2,",",".").' )'), array('name'=>'<b>'.$ls_monto_letras.'</b>'), array('name'=>'En prueba de conformidad se firma, en la ciudad de '.trim($as_ciuemp).', a los '.$li_dia.' dias del mes de '.$ls_mes.' de '.$li_agno.'. ')); $la_columnas=array('name'=>'','name'=>'','name'=>'','name'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'showLines'=>0, // Mostrar L�neas 'fontSize' => 12, // Tama�o de Letras 'shaded'=>0, // Sombra entre l�neas 'shadeCol'=>array(0.5,0.5,0.5),//array($r,$g,$b), // Color de la sombra 'xOrientation'=>'center', // Orientaci�n de la tabla 'width'=>550, // Ancho de la tabla 'maxWidth'=>550, // Ancho M�ximo de la tabla 'xPos'=>306, // Orientaci�n de la tabla /*'cols'=>array('codart'=>array('justification'=>'center','width'=>100), // Justificaci�n y ancho de la 'denart'=>array('justification'=>'center','width'=>230), // Justificaci�n y 'canart'=>array('justification'=>'center','width'=>100), // Justificaci�n y 'preuniart'=>array('justification'=>'center','width'=>100))*/); // Justificaci�n y ancho de la $io_pdf->ezTable($la_data,$la_columnas,'',$la_config); $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_pie_detalle
$li_total=0; for($li_s=1;$li_s<=$li_totrow_det;$li_s++) { $ls_codasi= $io_report->ds_detalle->data["codasi"][$li_s]; $ls_denasi= $io_report->ds_detalle->data["denasi"][$li_s]; $li_canasi= $io_report->ds_detalle->data["canasi"][$li_s]; $li_monto= $io_report->ds_detalle->data["monto"][$li_s]; $li_subtotal = $li_monto*$li_canasi; $li_total=$li_total+$li_subtotal; $li_canasi=number_format($li_canasi,2,",","."); $li_monto=number_format($li_monto,2,",","."); $li_subtotal=number_format($li_subtotal,2,",","."); $la_data[$li_s]=array('codigo'=>$ls_codasi,'descripcion'=>$ls_denasi,'tarifa'=>$li_monto,'dias'=>$li_canasi,'subtotal'=>$li_subtotal); } $io_numero_letra->setNumero($li_total); $ls_totalletras=$io_numero_letra->letra(); $li_total=number_format($li_total,2,",","."); uf_print_detalle_asignaciones($la_data,$li_total,$ls_totalletras,$io_pdf); // Imprimimos el detalle unset($la_data); $io_report->ds_detalle->reset_ds(); $lb_existe=$io_report->uf_select_solicitudpago_spg($ls_codemp,$ls_codsolvia); if($lb_existe) { $li_totrow_detpres=$io_report->ds_detpresup->getRowCount("spg_cuenta"); $ls_ano=substr($_SESSION["la_empresa"]["periodo"],0,4); for($li_j=1;$li_j<=$li_totrow_detpres;$li_j++) { $ls_spgcuenta=$io_report->ds_detpresup->data["spg_cuenta"][$li_j]; $ls_denestpro1=$io_report->ds_detpresup->data["denestpro1"][$li_j]; $ls_denestpro2=$io_report->ds_detpresup->data["denestpro2"][$li_j]; $la_data[$li_j]=array('ano'=>$ls_ano,'proyecto'=>$ls_denestpro1,'especifica'=>$ls_denestpro2,'cuenta'=>$ls_spgcuenta);
case "V": // Venezolano $ls_nacper="Venezolano"; break; case "E": // Extranjero $ls_nacper="Extranjero"; break; } $ls_desuniadm=$row["desuniadm"]; $li_monto=$io_fun_nomina->uf_formatonumerico($row["monto"]); $io_numero_letra->setNumero($row["monto"]); $ls_monto=$io_numero_letra->letra(); $ls_monto=$ls_monto." (".$ls_prefijo." ".$li_monto.")"; $ls_contenido=str_replace("\$ls_dia",$ls_dia_act,$ls_contenido); $ls_contenido=str_replace("\$ls_mes",$ls_mes_act,$ls_contenido); $ls_contenido=str_replace("\$ls_ano",$ls_ano_act,$ls_contenido); $ls_contenido=str_replace("\$ls_nombres",$ls_nomper,$ls_contenido); $ls_contenido=str_replace("\$ls_apellidos",$ls_apeper,$ls_contenido); $ls_contenido=str_replace("\$ls_cedula",$ls_cedper,$ls_contenido); $ls_contenido=str_replace("\$ls_cargo",$ls_descar,$ls_contenido); $ls_contenido=str_replace("\$ls_profesion",$ls_profesion,$ls_contenido); $ls_contenido=str_replace("\$ld_fecha_inicio",$ls_fechainicio,$ls_contenido); $ls_contenido=str_replace("\$ld_fecha_culminacion",$ls_fechafinal,$ls_contenido); $ls_contenido=str_replace("\$ls_nacionalidad",$ls_nacper,$ls_contenido); $ls_contenido=str_replace("\$ls_unidad_administrativa",$ls_desuniadm,$ls_contenido); $ls_contenido=str_replace("\$ls_horario",$ls_horario,$ls_contenido);
} if($ls_tiporeporte==1) { $ls_prefijo="Bs.F."; } else { $ls_prefijo="Bs."; } $ls_telhabper=$io_report->DS_detalle->data["telhabper"][$li_s]; $ls_telmovper=$io_report->DS_detalle->data["telmovper"][$li_s]; $ls_desuniadm=$io_report->DS_detalle->data["desuniadm"][$li_s]; $li_horper=$io_fun_nomina->uf_formatonumerico($io_report->DS_detalle->data["horper"][$li_s]); $li_sueper=$io_fun_nomina->uf_formatonumerico($io_report->DS_detalle->data["sueper"][$li_s]); $io_numero_letra->setNumero($io_report->DS_detalle->data["sueper"][$li_s]); $ls_sueper=$io_numero_letra->letra(); $ls_sueper=$ls_sueper." (".$ls_prefijo." ".$li_sueper.")"; $li_sueintper=$io_fun_nomina->uf_formatonumerico($io_report->DS_detalle->data["sueintper"][$li_s]); $io_numero_letra->setNumero($io_report->DS_detalle->data["sueintper"][$li_s]); $ls_sueintper=$io_numero_letra->letra(); $ls_sueintper=$ls_sueintper." (".$ls_prefijo." ".$li_sueintper.")"; $li_sueproper=$io_fun_nomina->uf_formatonumerico($io_report->DS_detalle->data["sueproper"][$li_s]); $io_numero_letra->setNumero($io_report->DS_detalle->data["sueproper"][$li_s]); $ls_sueproper=$io_numero_letra->letra(); $ls_sueproper=$ls_sueproper." (".$ls_prefijo." ".$li_sueproper.")"; $ls_desded=$io_report->DS_detalle->data["desded"][$li_s]; $ls_destipper=$io_report->DS_detalle->data["destipper"][$li_s]; $ls_fecjub=$io_report->DS_detalle->data["fecjubper"][$li_s]; $ls_mes2=$io_fecha->uf_load_nombre_mes(substr($ls_fecjub,5,2)); $ls_fecjub="el ".substr($ls_fecjub,8,2)." de ".$ls_mes2." de ".substr($ls_fecjub,0,4); $li_sueintper_mensual=0;
uf_print_encabezado_pagina($ls_titulo,$ls_fecha,$io_pdf); // Imprimimos el encabezado de la página $li_numrows = $io_sql->num_rows($rs_data); if ($li_numrows>0) { $io_pdf->transaction('start'); // Iniciamos la transacción $li_numpag = $io_pdf->ezPageCount; // Número de página $li_i = 0; while($row=$io_sql->fetch_row($rs_data)) { $li_i++; $ls_nompro = $row["nompro"]; $li_montot = $row["montot"]; if ($li_i==1) { $io_numero_letra->setNumero($li_montot); $ls_totordser=$io_numero_letra->letra(); $ls_contenido="Entre <b>".$ls_nomemp."</b> representado en este acto por el ciudadano <b>".$ls_nomper."</b> por una parte y por la otra 'LA EMPRESA' <b>".$ls_nompro."</b> representada en este acto por el ciudadano <b>".$ls_nomreppro."</b>, se ha procedido a efectuar la recepción de los servicios consistentes en: "; $io_pdf->ezText($ls_contenido,9,array('justification' =>'full','spacing' =>1)); } $ls_estcom = $row["estcom"]; if ($ls_estcom!=7) { print("<script language=JavaScript>"); print(" alert('La Orden de Servicios no esta en estatus de Recibida');"); print(" close();"); print("</script>"); } $ls_codser = $row["codser"]; $ls_denser = $row["denser"]; $li_canser = $row["canser"]; $ls_fecordcom = $row["fecordcom"];