function conexion($query_rs,$opciones,$informacion = '',$modo='select',$campo_id = '',$base_de_datos = '',$gestor = '',$usuario=''){ global $obj_sql,$msj_error_conex,$ruta; if($_SESSION["ls_gestor"] == 'POSTGRES' and $modo=='insert'){$query_rs = $query_rs.'; SELECT lastval() AS valor_id; ';} $in=new sigesp_include(); if($gestor == ''){$gestor = $_SESSION["ls_gestor"];} if($usuario==''){$usuario = $_SESSION["ls_login"];} if($base_de_datos==''){$con=$in->uf_conectar();} else{$con=$in->uf_conectar_otra_bd($_SESSION["ls_hostname"],$usuario,$_SESSION["ls_password"],$base_de_datos,$gestor);} $obj_sql=new class_sql($con); $rs_data = $obj_sql->select($query_rs); if($rs_data === false){ if($tipo_mensaje=='clase_msj'){ $msj_error = $informacion.'<br><br><b>ERROR:</b> <br>'.$obj_sql->message; $this->obj_msj->message($msj_error,$mensaje_sigesp=2,$ruta); } else{ $msj_error_conex = $informacion.'<br><br><b>ERROR:</b> <br>'.$obj_sql->message; echo '<input type="hidden" name="txt_msj_error" id="txt_msj_error" value="'.$msj_error_conex.'">'; //echo $msj_error_conex; } } $cantidad = $obj_sql->num_rows($rs_data); $row=$obj_sql->fetch_row($rs_data); switch($modo){ case "update": break; case "delete": break; case "insert": if($_SESSION["ls_gestor"] == 'MYSQLT' or $_SESSION["ls_gestor"] == 'MYSQLT'){ return mysql_insert_id();} if($_SESSION["ls_gestor"] == 'POSTGRES'){$insert_id = $row['valor_id']; return $insert_id;} break; case "select": if($opciones == 'arreglo'){return array('rs'=>$rs_data, 'fila'=>$row, 'cantidad'=>$cantidad);} elseif($opciones == 'fila'){return $row;} break; } $obj_sql->free_result($rs_data); }
function uf_select_PlanUnico() { //require_once("sigesp_include.php"); $inc=new sigesp_include(); $con=$inc->uf_conectar(); $SQL=new class_sql($con); $rs=""; $ls_sql=""; $lb_valido=true; $ls_sql="SELECT * FROM sigesp_plan_unico"; $rs=$SQL->select($ls_sql); $li_num=$SQL->num_rows($rs); if ($li_num>0) { $lb_valido=true; } else { $lb_valido=false; $is_msg_error = "Error en Select Plan Unico. "; } return $rs; }
function uf_imprimirresultados($as_codact, $as_idact, $as_tiporesponsable, $as_destino) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $msg = new class_mensajes(); require_once "../shared/class_folder/class_sql.php"; $io_sql = new class_sql($con); $ds = new class_datastore(); require_once "../shared/class_folder/class_funciones.php"; $fun = new class_funciones(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=60>Código</td>"; print "<td width=100>Cédula</td>"; print "<td width=440>Nombre y Apellido</td>"; print "</tr>"; switch ($as_tiporesponsable) { case "uso": $ls_sql = "SELECT DISTINCT(codres) AS codres," . "\t (SELECT nomper" . " \t\t FROM sno_personal" . "\t\t WHERE sno_personal.codemp=saf_dta.codemp" . "\t\t AND sno_personal.codper=saf_dta.codres) AS nomres1," . "\t (SELECT nombene" . " \t\t FROM rpc_beneficiario" . "\t\t WHERE rpc_beneficiario.codemp=saf_dta.codemp" . "\t\t AND rpc_beneficiario.ced_bene=saf_dta.codres) AS nomres2," . "\t (SELECT apeper" . " \t\t FROM sno_personal" . "\t\t WHERE sno_personal.codemp=saf_dta.codemp" . "\t\t AND sno_personal.codper=saf_dta.codres) AS aperes1," . "\t (SELECT apebene" . " \t\t FROM rpc_beneficiario" . "\t\t WHERE rpc_beneficiario.codemp=saf_dta.codemp" . "\t\t AND rpc_beneficiario.ced_bene=saf_dta.codres) AS aperes2" . " FROM saf_dta" . " WHERE codemp='" . $ls_codemp . "'" . " AND codact='" . $as_codact . "'"; break; case "primario": $ls_sql = "SELECT DISTINCT(codrespri) AS codres," . "\t (SELECT nomper" . " \t\t FROM sno_personal" . "\t\t WHERE sno_personal.codemp=saf_dta.codemp" . "\t\t AND sno_personal.codper=saf_dta.codrespri) AS nomres1," . "\t (SELECT nombene" . " \t\t FROM rpc_beneficiario" . "\t\t WHERE rpc_beneficiario.codemp=saf_dta.codemp" . "\t\t AND rpc_beneficiario.ced_bene=saf_dta.codrespri) AS nomres2," . "\t (SELECT apeper" . " \t\t FROM sno_personal" . "\t\t WHERE sno_personal.codemp=saf_dta.codemp" . "\t\t AND sno_personal.codper=saf_dta.codrespri) AS aperes1," . "\t (SELECT apebene" . " \t\t FROM rpc_beneficiario" . "\t\t WHERE rpc_beneficiario.codemp=saf_dta.codemp" . "\t\t AND rpc_beneficiario.ced_bene=saf_dta.codrespri) AS aperes2" . " FROM saf_dta" . " WHERE codemp='" . $ls_codemp . "'" . " AND codact='" . $as_codact . "'"; break; } $rs_data = $io_sql->select($ls_sql); $li_num = $io_sql->num_rows($rs_data); if ($li_num > 0) { while ($row = $io_sql->fetch_row($rs_data)) { $ls_codres = $row["codres"]; $ls_nomres1 = $row["nomres1"]; if ($ls_nomres1 == "") { $ls_nomres = $row["nomres2"] . " " . $row["aperes2"]; } else { $ls_nomres = $row["nomres1"] . " " . $row["aperes1"]; } if ($ls_codres != "") { print "<tr class=celdas-blancas>"; print "<td><a href=\"javascript: aceptar('{$ls_codres}','{$ls_nomres}');\">" . $ls_codres . "</a></td>"; print "<td>" . $ls_codres . "</td>"; print "<td>" . $ls_nomres . "</td>"; print "</tr>"; } } } print "</table>"; }
$ds=new class_datastore(); $io_sql=new class_sql($con); $arr=$_SESSION["la_empresa"]; print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; if($ls_operacion=="BUSCAR") { $ls_sql=" SELECT * FROM saf_grupo". " WHERE codgru like '".$ls_codigo."'". " AND dengru like '".$ls_denominacion."'"; $rs_cta=$io_sql->select($ls_sql); $li_numrows=$io_sql->num_rows($rs_cta); if($li_numrows>0) { while($row=$io_sql->fetch_row($rs_cta)) { print "<tr class=celdas-blancas>"; $ls_codigo=$row["codgru"]; $ls_denominacion=$row["dengru"]; switch($ls_tipo) { case '': print "<td><a href=\"javascript: aceptar('$ls_codigo','$ls_denominacion');\">".$ls_codigo."</a></td>"; print "<td>".$ls_denominacion."</td>"; break; case 'ACTIVOS':
print "</tr>"; if ($ls_operacion == "BUSCAR") { $ls_cedbene = "%" . $_POST["txtcedula"] . "%"; $ls_nombene = "%" . $_POST["txtnombre"] . "%"; $ls_apebene = "%" . $_POST["txtapellido"] . "%"; $ls_codban = "%" . $_POST["cmbbanco"] . "%"; if ($ls_codban == "%s1%") { $ls_codban = "%%"; } $ls_sql = " SELECT rpc_beneficiario.ced_bene,rpc_beneficiario.rifben,rpc_beneficiario.nombene,rpc_beneficiario.apebene,\n\t\t\t\t\t\t rpc_beneficiario.dirbene,rpc_beneficiario.telbene,rpc_beneficiario.celbene,rpc_beneficiario.email,\n\t\t\t\t\t\t rpc_beneficiario.sc_cuenta,rpc_beneficiario.sc_cuentarecdoc,rpc_beneficiario.codban,\n\t\t\t\t\t\t rpc_beneficiario.ctaban,rpc_beneficiario.codtipcta,rpc_beneficiario.codpai,rpc_beneficiario.codest,\n\t\t\t\t\t\t rpc_beneficiario.codmun,rpc_beneficiario.codpar,rpc_beneficiario.codbansig,rpc_beneficiario.nacben,\n\t\t\t\t\t\t rpc_beneficiario.numpasben,rpc_beneficiario.fecregben,rpc_beneficiario.tipconben,\n\t\t\t\t\t\t scg_cuentas.denominacion as denscgcta,\n\t\t\t\t\t\t (SELECT COALESCE(denbansig,'') as denbansig \n\t\t\t\t\t\t FROM sigesp_banco_sigecof \n\t\t\t\t\t\t\t WHERE rpc_beneficiario.codbansig=sigesp_banco_sigecof.codbansig) as denbansig\n\t\t FROM rpc_beneficiario, scg_cuentas\n\t\t\t\t WHERE rpc_beneficiario.ced_bene like '" . $ls_cedbene . "' \n\t\t\t\t AND rpc_beneficiario.nombene like '" . $ls_nombene . "' \n\t\t\t\t\t AND rpc_beneficiario.apebene like '" . $ls_apebene . "'\n\t\t\t\t\t AND rpc_beneficiario.codban like '" . $ls_codban . "'\t\t\t\t\t \n\t\t\t\t\t AND rpc_beneficiario.ced_bene<>'----------'\n\t\t\t\t\t AND rpc_beneficiario.codemp=scg_cuentas.codemp\n\t\t\t\t\t AND rpc_beneficiario.sc_cuenta=scg_cuentas.sc_cuenta\n\t\t\t\t ORDER BY rpc_beneficiario.ced_bene ASC"; $rs_data = $io_sql->select($ls_sql); //echo $ls_sql.'<br>'; if ($rs_data === false) { $io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!"); } else { $li_totrows = $io_sql->num_rows($rs_data); if ($li_totrows > 0) { while (!$rs_data->EOF) { echo "<tr class=celdas-blancas>"; $ls_cedbene = trim($rs_data->fields["ced_bene"]); $ls_rifbene = trim($rs_data->fields["rifben"]); $ls_tipperrif = substr($ls_rifbene, 0, 1); //Tipo Persona RIF.(J=Juridico,G=Gubernamental,V=Natural Venezolano,E=Natural Extranjero). $ls_numpririf = substr($ls_rifbene, 2, 8); //Número Principal del RIF, 8 Dígitos (0-9). $ls_numterrif = substr($ls_rifbene, 11, 1); //Número Terminal del RIF, 1 Dígitos (0-9). $ls_nombene = $rs_data->fields["nombene"]; $ls_apebene = ltrim($rs_data->fields["apebene"]); if (!empty($ls_apebene)) { $ls_nombre = $ls_apebene . ', ' . $ls_nombene;
} $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($ld_fecordcom); uf_print_encabezado_pagina($ls_estcondat,$ls_numordcom,$ld_fecordcom,$ls_coduniadm,$ls_denuniadm, $ls_lugentdir,$ls_estlugcom,$ls_codpro,$ls_nompro,$ls_obscom,$ls_rifpro, $ls_diaplacom,$ls_dirpro,$ls_forpagcom,&$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="";
$lb_valido = true; $rs_proveedor = $io_report->uf_load_proveedores($ls_codemp, $li_orden, $ls_tipo, $ls_codprov1, $ls_codprov2, $ls_codesp, $lb_valido); if ($lb_valido) { error_reporting(E_ALL); set_time_limit(1800); $io_pdf = new Cezpdf('LEGAL', 'landscape'); // Instancia de la clase PDF $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra $io_pdf->ezSetCmMargins(4.5, 2.5, 3, 3); // Configuración de los margenes en centímetros uf_print_encabezado_pagina($ls_titulo, $io_pdf); // Imprimimos el encabezado de la página $io_pdf->ezStartPageNumbers(950, 50, 9, '', '', 1); // Insertar el número de página $li_total = $io_sql->num_rows($rs_proveedor); $data = $io_sql->obtener_datos($rs_proveedor); for ($z = 1; $z <= $li_total; $z++) { //1 $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_rifpro = $data["rifpro"][$z]; $ls_dirpro = $data["dirpro"][$z]; $ls_telpro = $data["telpro"][$z]; $ls_especialidad = $io_report->uf_load_especialidadproveedor2($ls_codpro, &$lb_valido); $ls_nivel = $io_report->uf_load_niveldecontratacionporproveedor($ls_codpro, &$lb_valido); $ls_clas = $io_report->uf_load_niveldeclasificacionporproveedor($ls_codpro, &$lb_valido); $ld_moncapfin = number_format($data["monfincon"][$z], 2, ",", "."); //Capacidad Financiera. $la_data[$z] = array('codigo' => $ls_codpro, 'nombre' => $ls_nompro, 'rif' => $ls_rifpro, 'direccion' => $ls_dirpro, 'telefono' => $ls_telpro, 'especialidad' => $ls_especialidad, 'nivel' => $ls_nivel, 'calificacion' => $ls_clas, 'capacidad' => $ld_moncapfin); }
if (!empty($ls_codestpro1) && !empty($ls_codestpro2) && !empty($ls_codestpro3)) { $ls_codestpro1 = str_pad($ls_codestpro1, 25, 0, 0); $ls_codestpro2 = str_pad($ls_codestpro2, 25, 0, 0); $ls_codestpro3 = str_pad($ls_codestpro3, 25, 0, 0); } if ($li_estmodest == 1) { if ($ls_tipo == "grid") { $ls_sql = "SELECT SUBSTR(spg_ep3.codestpro1," . $li_longestpro1 . ",25) as codestpro1,\n\t\t SUBSTR(spg_ep3.codestpro2," . $li_longestpro2 . ",25) as codestpro2,\n\t\t SUBSTR(spg_ep3.codestpro3," . $li_longestpro3 . ",25) as codestpro3,\n\t\t spg_ep3.denestpro3, spg_ep3.estcla, spg_ep1.sc_cuenta,\n\t\t\t\t\t (SELECT denestpro1 \n\t\t\t\t\t\t\t FROM spg_ep1 \n\t\t\t\t\t\t\t WHERE spg_ep1.codestpro1=spg_ep3.codestpro1 \n\t\t\t\t\t\t\t AND spg_ep1.estcla=spg_ep3.estcla) as denestpro1,\n\t\t\t\t\t (SELECT denestpro2 \n\t\t\t\t\t\t\t FROM spg_ep2 \n\t\t\t\t\t\t\t WHERE spg_ep2.codestpro1=spg_ep3.codestpro1 \n\t\t\t\t\t\t\t AND spg_ep2.codestpro2=spg_ep3.codestpro2 \n\t\t\t\t\t\t\t\tAND spg_ep2.estcla=spg_ep3.estcla) as denestpro2 \n\t\t\t\t FROM spg_ep3, spg_ep1\t\n\t\t\t\t WHERE spg_ep3.codestpro3 like '%{$ls_codestpro}%' \n\t\t\t\t\t AND spg_ep3.denestpro3 like '%{$ls_denestpro}%' \n\t\t\t\t\t\tAND spg_ep1.codestpro1<>'-------------------------'\n\t\t\t\t\t\tAND spg_ep3.codemp=spg_ep1.codemp\n\t\t\t\t\t\tAND spg_ep3.codestpro1=spg_ep1.codestpro1\n\t\t\t\t\t\tAND spg_ep3.estcla=spg_ep1.estcla\n\t\t\t\t ORDER BY codestpro1,codestpro2,codestpro3,spg_ep3.estcla"; } else { $ls_sql = "SELECT SUBSTR(spg_ep3.codestpro1," . $li_longestpro1 . ",25) as codestpro1,\n\t\t SUBSTR(spg_ep3.codestpro2," . $li_longestpro2 . ",25) as codestpro2,\n\t\t SUBSTR(spg_ep3.codestpro3," . $li_longestpro3 . ",25) as codestpro3,\n\t\t spg_ep3.denestpro3, spg_ep3.estcla, spg_ep1.sc_cuenta,\n\t\t\t\t\t (SELECT denestpro1 \n\t\t\t\t\t\t FROM spg_ep1 \n\t\t\t\t\t\t\t WHERE spg_ep1.codestpro1=spg_ep3.codestpro1\n\t\t\t\t\t\t\t AND spg_ep1.estcla=spg_ep3.estcla) as denestpro1, \n\t\t\t\t\t (SELECT denestpro2 \n\t\t\t\t\t\t FROM spg_ep2 \n\t\t\t\t\t\t\t WHERE spg_ep2.codestpro1=spg_ep3.codestpro1\n\t\t\t\t\t\t\t AND spg_ep2.codestpro2=spg_ep3.codestpro2\n\t\t\t\t\t\t\t AND spg_ep2.estcla=spg_ep3.estcla) as denestpro2 \n\t\t\t\t FROM spg_ep3, spg_ep1\t\n\t\t\t\t WHERE spg_ep3.codestpro3 like '%{$ls_codestpro}%'\n\t\t\t\t\t AND spg_ep3.denestpro3 like '%{$ls_denestpro}%' \n\t\t\t\t\t AND spg_ep1.codestpro1<>'-------------------------'\n\t\t\t\t\t AND spg_ep3.codemp=spg_ep1.codemp\n\t\t\t\t\t AND spg_ep3.codestpro1=spg_ep1.codestpro1\n\t\t\t\t\t AND spg_ep3.estcla=spg_ep1.estcla\n\t\t\t\t ORDER BY codestpro1,codestpro2,codestpro3,spg_ep3.estcla"; } } else { $ls_sql = "SELECT SUBSTR(a.codestpro1," . $li_longestpro1 . ",25) AS codestpro1,\n\t\t \t\t SUBSTR(b.codestpro2," . $li_longestpro2 . ",25) AS codestpro2,\n\t\t\t\t SUBSTR(c.codestpro3," . $li_longestpro3 . ",25) AS codestpro3,\n\t\t\t\t\t\t SUBSTR(d.codestpro4," . $li_longestpro4 . ",25) AS codestpro4,\n\t\t\t\t\t\t SUBSTR(e.codestpro5," . $li_longestpro5 . ",25) AS codestpro5,\n\t \t\t a.denestpro1 as denestpro1,b.denestpro2 as denestpro2,c.denestpro3 as denestpro3,d.denestpro4 as denestpro4,e.denestpro5 as denestpro5,\n\t\t\t\t a.estcla, a.sc_cuenta\n\t\t\t\t FROM spg_ep1 a,spg_ep2 b,spg_ep3 c, spg_ep4 d, spg_ep5 e\n\t\t\t\t WHERE e.codestpro5 like '%" . $ls_codestpro . "%'\n\t\t\t\t AND e.denestpro5 like '%" . $ls_denestpro . "%'\n\t\t\t\t\t AND a.codemp='" . $ls_codemp . "'\n\t\t\t\t\t AND a.codestpro1<>'-------------------------'\n\t\t\t\t\t AND a.codemp=b.codemp\n\t\t\t\t\t AND a.codemp=c.codemp\n\t\t\t\t\t AND a.codemp=d.codemp\n\t\t\t\t\t AND a.codemp=e.codemp \n\t\t\t\t\t AND a.codestpro1=b.codestpro1 \n\t\t\t\t\t AND a.codestpro1=c.codestpro1 \n\t\t\t\t\t AND b.codestpro2=c.codestpro2 \n\t\t\t\t\t AND a.codestpro1=d.codestpro1\n\t\t\t\t\t AND a.codestpro1=e.codestpro1\n\t\t\t\t\t AND b.codestpro2=d.codestpro2\n\t\t\t\t\t AND b.codestpro2=e.codestpro2\n\t\t\t\t\t AND c.codestpro3=d.codestpro3\n\t\t\t\t\t AND c.codestpro3=e.codestpro3\n\t\t\t\t\t AND d.codestpro4=e.codestpro4\n\t\t\t\t\t AND a.estcla=c.estcla"; } $rs_data = $io_sql->select($ls_sql); $num_row = $io_sql->num_rows($rs_data); if ($num_row == 0) { ?> <script language="javascript">alert('No Existen Estructuras Presupuestaria');close();</script> <?php } else { while ($row = $io_sql->fetch_row($rs_data)) { print "<tr class=celdas-blancas>"; $ls_estcla = trim($row["estcla"]); $ls_codestpro1 = trim($row["codestpro1"]); $ls_codestpro2 = trim($row["codestpro2"]); $ls_codestpro3 = trim($row["codestpro3"]); $ls_denestpro1 = ltrim($row["denestpro1"]); $ls_denestpro2 = ltrim($row["denestpro2"]); $ls_denestpro3 = ltrim($row["denestpro3"]); $ls_scgctaint = trim($row["sc_cuenta"]);
function uf_print($ls_tipo, &$totrow) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $io_msg = new class_mensajes(); require_once "../shared/class_folder/class_datastore.php"; $ds = new class_datastore(); require_once "../shared/class_folder/class_sql.php"; $io_sql = new class_sql($con); require_once "../shared/class_folder/class_funciones.php"; $io_fun = new class_funciones(); require_once "../shared/class_folder/class_fecha.php"; $io_fec = new class_fecha(); $arr = $_SESSION["la_empresa"]; $ls_codemp = $arr["codemp"]; require_once "../shared/class_folder/grid_param.php"; $grid = new grid_param(); $title[1] = "Todos <input name=chkall type=checkbox id=chkall value=T style=height:15px;width:15px \n\t\t\t\t onClick=javascript:uf_select_all(); >"; $title[2] = "Tipo de Material"; $title[3] = "Código"; $title[4] = "Denominación del componente"; $grid1 = "grid"; $ls_sql = " SELECT saf_componente.*, saf_tipoestructura.dentipest " . "\tFROM saf_componente " . "\tJOIN saf_tipoestructura ON (saf_tipoestructura.codemp=saf_componente.codemp " . " AND saf_tipoestructura.codtipest=saf_componente.codtipest) " . " ORDER BY saf_componente.codtipest, saf_componente.codcomp"; $rs_data = $io_sql->select($ls_sql); if ($rs_data === false) { $io_msg->message("Error en select"); } else { $totrow = $io_sql->num_rows($rs_data); if ($totrow > 0) { while ($row = $io_sql->fetch_row($rs_data)) { $ls_dentipest = $row["dentipest"]; $ls_codcomp = $row["codcomp"]; $ls_dencomp = $row["dencomp"]; $ls_codtipest = $row["codtipest"]; $z++; $object[$z][1] = "<input name=chktip" . $z . " type=checkbox id=chktip" . $z . " value=1 class=sin-borde onClick=javascript:uf_selected('" . $z . "');>"; $object[$z][2] = "<input type=text name=txtdentipest" . $z . " value='" . $ls_dentipest . "' id=txtdentipest" . $z . " class=sin-borde readonly style=text-align:center size=30 maxlength=30 >\n\t\t\t\t\t<input type=hidden name=txtcodtipest" . $z . " value='" . $ls_codtipest . "' id=txtcodtipest" . $z . " readonly >"; $object[$z][3] = "<input type=text name=txtcodcomp" . $z . " value='" . $ls_codcomp . "' id=txtcodcomp" . $z . " class=sin-borde readonly style=text-align:left size=12 maxlength=12>"; $object[$z][4] = "<input type=text name=txtdencomp" . $z . " value='" . $ls_dencomp . "' id=txtdencomp" . $z . " class=sin-borde readonly style=text-align:left size=50 maxlength=50>"; } } else { $object[1][1] = "<input name=chktip1 type=checkbox id=chktip1 value=1 class=sin-borde onClick=javascript:uf_selected('1');>"; $object[1][2] = "<input type=text name=txtdentipest1 value='' id=txtdentipest1 class=sin-borde readonly style=text-alin:center size=30 maxlength=30>\n\t\t\t\t<input type=hidden name=txtcodtipest1 value='' id=txtcodtipest1 readonly >"; $object[1][3] = "<input type=text name=txtcodcomp1 value='' id=txtcodcomp1 class=sin-borde readonly style=text-align:left size=12 maxlength=12>"; $object[1][4] = "<input type=text name=txtdencomp1 value='' id=txtdencomp1 class=sin-borde readonly style=text-align:left size=50 maxlength=50>"; } $grid->makegrid($totrow, $title, $object, 500, 'Catalogo de Materiales', $grid1); print "</table>"; } }
function uf_print(&$totrow, $provbene, $tipproben) { require_once("../shared/class_folder/grid_param.php"); require_once("../shared/class_folder/sigesp_include.php"); require_once("../shared/class_folder/class_sql.php"); require_once("../shared/class_folder/class_funciones.php"); $in = new sigesp_include(); $con = $in->uf_conectar(); $io_msg = new class_mensajes(); $io_sql = new class_sql($con); $io_funcion = new class_funciones(); $arr = $_SESSION["la_empresa"]; $ls_codemp = $arr["codemp"]; $grid = new grid_param(); //---------------------------------------------------------------------------------------- if ($tipproben=="P") { $cod_prov=$provbene; $ced_bene='----------'; } else { $cod_prov='----------'; $ced_bene=$provbene; } //------------------------------------------------------------------------------------------ $title[1]="Documento"; $title[2]="Total Anticipo"; $title[3]="Saldo"; $title[4]="Amortización"; $grid1="grid"; $ls_sql= " SELECT scb_movbco_anticipo.codemp, scb_movbco_anticipo.codban, scb_movbco_anticipo.ctaban, scb_movbco_anticipo.numdoc, scb_movbco_anticipo.codope, scb_movbco_anticipo.estmov, scb_movbco_anticipo.codamo, scb_movbco_anticipo.monamo, scb_movbco_anticipo.monsal, scb_movbco_anticipo.montotamo, scb_movbco_anticipo.sc_cuenta, scb_movbco.cod_pro, scb_movbco.ced_bene, scb_banco.nomban, (SELECT rpc_proveedor.sc_cuenta FROM rpc_proveedor WHERE rpc_proveedor.codemp=scb_movbco.codemp AND rpc_proveedor.cod_pro=scb_movbco.cod_pro) as cta_pro, (SELECT rpc_beneficiario.sc_cuenta FROM rpc_beneficiario WHERE rpc_beneficiario.codemp=scb_movbco.codemp AND rpc_beneficiario.ced_bene=scb_movbco.ced_bene) as cta_bene FROM scb_movbco_anticipo JOIN scb_movbco ON (scb_movbco.codemp = scb_movbco_anticipo.codemp AND scb_movbco.codban = scb_movbco_anticipo.codban AND scb_movbco.ctaban = scb_movbco_anticipo.ctaban AND scb_movbco.numdoc = scb_movbco_anticipo.numdoc AND scb_movbco.codope = scb_movbco_anticipo.codope AND scb_movbco.estmov = scb_movbco_anticipo.estmov) JOIN scb_banco ON (scb_banco.codemp=scb_movbco_anticipo.codemp AND scb_banco.codban=scb_movbco_anticipo.codban) WHERE scb_movbco_anticipo.codemp='".$ls_codemp."' AND scb_movbco_anticipo.estmov='C' AND scb_movbco.estant='1' AND scb_movbco.cod_pro='".$cod_prov."' AND scb_movbco.ced_bene='".$ced_bene."' AND scb_movbco_anticipo.monsal>0"; $rs_data=$io_sql->select($ls_sql); if(($rs_data===false)) { //$io_msg->message("Error en select"); } else { $totrow=$io_sql->num_rows($rs_data); $ls_monamo = 0; $z=0; if ($totrow>0) { while($row=$io_sql->fetch_row($rs_data)) { $ls_codban = $row["codban"]; $ls_cta = $row["ctaban"]; $ls_montotant = $row["montotamo"]; $ls_saldo = $row["monsal"]; $ls_numdoc = $row["numdoc"]; $ls_codamo = $row["codamo"]; $ls_codope = $row["codope"]; $ls_estmov = $row["estmov"]; $ls_scgcta = trim($row["sc_cuenta"]); $ls_montoamo2 = $row["monamo"]; $ls_codpro = $row["cta_pro"]; $ls_cedbene = $row["cta_bene"]; $z++; $object[$z][1]="<input name=txtbnumdoc".$z." type=text id=txtnumdoc value='".$ls_numdoc."' class=sin-borde size=20 maxlength=20 style=text-align:center readonly> <input name=txtcodamo".$z." type=hidden id=txtcodamo value='".$ls_codamo."' readonly> <input name=txtcodban".$z." type=hidden id=txtcodban value='".$ls_codban."' readonly> <input name=txtcta".$z." type=hidden id=txtcta value='".$ls_cta."' readonly> <input name=txtcodope".$z." type=hidden id=txtcodope value='".$ls_codope."' readonly> <input name=txtestmov".$z." type=hidden id=txtestmov value='".$ls_estmov."' readonly> <input name=txtsccta".$z." type=hidden id=txtsccta value='".$ls_scgcta."' readonly> <input name=txtmontamo2".$z." type=hidden id=txtmontamo2 value='".$ls_montoamo2 ."' readonly> <input name=txtcodpro".$z." type=hidden id=txtcodpro value='".$ls_codpro."' readonly> <input name=txtcedbene".$z." type=hidden id=txtcedbene value='".$ls_cedbene."' readonly>"; $object[$z][2]="<input type=text name=txtmontotant".$z." value='".number_format($ls_montotant,2,",",".")."' id=txtmontotantp class=sin-borde readonly style=text-align:right size=20 maxlength=20>"; $object[$z][3]="<input type=text name=txtmonsal".$z." value='".number_format($ls_saldo,2,",",".")."' id=txtmonsal class=sin-borde readonly style=text-align:right size=10 maxlength=10>"; $object[$z][4]="<input type=text name=txtmonamor".$z." value='".$ls_monamo."' id=txtmonamor class=sin-borde onKeyPress=return(ue_formatonumero(this,'.',',',event)); style=text-align:right size=10 maxlength=10>"; }// fin del while } else { $z=1; $object[1][1]="<input name=txtbnumdoc".$z." type=text id=txtnumdoc value='' class=sin-borde size=20 maxlength=20 readonly> <input name=txtcodamo".$z." type=hidden id=txtcodamo value='' readonly> <input name=txtcodban".$z." type=hidden id=txtcodban value='' readonly> <input name=txtcta".$z." type=hidden id=txtcta value='' readonly> <input name=txtcodope".$z." type=hidden id=txtcodope value='' readonly> <input name=txtestmov".$z." type=hidden id=txtestmov value='' readonly> <input name=txtsccta".$z." type=hidden id=txtsccta value='' readonly> <input name=txtmontamo2".$z." type=hidden id=txtmontamo2 value='' readonly> <input name=txtcodpro".$z." type=hidden id=txtcodpro value='' readonly> <input name=txtcedbene".$z." type=hidden id=txtcedbene value='' readonly>"; $object[1][2]="<input type=text name=txtmontotant".$z." value='' id=txtmontotantp class=sin-borde readonly style=text-align:right size=15 maxlength=15>"; $object[1][3]="<input type=text name=txtmonsal".$z." value='' id=txtmonsal class=sin-borde readonly style=text-align:right size=10 maxlength=10>"; $object[1][4]="<input type=text name=txtmonamor".$z." value='' id=txtmonamor class=sin-borde onKeyPress=return(ue_formatonumero(this,'.',',',event)); style=text-align:left size=10 maxlength=10>"; } $grid->makegrid($totrow,$title,$object,400,'Amortización de Anticipos',$grid1); print "</table>"; } }// fin de la funcion print
echo "<td width=50>Código </td>"; echo "<td width=250>Denominación</td>"; echo "</tr>"; $ls_codestpro1 = str_pad($ls_codestpro1, 25, 0, 0); $ls_codestpro2 = str_pad($ls_codestpro2, 25, 0, 0); $ls_codestpro3 = str_pad($ls_codestpro3, 25, 0, 0); $ls_codestpro4 = str_pad($ls_codestpro4, 25, 0, 0); $ls_codestpro5 = str_pad($ls_codestpro5, 25, 0, 0); if (array_key_exists('session_activa', $_SESSION)) { $ls_sql = " SELECT SUBSTR(codestpro1," . $li_longestpro1 . ",25) as codestpro1," . " SUBSTR(codestpro2," . $li_longestpro2 . ",25) as codestpro2," . " SUBSTR(codestpro3," . $li_longestpro3 . ",25) as codestpro3," . " SUBSTR(codestpro4," . $li_longestpro4 . ",25) as codestpro4," . " SUBSTR(codestpro5," . $li_longestpro5 . ",25) as codestpro5," . " ep5.denestpro5,ep5.estcla,'' as codfuefin, '' as denfuefin" . " FROM spg_ep5 as ep5" . " WHERE ep5.codemp='" . $ls_codemp . "' AND ep5.codestpro1 like '%" . $ls_codestpro1 . "%' AND estcla='" . $ls_estcla5 . "' " . " AND ep5.codestpro2 like '%" . $ls_codestpro2 . "%' AND ep5.codestpro3 like '%" . $ls_codestpro3 . "%' " . " AND ep5.codestpro4 like '%" . $ls_codestpro4 . "%' " . " AND ep5.denestpro5 like '%" . $ls_denestpro5 . "%'"; } else { $ls_sql = " SELECT SUBSTR(codestpro1," . $li_longestpro1 . ",25) as codestpro1," . " SUBSTR(codestpro2," . $li_longestpro2 . ",25) as codestpro2," . " SUBSTR(codestpro3," . $li_longestpro3 . ",25) as codestpro3," . " SUBSTR(codestpro4," . $li_longestpro4 . ",25) as codestpro4," . " SUBSTR(codestpro5," . $li_longestpro5 . ",25) as codestpro5," . " ep5.denestpro5,ep5.estcla,ff.codfuefin,ff.denfuefin" . " FROM spg_ep5 as ep5, sigesp_fuentefinanciamiento as ff " . " WHERE ep5.codfuefin= ff.codfuefin" . " AND ep5.codemp='" . $ls_codemp . "' AND ep5.codestpro1 like '%" . $ls_codestpro1 . "%' AND estcla='" . $ls_estcla5 . "' " . " AND ep5.codestpro2 like '%" . $ls_codestpro2 . "%' AND ep5.codestpro3 like '%" . $ls_codestpro3 . "%' " . " AND ep5.codestpro4 like '%" . $ls_codestpro4 . "%' " . " AND ep5.denestpro5 like '%" . $ls_denestpro5 . "%'"; } $rs_data = $io_sql->select($ls_sql); $data = $rs_data; if ($io_sql->num_rows($rs_data) == 0) { $io_msg->message("No se han definido " . $_SESSION["la_empresa"]["nomestpro3"]); } else { while ($row = $io_sql->fetch_row($rs_data)) { print "<tr class=celdas-blancas>"; $ls_codestpro1 = $row["codestpro1"]; $ls_codestpro2 = $row["codestpro2"]; $ls_codestpro3 = $row["codestpro3"]; $ls_codestpro4 = $row["codestpro4"]; $ls_codestpro5 = $row["codestpro5"]; $ls_denestpro5 = $row["denestpro5"]; $ls_codfuefin = $row["codfuefin"]; $ls_denfuefin = $row["denfuefin"]; $ls_estcla = $row["estcla"]; if (array_key_exists('session_activa', $_SESSION)) { print "<td width=250 align=\"center\"><a href=\"javascript: aceptar_v2('{$ls_codestpro5}','{$ls_denestpro5}','{$ls_estcla}');\">" . trim($ls_codestpro1) . "</td>";
$lb_valido = true; $rs_proveedor = $io_report->uf_load_proveedores($ls_codemp, $li_orden, $ls_tipo, $ls_codprov1, $ls_codprov2, $ls_codesp, $lb_valido); 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(4.2, 3, 3, 3); // Configuración de los margenes en centímetros uf_print_encabezado_pagina($ls_titulo, $io_pdf); // Imprimimos el encabezado de la página $io_pdf->ezStartPageNumbers(550, 50, 10, '', '', 1); // Insertar el número de página $li_total = $io_sql->num_rows($rs_proveedor); //print "REGISTROS ENCONTRADOS--->".$li_total; uf_print_cabecera($io_pdf); $data = $io_sql->obtener_datos($rs_proveedor); $la_documentos[0] = ""; for ($z = 1; $z <= $li_total; $z++) { //1 $io_pdf->transaction('start'); // Iniciamos la transacción $li_numpag = $io_pdf->ezPageCount; // Número de página $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_rifpro = $data["rifpro"][$z]; $ls_ocei = $data["ocei_no_reg"][$z]; $ls_telpro = $data["telpro"][$z];
function uf_obtener_codempresa_bd($as_hostname, $as_login, $as_password,$as_database,$as_gestor,&$as_codempdes) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Funcion uf_obtener_codempresa_bd // Access public // Arguments $as_hostname // hostname para conectar con la Base de Datos // $as_login // login para conectar con la Base de Datos // $as_password // password o clave para conectac con la Base de Datos // $as_database // nombre de la Base Datos con la que se quiere conectar // $as_gestor // nombre del gestor que maneja la Base de Datos // $as_codempdes // Código de la Empresa destino // Returns lb_valido. Retorna una variable booleana // Description Devuelve el Código de Empresa de la Base de Datos referenciada ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// require_once("../shared/class_folder/sigesp_include.php"); $io_conect=new sigesp_include(); $io_conexion_destino = $io_conect->uf_conectar_otra_bd ($as_hostname, $as_login, $as_password,$as_database,$as_gestor); $io_sql_destino = new class_sql($io_conexion_destino); $lb_valido=true; $ls_sql="SELECT codemp ". " FROM sigesp_empresa "; $rs_data = $io_sql_destino->select($ls_sql); if ($rs_data===false) { $this->io_msg->message($this->io_funcion->uf_convertirmsg($io_sql_destino->message)); $lb_valido=false; } else { $li_numrows = $io_sql_destino->num_rows($rs_data); if ($li_numrows>0) { $lb_valido=true; if ($row=$io_sql_destino->fetch_row($rs_data)) { $as_codempdes = $row["codemp"]; } $io_sql_destino->free_result($rs_data); } else { $lb_valido=false; } } return $lb_valido; }
function uf_imprimirresultados($as_coduniadm, $as_denuniadm, $ls_destino, $ls_coddestino, $ls_dendestino) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $msg = new class_mensajes(); require_once "../shared/class_folder/class_sql.php"; $io_sql = new class_sql($con); $ds = new class_datastore(); require_once "../shared/class_folder/class_funciones.php"; $fun = new class_funciones(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=40>Código</td>"; print "<td width=120>Denominación</td>"; print "</tr>"; //*** COMENTADO POR ANAIS SARABIA 26/07/2010 ***** /*$ls_sql="SELECT coduniadm, denuniadm". " FROM saf_unidadadministrativa". " WHERE codemp='".$ls_codemp."'". " AND coduniadm like '".$as_coduniadm."'". " AND denuniadm like '".$as_denuniadm."'". " ORDER BY coduniadm "; */ $ls_sql = "SELECT spg_unidadadministrativa.coduniadm, \n\t\t count(spg_dt_unidadadministrativa.codestpro1)as items,\n max(spg_unidadadministrativa.denuniadm) as denuniadm,\n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.codestpro1) as codestpro1, \n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.codestpro2) as codestpro2, \n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.codestpro3) as codestpro3, \n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.codestpro4) as codestpro4, \n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.codestpro5) as codestpro5, \n\t\t\t\t\t\tmax(spg_dt_unidadadministrativa.estcla) as estcla" . " FROM spg_unidadadministrativa, spg_dt_unidadadministrativa, spg_ep5 " . " WHERE spg_unidadadministrativa.codemp='" . $ls_codemp . "' " . " AND spg_unidadadministrativa.coduniadm <>'----------' " . " AND spg_unidadadministrativa.coduniadm like '%" . $as_coduniadm . "%' " . " AND spg_unidadadministrativa.denuniadm like '%" . $as_denuniadm . "%' " . " AND spg_unidadadministrativa.codemp=spg_dt_unidadadministrativa.codemp " . " AND spg_unidadadministrativa.coduniadm=spg_dt_unidadadministrativa.coduniadm " . " AND spg_dt_unidadadministrativa.estcla=spg_ep5.estcla " . " AND spg_dt_unidadadministrativa.codestpro1=spg_ep5.codestpro1 " . " AND spg_dt_unidadadministrativa.codestpro2=spg_ep5.codestpro2 " . " AND spg_dt_unidadadministrativa.codestpro3=spg_ep5.codestpro3 " . " AND spg_dt_unidadadministrativa.codestpro4=spg_ep5.codestpro4 " . " AND spg_dt_unidadadministrativa.codestpro5=spg_ep5.codestpro5 " . " GROUP BY spg_unidadadministrativa.codemp, spg_unidadadministrativa.coduniadm" . " ORDER BY coduniadm ASC "; $rs_per = $io_sql->select($ls_sql); $msg->message($ls_sql); $li_num = $io_sql->num_rows($rs_per); if ($li_num > 0) { while ($row = $io_sql->fetch_row($rs_per)) { print "<tr class=celdas-blancas>"; $as_coduniadm = $row["coduniadm"]; $as_denuniadm = $row["denuniadm"]; switch ($ls_destino) { case "": print "<td><a href=\"javascript: aceptar('{$as_coduniadm}','{$as_denuniadm}');\">" . $as_coduniadm . "</a></td>"; print "<td>" . $as_denuniadm . "</td>"; print "</tr>"; break; case "activo": print "<td><a href=\"javascript: aceptar_activo('{$as_coduniadm}','{$as_denuniadm}');\">" . $as_coduniadm . "</a></td>"; print "<td>" . $as_denuniadm . "</td>"; print "</tr>"; break; case "reasignaciones": print "<td><a href=\"javascript: aceptar_reasignaciones('{$as_coduniadm}','{$as_denuniadm}');\">" . $as_coduniadm . "</a></td>"; print "<td>" . $as_denuniadm . "</td>"; print "</tr>"; break; case "reporte": print "<td><a href=\"javascript: aceptar_reportes('{$as_coduniadm}','{$as_denuniadm}','{$ls_coddestino}','{$ls_dendestino}');\">" . $as_coduniadm . "</a></td>"; print "<td>" . $as_denuniadm . "</td>"; print "</tr>"; break; } } } print "</table>"; }
if($ls_operacion == "RECARGAR") { $lb_valido=$io_class_progrep->uf_spi_cargar_data_original($ls_codrep,$la_seguridad); $ls_operacion="CARGAR"; }//operacion=="RECARGAR" if($ls_operacion=="CARGAR") { $ls_codrep=$_POST["cmbrep"]; $ls_modrep=1; $rs_load=0; $lb_valido=$io_class_progrep->uf_spi_cargar_data($ls_codrep,$ls_modrep,$rs_load); if($lb_valido) { $li=$io_sql->num_rows($rs_load); if($row=$io_sql->fetch_row($rs_load)) { $data=$io_sql->obtener_datos($rs_load); $ds_progrep->data=$data; $li_num=$ds_progrep->getRowCount("spi_cuenta"); $li_totnum=$li_num; for($i=1;$i<=$li_num;$i++) { $ls_cuenta=$data["spi_cuenta"][$i]; $ls_denominacion=$data["denominacion"][$i]; $ls_distribuir=$data["distribuir"][$i]; $ls_modrep=$data["modrep"][$i]; $ls_status=$data["status"][$i]; $ls_referencia=$data["referencia"][$i]; $ld_previsto=number_format($data["previsto"][$i],2,",",".");
if (array_key_exists("txtfechahasta",$_POST)) { $ls_fechahasta=$_POST["txtfechahasta"]; } else { $ls_fechahasta=$_GET["txtfechahasta"]; } $li_cont=0; $li_page=0; $arr_emp=$_SESSION["la_empresa"]; $ls_codemp=$arr_emp["CodEmp"]; $rs_recepcion=$io_report->uf_select_recepcion($ls_codemp,$ls_categoria,$ls_codigo1,$ls_codigo2,$ls_tipodoc1,$ls_tipodoc2,$ls_recibidas,$ls_anuladas,$ls_procesadas,$ls_fechadesde,$ls_fechahasta); $li_total=$io_sql->num_rows($rs_recepcion); $data=$io_sql->obtener_datos($rs_recepcion); $li_maxlines=51; $li_aux=$li_total/$li_maxlines; $li_total_page=ceil($li_aux); for ($z=1;$z<=$li_total;$z++) {//1 $ls_numrecdoc =$data["NumRecDoc"][$z]; $ls_denominacion=$data["DenConDoc"][$z]; $ls_codtipdoc =$data["CodTipDoc"][$z]; $ls_sql=" SELECT DenTipDoc ". " FROM cxp_documento ". " WHERE CodTipDoc='".$ls_codtipdoc."'"; $rs_recdoc=$io_sql2->select($ls_sql); if ($row=$io_sql2->fetch_row($rs_recdoc))
$li_total = $_GET["total"]; } $la_documentos[0] = ""; if ($li_total > 0) { for ($li_i = 1; $li_i <= $li_total; $li_i++) { $la_documentos[$li_i] = $_GET["coddoc" . $li_i]; } } $lb_valido = true; $la_empresa = $_SESSION["la_empresa"]; $ls_codemp = $la_empresa["codemp"]; $rs_data = $io_report->uf_select_proveedores($ls_codemp, $li_orden, $ls_codproben1, $ls_codproben2, $lb_valido); if ($lb_valido) { error_reporting(E_ALL); set_time_limit(1800); $li_total = $io_sql->num_rows($rs_data); $data = $io_sql->obtener_datos($rs_data); $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.8, 3, 3, 3); // Configuración de los margenes en centímetros uf_print_encabezado_pagina($ls_titulo, $io_pdf); // Imprimimos el encabezado de la página $io_pdf->ezStartPageNumbers(580, 50, 8, '', '', 1); // Insertar el número de página for ($z = 1; $z <= $li_total; $z++) { $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_dirpro = $data["dirpro"][$z];
$lo_title[6] = ""; if (array_key_exists("operacion", $_POST)) { $ls_operacion = $_POST["operacion"]; $ls_denact = $_POST["txtdenact"]; $ls_codact = $_POST["txtcodact"]; $ls_idact = $_POST["txtidact"]; } else { $ls_codact = $_GET["codact"]; $ls_seract = $_GET["seract"]; $ls_idact = $_GET["id"]; $ls_operacion = ""; $la_estpar[0] = ""; $la_estpar[1] = ""; $ls_sql = "SELECT codpar,denpar,estpar \n\t\t FROM saf_partes \n\t\t\t\t WHERE codemp = '" . $la_codemp . "'\n\t\t\t\t AND codact = '" . $ls_codact . "'\n\t\t\t\t AND ideact = '" . $ls_idact . "'"; $rs_data = $io_sql->select($ls_sql); $li_nurows = $io_sql->num_rows($rs_data); if ($li_nurows >= 1) { $li_j = 0; while ($row = $io_sql->fetch_row($rs_data)) { $la_estpar[0] = ""; $la_estpar[1] = ""; $ls_codpar = $row["codpar"]; $ls_denpar = $row["denpar"]; $ls_estpar = $row["estpar"]; $io_fac->uf_seleccionarcombo("1-0", $ls_estpar, $la_estpar, 2); $li_j++; $lo_object[$li_j][1] = "<input name=txtseract" . $li_j . " type=text id=txtseract" . $li_j . " class=sin-borde size=17 maxlength=15 value='" . $ls_seract . "' onKeyUp='javascript: ue_validarnumero(this);' readonly='true'>"; $lo_object[$li_j][2] = "<input name=txtcodpar" . $li_j . " type=text id=txtcodpar" . $li_j . " class=sin-borde size=17 maxlength=15 value='" . $ls_codpar . "' onKeyUp='javascript: ue_validarnumero(this);'>"; $lo_object[$li_j][3] = "<input name=txtdenpar" . $li_j . " type=text id=txtdenpar" . $li_j . " class=sin-borde size=40 maxlength=100 value='" . $ls_denpar . "'>"; $lo_object[$li_j][4] = "<select name=cmbestatus" . $li_j . "><option value=1 " . $la_estpar[0] . ">Bueno</option><option value=0 " . $la_estpar[1] . ">Malo</option></select>"; $lo_object[$li_j][5] = "<a href=javascript:uf_agregar_dt(" . $li_j . ");><img src=../shared/imagebank/tools15/aprobado.gif alt=Aceptar width=15 height=15 border=0></a>";
<?php print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Presupuestaria</td>"; print "<td>Denominación</td>"; print "<td>Contable</td>"; print "</tr>"; if($ls_operacion=="BUSCAR") { $ls_sql = " SELECT soc_servic ". " FROM sigesp_empresa ". " WHERE codemp = '".$as_codemp."' "; $rs=$SQL->select($ls_sql); $li_numrows=$SQL->num_rows($rs); if ($li_numrows===false) { $lb_valido=false; $this->io_msg->message($this->io_funcion->uf_convertirmsg($this->io_sql->message)); } else { $ls_sql = " SELECT DISTINCT spg_cuenta, denominacion, codestpro1,codestpro2, codestpro3,sc_cuenta,status ". " FROM spg_cuentas ". " WHERE codemp = '".$as_codemp."' AND spg_cuenta like '%".$ls_codigo."%' AND ". " denominacion like '%".$ls_denominacion."%' AND sc_cuenta like '%".$ls_cuentaspg."%' "; while ($row=$SQL->fetch_row($rs)) { $ls_cadena = trim($row["soc_servic"]);
$lb_valido = true; $rs_beneficiario = $io_report->uf_select_beneficiario($li_orden, $ls_cedula1, $ls_cedula2, $lb_valido); 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(3.8, 3, 3, 3); // Configuración de los margenes en centímetros uf_print_encabezado_pagina($ls_titulo, $io_pdf); // Imprimimos el encabezado de la página $io_pdf->ezStartPageNumbers(550, 50, 10, '', '', 1); // Insertar el número de página $li_total = $io_sql->num_rows($rs_beneficiario); $data = $io_sql->obtener_datos($rs_beneficiario); for ($z = 1; $z <= $li_total; $z++) { //1 $ls_cedbene = $data["ced_bene"][$z]; $ls_nombene = $data["nombene"][$z]; $ls_apebene = $data["apebene"][$z]; $ls_cuenta = $data["sc_cuenta"][$z]; $la_data[$z] = array('cedula' => $ls_cedbene, 'nombre' => $ls_nombene, 'apellido' => $ls_apebene, 'cuenta' => $ls_cuenta); } //4 uf_print_cabecera_detalle($io_pdf); uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1);
switch ($_SESSION["ls_gestor"]) { case "MYSQLT": $ls_cadena_beneficiario = "CONCAT(rpc_beneficiario.nombene,' ',rpc_beneficiario.apebene)"; break; case "POSTGRES": $ls_cadena_beneficiario = "rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene"; break; case "INFORMIX": $ls_cadena_beneficiario = "rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene"; break; } $ls_estcat = $io_saf->uf_select_valor_config($ls_codemp); $ls_sql = " SELECT saf_movimiento.*,saf_causas.dencau, " . " (CASE tiprespri WHEN 'P' THEN (SELECT " . $ls_cadena_personal . " " . "\t\t\t\t\t\t\t\t FROM sno_personal " . "\t\t\t\t\t\t\t\t WHERE sno_personal.codemp=saf_movimiento.codemp AND " . "\t\t\t\t\t\t\t\t\t\t sno_personal.codper=saf_movimiento.codrespri) " . "\t\t\t\t WHEN 'B' THEN (SELECT " . $ls_cadena_beneficiario . " " . "\t\t\t\t\t\t\t\t FROM rpc_beneficiario " . "\t\t\t\t\t\t\t\t WHERE rpc_beneficiario.codemp=saf_movimiento.codemp AND " . "\t\t\t\t\t\t\t\t\t\t rpc_beneficiario.ced_bene=saf_movimiento.codrespri) " . "\t END) AS nomrespri, " . " (CASE tipresuso WHEN 'P' THEN (SELECT " . $ls_cadena_personal . " " . "\t\t\t\t\t\t\t\t FROM sno_personal " . "\t\t\t\t\t\t\t\t WHERE sno_personal.codemp=saf_movimiento.codemp AND " . "\t\t\t\t\t\t\t\t\t\t sno_personal.codper=saf_movimiento.codresuso) " . "\t\t\t \t WHEN 'B' THEN (SELECT " . $ls_cadena_beneficiario . " " . "\t\t\t\t\t\t\t\t FROM rpc_beneficiario " . "\t\t\t\t\t\t\t\t WHERE rpc_beneficiario.codemp=saf_movimiento.codemp AND " . "\t\t\t\t\t\t\t\t\t\t rpc_beneficiario.ced_bene=saf_movimiento.codresuso) " . "\t END) AS nomresuso, " . " (SELECT denuniadm " . " FROM spg_unidadadministrativa " . " WHERE spg_unidadadministrativa.coduniadm=saf_movimiento.coduniadm) as denuniadm" . " FROM saf_movimiento,saf_causas " . " WHERE saf_movimiento.codcau=saf_causas.codcau AND " . " saf_causas.tipcau='R' AND saf_causas.estcat='" . $ls_estcat . "' AND " . " saf_movimiento.codemp='" . $ls_codemp . "' " . $ls_sqlint . " AND " . " saf_movimiento.cmpmov like '" . $ls_cmpmov . "' AND " . " saf_movimiento.codcau like '" . $ls_codcau . "' "; $rs_cta = $io_sql->select($ls_sql); //$data=$rs_cta; $li_num = $row = $io_sql->num_rows($rs_cta); if ($li_num > 0) { /*$data=$io_sql->obtener_datos($rs_cta); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("cmpmov"); for($z=1;$z<=$totrow;$z++)*/ while ($row = $io_sql->fetch_row($rs_cta)) { print "<tr class=celdas-blancas>"; $ls_cmpmov = $row["cmpmov"]; $ls_numcmp = $row["numcmp"]; $ls_codcau = $row["codcau"]; $ls_dencau = $row["dencau"]; $ld_feccmp = $io_fun->uf_formatovalidofecha($row["feccmp"]); $ls_descmp = $row["descmp"];
} elseif ($ls_operacion=="MOSTRAR") { } else { if ($ls_operacion=="PROCESAR") { $lb_valido_transferencia = false; for ($li_i=1;$li_i<=$li_totrows;$li_i++)//$li_totrows numeros de comprobantes { uf_cargar_dt($li_i); $resultado = $io_comprobantes->uf_cargar_bddestino();//busca todas las bases configuradas como consolidadoras $li_numrows = $io_sql->num_rows($resultado); if ($li_numrows > 0) { $ls_dbdestino = ""; $i = 0; if ($ls_selusu=='1') { $la_bddestino = array(); $lb_valido_transferencia = true; while(($li_numrows>0)&&($lb_valido_transferencia)) { $row = $io_sql->fetch_row($resultado); $li_numrows--; $ls_dbdestino = trim($row["nombasdat"]); $lb_encontrado = uf_get_datos_bddestino($ls_dbdestino,$empresa); if ($lb_encontrado)
$la_empresa["codemp"][$li_pos]=$row["codemp"]; $la_empresa["nombre"][$li_pos]=$row["nombre"]; } } } } } elseif($operacion="SELEMPRESA") { $ls_codemp=$_POST["cmbempresa"]; $con=$io_conect->uf_conectar(); $obj_sql=new class_sql($con); $ls_sql="SELECT * FROM sigesp_empresa where codemp='".$ls_codemp."' "; $result=$obj_sql->select($ls_sql); $li_row=$obj_sql->num_rows($result); $li_pos=0; if($row=$obj_sql->fetch_row($result)) { $la_empresa=$row; $_SESSION["la_empresa"]=$la_empresa; $_SESSION["la_empresa"]["periodo"]=date("Y-m-d",strtotime($_SESSION["la_empresa"]["periodo"])); $_SESSION['sigesp_sitioweb']=$_SESSION["la_empresa"]["dirvirtual"]; $_SESSION['sigesp_servidor']=$_SESSION["ls_hostname"]; $_SESSION['sigesp_usuario']=$_SESSION["ls_login"]; $_SESSION['sigesp_clave']=$_SESSION["ls_password"]; $_SESSION['sigesp_basedatos']=$_SESSION["ls_database"]; $_SESSION['sigesp_gestor']=$_SESSION["ls_gestor"]; $_SESSION['sigesp_servidor_apr']=$_SESSION["ls_hostname"]; $_SESSION['sigesp_usuario_apr']=$_SESSION["ls_login"];
function uf_print($as_codper, $as_cedper, $as_nomper, $as_apeper, $as_codnom, &$totrow) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print // Access: public // Arguments: as_codper // Código de Personal // as_cedper // Cédula de Pesonal // as_nomper // Nombre de Personal // as_apeper // Apellido de Personal // as_codnom // código de nómina a la que pertenece // as_tipo // Tipo de Llamada del catálogo // Description: Función que obtiene e imprime los resultados de la busqueda // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 01/01/2006 Fecha Última Modificación : ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_fun_nomina; require_once("../shared/class_folder/sigesp_include.php"); $io_include=new sigesp_include(); $io_conexion=$io_include->uf_conectar(); require_once("../shared/class_folder/class_sql.php"); $io_sql=new class_sql($io_conexion); require_once("../shared/class_folder/class_mensajes.php"); $io_mensajes=new class_mensajes(); require_once("../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); require_once("sigesp_sno.php"); $io_sno=new sigesp_sno(); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; require_once("../shared/class_folder/grid_param.php"); $grid = new grid_param(); $title[1]="Todos <input name=chkall type=checkbox id=chkall value=T style=height:15px;width:15px onClick=javascript:uf_select_all(); >"; $title[2]="Código"; $title[3]="Cedula"; $title[4]="Nombre y Apellido"; $title[5]="Estatus"; $grid1="grid"; $ls_sql=" SELECT sno_personal.codper, sno_personal.cedper, sno_personal.nomper, ". " sno_personal.apeper, sno_personal.estper ". " FROM sno_personal ". " WHERE sno_personal.codemp='".$ls_codemp."' ". " AND sno_personal.codper like '".$as_codper."' ". " AND sno_personal.cedper like '".$as_cedper."' ". " AND sno_personal.nomper like '".$as_nomper."' ". " AND sno_personal.apeper like '".$as_apeper."' ". " AND sno_personal.codper IN (SELECT sno_personal.codper ". " FROM sss_permisos_internos,sno_personal ". " WHERE sss_permisos_internos.codsis='SNO' ". " AND sss_permisos_internos.codusu='".$_SESSION["la_logusr"]."' ". " AND sno_personal.codtippersss=sss_permisos_internos.codintper ) ". " AND sno_personal.codper IN (SELECT codper FROM sno_personalnomina ". " WHERE sno_personalnomina.codemp='".$ls_codemp."' ". " AND sno_personalnomina.codnom='".$as_codnom."') ". " ORDER BY sno_personal.codper "; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { $totrow=$io_sql->num_rows($rs_data); if ($totrow>0) { while($row=$io_sql->fetch_row($rs_data)) { $ls_codper=$row["codper"]; $ls_cedper=$row["cedper"]; $ls_nomper=$row["nomper"]; $ls_apeper=$row["apeper"]; $ls_nomper=$ls_apeper.", ".$ls_nomper; $ls_estper=$row["estper"]; switch ($ls_estper) { case "0": $ls_estper="Pre-Ingreso"; $ls_estatus=0; break; case "1": $ls_estper="Activo"; $ls_estatus=1; break; case "2": $ls_estper="N/A"; $ls_estatus=2; break; case "3": $ls_estper="Egresado"; $ls_estatus=3; break; } $z++; $object[$z][1]="<input name=chkper".$z." type=checkbox id=chkper".$z." value=1 class=sin-borde onClick=javascript:uf_selected('".$z."');>"; $object[$z][2]="<input type=text name=txtcodigo".$z." value='".$ls_codper."' id=txtcodigo".$z." class=sin-borde readonly style=text-align:center size=18 maxlength=18 >"; $object[$z][3]="<input type=text name=txtcedper".$z." value='".$ls_cedper."' id=txtcedper".$z." class=sin-borde readonly style=text-align:left size=12 maxlength=12>"; $object[$z][4]="<input type=text name=txtnomper".$z." value='".$ls_nomper."' id=txtnomper".$z." class=sin-borde readonly style=text-align:left size=100 maxlength=100>"; $object[$z][5]="<input type=text name=txtestatus".$z." value='".$ls_estper."' id=txtestatus".$z." class=sin-borde readonly style=text-align:left size=10 maxlength=10>"; }// fin del while } else { $object[1][1]="<input name=chkcta1 type=checkbox id=chkcta1 value=1 onClick=javascript:uf_selected('".$z."');>"; $object[1][2]="<input type=text name=txtcuenta1 value='' id=txtcuenta1 class=sin-borde readonly style=text-align:center size=20 maxlength=20>"; $object[1][3]="<input type=text name=txtdencuenta1 value='' id=txtdencuenta1 class=sin-borde readonly style=text-align:center size=50 maxlength=254>"; $totrow=1; } $grid->makegrid($totrow,$title,$object,600,'Catalogo del Personal',$grid1); //$io_sql->free_result($rs_data); } print "</table>"; unset($io_include); unset($io_conexion); unset($io_sql); unset($io_mensajes); unset($io_funciones); unset($io_sno); unset($ls_codemp); }
$ls_titulo = "SOLICITUD DE COTIZACIÓN"; $lb_valido = uf_insert_seguridad($ls_titulo); // Seguridad de Reporte if ($lb_valido) { $rs_data = $io_report->uf_load_cabecera_formato_solicitud_cotizacion($ls_numsolcot,$ls_tipsolcot,$ls_fecsolcot,$ls_tabla,&$lb_valido); if (!$lb_valido) { print("<script language=JavaScript>"); print(" alert('No hay nada que Reportar !!!');"); print(" close();"); print("</script>"); } else { $li_numrows = $io_sql->num_rows($rs_data); if ($li_numrows>0) { 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,3,3,3); // Configuración de los margenes en centímetros $io_pdf->ezStartPageNumbers(550,30,10,'','',1); // Insertar el número de página $li_count = 0; while (($row=$io_sql->fetch_row($rs_data)) && $lb_valido) { $li_count++; if ($li_count>1) { $io_pdf->ezNewPage();
function uf_load_creditos_nota($as_codemp, $as_numncnd, $as_numrecdoc, $as_codtipdoc, $as_numsol, $as_codope, $as_tipproben, $as_codproben) { require_once "../../shared/class_folder/sigesp_include.php"; $io_include = new sigesp_include(); $io_conexion = $io_include->uf_conectar(); require_once "../../shared/class_folder/class_sql.php"; $io_sql = new class_sql($io_conexion); require_once "../../shared/class_folder/class_mensajes.php"; $io_mensajes = new class_mensajes(); require_once "../../shared/class_folder/class_funciones.php"; $io_funciones = new class_funciones(); require_once "../../shared/class_folder/class_datastore.php"; $io_ds_cargos = new class_datastore(); $ls_sqlaux = ""; $ld_montotcre = 0; if ($as_tipproben == 'P') { $ls_sqlaux = " AND cxp_dc_cargos.cod_pro='" . $as_codproben . "' AND cxp_dc_cargos.ced_bene='----------'"; } elseif ($as_tipproben == 'B') { $ls_sqlaux = " AND trim(cxp_dc_cargos.ced_bene)='" . trim($as_codproben) . "' AND cxp_dc_cargos.cod_pro='----------'"; } else { $ls_sqlaux = " AND cxp_dc_cargos.cod_pro='----------'"; } $ls_sql = "SELECT cxp_dc_cargos.* \n\t FROM cxp_dc_cargos, cxp_rd, cxp_solicitudes, cxp_dt_solicitudes\n\t\t\t\t WHERE cxp_dc_cargos.codemp='" . $as_codemp . "'\n\t\t\t\t AND cxp_dc_cargos.numsol='" . $as_numsol . "'\n\t\t\t\t\tAND trim(cxp_dc_cargos.numrecdoc)='" . trim($as_numrecdoc) . "'\n\t\t\t\t\tAND cxp_dc_cargos.codtipdoc='" . $as_codtipdoc . "'\n\t\t\t\t\tAND cxp_dc_cargos.codope='" . $as_codope . "'\n\t\t\t\t\tAND trim(cxp_dc_cargos.numdc)='" . trim($as_numncnd) . "' {$ls_sqlaux}\n\t\t\t\t\tAND cxp_dc_cargos.codemp=cxp_solicitudes.codemp\n\t\t\t\t\tAND cxp_dc_cargos.numsol=cxp_solicitudes.numsol\t\t\t\t\t\n\t\t\t\t\tAND cxp_solicitudes.codemp=cxp_dt_solicitudes.codemp\n\t\t\t\t\tAND cxp_solicitudes.numsol=cxp_dt_solicitudes.numsol\t\t\t\t\t\n\t\t\t\t\tAND cxp_dc_cargos.codemp=cxp_dt_solicitudes.codemp\n\t\t\t\t\tAND cxp_dc_cargos.codtipdoc=cxp_dt_solicitudes.codtipdoc\n\t\t\t\t\tAND cxp_dc_cargos.numrecdoc=cxp_dt_solicitudes.numrecdoc\n\t\t\t\t\tAND cxp_dc_cargos.cod_pro=cxp_dt_solicitudes.cod_pro\n\t\t\t\t\tAND cxp_dc_cargos.ced_bene=cxp_dt_solicitudes.ced_bene\t\t\t\t\t\n\t\t\t\t\tAND cxp_rd.codemp=cxp_dt_solicitudes.codemp\n\t\t\t\t\tAND cxp_rd.codtipdoc=cxp_dt_solicitudes.codtipdoc\n\t\t\t\t\tAND cxp_rd.numrecdoc=cxp_dt_solicitudes.numrecdoc\n\t\t\t\t\tAND cxp_rd.cod_pro=cxp_dt_solicitudes.cod_pro\n\t\t\t\t\tAND cxp_rd.ced_bene=cxp_dt_solicitudes.ced_bene"; //echo $ls_sql.'<br>'; $rs_data = $io_sql->select($ls_sql); if ($rs_data === false) { $this->io_mensajes->message("CLASE->Recepcion MÉTODO->uf_load_creditos_nota ERROR->" . $this->io_funciones->uf_convertirmsg($this->io_sql->message)); $rs_data = false; } else { $li_numrows = $io_sql->num_rows($rs_data); if ($li_numrows > 0) { while ($row = $io_sql->fetch_row($rs_data)) { $ls_codcar = $row["codcar"]; $ld_monret = $row["monret"]; $ls_spgcta = trim($row["spg_cuenta"]); $ls_estcla = $row["estcla"]; $ld_monret = $row["monret"]; $ld_monobjret = $row["monobjret"]; $ls_codestpro = $row["codestpro1"] . $row["codestpro2"] . $row["codestpro3"] . $row["codestpro4"] . $row["codestpro5"]; $io_ds_cargos->insertRow("codcar", $ls_codcar); $io_ds_cargos->insertRow("spg_cuenta", $ls_spgcta); $io_ds_cargos->insertRow("estcla", $ls_estcla); $io_ds_cargos->insertRow("codestpro", $ls_codestpro); $io_ds_cargos->insertRow("monret", number_format($ld_monret, 2, ',', '.')); $io_ds_cargos->insertRow("monobjret", number_format($ld_monobjret, 2, ',', '.')); $ld_montotcre += $ld_monret; } $_SESSION["la_crenotas"] = $io_ds_cargos->data; } } unset($io_include, $io_conexion, $io_sql, $io_mensajes, $io_funciones, $io_ds_cargos); return $ld_montotcre; }
function uf_imprimirresultados($as_codper, $as_cedper, $as_nomper, $as_apeper, $ls_destino) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $msg = new class_mensajes(); require_once "../shared/class_folder/class_sql.php"; $io_sql = new class_sql($con); $ds = new class_datastore(); require_once "../shared/class_folder/class_funciones.php"; $fun = new class_funciones(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=60>Código</td>"; print "<td width=100>Cédula</td>"; print "<td width=440>Nombre y Apellido</td>"; print "</tr>"; $ls_sql = "SELECT codper,cedper,nomper,apeper" . " FROM sno_personal" . " WHERE codemp='" . $ls_codemp . "'" . " AND codper like '" . $as_codper . "'" . " AND cedper like '" . $as_cedper . "'" . " AND nomper like '" . $as_nomper . "'" . " AND apeper like '" . $as_apeper . "'" . " ORDER BY cedper "; $rs_per = $io_sql->select($ls_sql); $li_num = $io_sql->num_rows($rs_per); if ($li_num > 0) { while ($row = $io_sql->fetch_row($rs_per)) { print "<tr class=celdas-blancas>"; $ls_codper = $row["codper"]; $ls_cedper = $row["cedper"]; $ls_nomper = $row["nomper"]; $ls_apeper = $row["apeper"]; switch ($ls_destino) { case "": print "<td><a href=\"javascript: aceptar('{$ls_codper}','{$ls_cedper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "repasignadospri": print "<td><a href=\"javascript: ue_primariorep('{$ls_codper}','{$ls_cedper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "repasignadosuso": print "<td><a href=\"javascript: ue_usorep('{$ls_codper}','{$ls_cedper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "responsableactual": print "<td><a href=\"javascript: ue_responsableactual('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "responsablenuevo": print "<td><a href=\"javascript: ue_responsablenuevo('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "responsable": print "<td><a href=\"javascript: ue_responsable('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "receptor": print "<td><a href=\"javascript: ue_receptor('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "despachador": print "<td><a href=\"javascript: ue_despachador('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; case "beneficiariopres": print "<td><a href=\"javascript: ue_beneficiariopres('{$ls_codper}','{$ls_nomper}','{$ls_apeper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; break; } } } print "</table>"; }
if ($_SESSION["ls_gestor"] == "INFORMIX") { $ls_cadena = $ls_cadena . " like sigesp_plan_unico_re.sig_cuenta || '%' "; } if ($ls_codigo != "") { $ls_cadena = $ls_cadena . " AND codestpro1='" . $ls_codestpro1 . "' AND codestpro2='" . $ls_codestpro2 . "' AND codestpro3='" . $ls_codestpro3 . "' AND codestpro4='" . $ls_codestpro4 . "' AND codestpro5='" . $ls_codestpro5 . "' AND estcla='" . $ls_estcla . "') AND sig_cuenta like '" . $ls_codigo . "%' AND denominacion like '%" . $ls_nombre . "%'"; } else { $ls_cadena = $ls_cadena . " AND codestpro1='" . $ls_codestpro1 . "' AND codestpro2='" . $ls_codestpro2 . "' AND codestpro3='" . $ls_codestpro3 . "' AND codestpro4='" . $ls_codestpro4 . "' AND codestpro5='" . $ls_codestpro5 . "' AND estcla='" . $ls_estcla . "') AND sig_cuenta like '" . $ls_codigo_gasto . "%' AND denominacion like '%" . $ls_nombre . "%'"; } $ls_cadena = $ls_cadena . $ls_sql2 . " ORDER BY sc_cuenta ASC"; $rs_cta = $io_sql->select($ls_cadena); if ($rs_cta === false) { $io_msg->message($io_funcion->uf_convertirmsg($io_sql->message)); } else { $data = $rs_cta; $z = 0; $totrow = $io_sql->num_rows($rs_cta); if ($totrow == 0) { $io_msg->message("No existen cuentas asociadas"); } else { if ($totrow > 0) { while ($row = $io_sql->fetch_row($rs_cta)) { $z++; $cuenta = $row["sig_cuenta"]; $denominacion = $row["denominacion"]; $sc_cuenta = $row["sc_cuenta"]; $object[$z][1] = "<input name=chkcta" . $z . " type=checkbox id=chkcta" . $z . " value=1 class=sin-borde onClick=javascript:uf_selected('" . $z . "');>"; $object[$z][2] = "<input type=text name=txtcuenta" . $z . " value='" . $cuenta . "' id=txtcuenta" . $z . " class=sin-borde readonly style=text-align:center size=20 maxlength=20 ><input type=hidden name=txtcontable" . $z . " value='" . $sc_cuenta . "' id=txtcontable" . $z . " class=sin-borde readonly style=text-align:center size=20 maxlength=20 >"; $object[$z][3] = "<input type=text name=txtdencuenta" . $z . " value='" . $denominacion . "' id=txtdencuenta" . $z . " class=sin-borde readonly style=text-align:left size=150 maxlength=254>"; } } else { $object[1][1] = "<input name=chkcta1 type=checkbox id=chkcta1 value=1 onClick=javascript:uf_selected('" . $z . "');>";
$lb_valido=true; $ls_cod_report="0409"; // OAF Instr 4 $_SESSION["cod_report"]=$ls_cod_report; $ls_cod_report=$_SESSION["cod_report"]; $lb_valido=$iscg_procesos->uf_select_reporte($ls_codemp,$ai_cuantos,$ls_cod_report); if(($lb_valido)&&($ai_cuantos<=0)) { if ($ls_cod_report=="0409") { $lb_valido = $iscg_procesos->uf_cargar_origen_y_aplic_fondos_txt($ls_codemp); if($lb_valido) { $msg->message("Los datos fueron cargados"); $rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report ); $SQL->num_rows($rs_cta); ///$msg->message($SQL->num_rows($rs_cta)); $data=$SQL->obtener_datos($rs_cta); $ds_proaf->data=$data; $li_num=$ds_proaf->getRowCount("cod_report"); for($i=1;$i<=$li_num;$i++) { $ls_status=$data["status"][$i]; if($ls_status=="C") { ?> <tr class="celdas-azules"> <td ><a href="javascript: aceptar('<?php print $ds_proaf->getValue("asignado",$i);?>','<?php print $ds_proaf->getValue("sc_cuenta",$i);?>','<?php print $i?>','<?php print $li_num?>','<?php print $ls_status ?>');"><?php print $ds_proaf->getValue("sc_cuenta",$i);?></a></td> <?php } elseif($ls_status=="S")
<? print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Presupuestaria</td>"; print "<td>Denominación</td>"; print "<td>Contable</td>"; print "</tr>"; if($ls_operacion=="BUSCAR") { $ls_sql = " SELECT soc_gastos ". " FROM sigesp_empresa ". " WHERE codemp = '".$as_codemp."' "; $rs=$io_sql->select($ls_sql); $li_numrows=$io_sql->num_rows($rs); if ($li_numrows===false) { $lb_valido=false; $this->io_msg->message($this->io_funcion->uf_convertirmsg($this->io_sql->message)); } else { $ls_sql="SELECT DISTINCT trim(spg_cuenta) as spg_cuenta, denominacion,sc_cuenta,status". " FROM spg_cuentas". " WHERE codemp = '".$as_codemp."'". " AND spg_cuenta like '%".$ls_codigo."%'". " AND denominacion like '%".$ls_denominacion."%'". " AND sc_cuenta like '%".$ls_cuentaspg."%'"; while ($row=$io_sql->fetch_row($rs)) {