function uf_chequear_cancelado($as_numsol)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_chequear_cancelado
// Access: private
// Arguments:
// Description: Función que verifica si una solicitud esta cancelada.
// Creado Por: Ing. Nelson Barraez
// Fecha Creación: 28/08/2007 Fecha Última Modificación :
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_funciones_sob;
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();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$lb_pagado=false;
$ls_sql="SELECT * ".
" FROM scb_prog_pago ".
" WHERE codemp = '".$ls_codemp."' ".
" AND numsol = '".$as_numsol."' ";
$rs_data=$io_sql->select($ls_sql);
if($rs_data===false)
{
$io_mensajes->uf_mensajes_ajax("Error al cargar Proveedores","ERROR->".$io_funciones->uf_convertirmsg($io_sql->message),false,"");
}
else
{
if($row=$io_sql->fetch_row($rs_data))
{
$ls_status=$row["estmov"];
if($ls_status=='N'||$ls_status=='C')
{
$lb_pagado=true;
}
}
}
return $lb_pagado;
}
function uf_print_procede()
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_procede
// Access: private
// Arguments:
// Description: Función que obtiene e imprime los resultados de la busqueda de Procedes
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 13/08/2007 Fecha Última Modificación :
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
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();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$ls_orden=$_POST['orden'];
$ls_campoorden=$_POST['campoorden'];
$ls_tipo=$_POST['tipo'];
$ls_sql="SELECT procede, desproc ".
" FROM sigesp_procedencias ".
" ORDER BY ".$ls_campoorden." ".$ls_orden."";
$rs_data=$io_sql->select($ls_sql);
if($rs_data===false)
{
$io_mensajes->uf_mensajes_ajax("Error al cargar Procedencias","ERROR->".$io_funciones->uf_convertirmsg($io_sql->message),false,"");
}
else
{
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Comprobante' align='center' onClick=ue_orden('procede')>Procedencia</td>";
print "<td width=400 style='cursor:pointer' title='Ordenar por Descripción' align='left' onClick=ue_orden('desproc')>Descripción</td>";
print "</tr>";
$li_i=0;
while($row=$io_sql->fetch_row($rs_data))
{
$li_i++;
$ls_procede=$row["procede"];
$ls_desproc=$row["desproc"];
switch ($ls_tipo)
{
case "REPDES":
print "<tr class=celdas-blancas>";
print "<td align='center'><a href=\"javascript: ue_aceptarrepdes('$ls_procede');\">".$ls_procede."</a></td>";
print "<td align='left'>".$ls_desproc."</td>";
print "</tr>";
break;
case "REPHAS":
print "<tr class=celdas-blancas>";
print "<td align='center'><a href=\"javascript: ue_aceptarrephas('$ls_procede');\">".$ls_procede."</a></td>";
print "<td align='left'>".$ls_desproc."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
print "</table>";
}
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}// end function uf_print_procede
function uf_print_estructuras()
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_estructuras
// Access: private
// Arguments:
// Description: Función que obtiene e imprime los resultados de la busqueda de la estructura presupuestaria 5
// Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang
// Fecha Creación: 07/04/2007 Fecha Última Modificación :
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_funciones_apr;
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();
$ls_codemp = $_SESSION["la_empresa"]["codemp"];
$ls_criterio = "";
$ls_tipo = $_POST['tipo'];
$ls_orden = $_POST['orden'];
$ls_campoorden = $_POST['campoorden'];
$io_funciones_apr->uf_loadmodalidad(&$li_len1, &$li_len2, &$li_len3, &$li_len4, &$li_len5, &$ls_titulo);
$ls_sql = "SELECT spg_ep5.codestpro1, spg_ep5.codestpro2, spg_ep5.codestpro3, spg_ep5.codestpro4, spg_ep5.codestpro5, " . "\t\tspg_ep1.denestpro1, spg_ep2.denestpro2, spg_ep3.denestpro3, spg_ep4.denestpro4, spg_ep5.denestpro5 " . " FROM spg_ep1, spg_ep2, spg_ep3, spg_ep4, spg_ep5 " . " WHERE spg_ep5.codemp='" . $ls_codemp . "' " . " AND spg_ep5.codemp = spg_ep1.codemp " . " AND spg_ep5.codestpro1 = spg_ep1.codestpro1 " . " AND spg_ep5.codemp = spg_ep2.codemp " . " AND spg_ep5.codestpro1 = spg_ep2.codestpro1 " . " AND spg_ep5.codestpro2 = spg_ep2.codestpro2 " . " AND spg_ep5.codemp = spg_ep3.codemp " . " AND spg_ep5.codestpro1 = spg_ep3.codestpro1 " . " AND spg_ep5.codestpro2 = spg_ep3.codestpro2 " . " AND spg_ep5.codestpro3 = spg_ep3.codestpro3 " . " AND spg_ep5.codemp = spg_ep4.codemp " . " AND spg_ep5.codestpro1 = spg_ep4.codestpro1 " . " AND spg_ep5.codestpro2 = spg_ep4.codestpro2 " . " AND spg_ep5.codestpro3 = spg_ep4.codestpro3 " . " AND spg_ep5.codestpro4 = spg_ep4.codestpro4 " . " ORDER BY " . $ls_campoorden . " " . $ls_orden . "";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Error al cargar Estructura ", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message), false, "");
} else {
print "<table width=580 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
$ls_modalidad = $_SESSION["la_empresa"]["estmodest"];
switch ($ls_modalidad) {
case "1":
// Modalidad por Proyecto
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 1' align='center' onClick=ue_orden('spg_ep5.codestpro1')>" . utf8_encode("Estructura Nivel 1") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 2' align='center' onClick=ue_orden('spg_ep5.codestpro2')>" . utf8_encode("Estructura Nivel 2") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 3' align='center' onClick=ue_orden('spg_ep5.codestpro3')>" . utf8_encode("Estructura Nivel 3") . " </td>";
break;
case "2":
// Modalidad por Programa
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 1' align='center' onClick=ue_orden('spg_ep5.codestpro1')>" . utf8_encode("Estructura Nivel 1") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 2' align='center' onClick=ue_orden('spg_ep5.codestpro2')>" . utf8_encode("Estructura Nivel 2") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 3' align='center' onClick=ue_orden('spg_ep5.codestpro3')>" . utf8_encode("Estructura Nivel 3") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 4' align='center' onClick=ue_orden('spg_ep5.codestpro4')>" . utf8_encode("Estructura Nivel 4") . " </td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Estructura 5' align='center' onClick=ue_orden('spg_ep5.codestpro5')>" . utf8_encode("Estructura Nivel 5") . " </td>";
break;
}
print "</tr>";
while ($row = $io_sql->fetch_row($rs_data)) {
$ls_codestpro1 = substr($row["codestpro1"], strlen($row["codestpro1"]) - $li_len1, $li_len1);
$ls_codestpro2 = substr($row["codestpro2"], strlen($row["codestpro2"]) - $li_len2, $li_len2);
$ls_codestpro3 = substr($row["codestpro3"], strlen($row["codestpro3"]) - $li_len3, $li_len3);
$ls_codestpro4 = substr($row["codestpro4"], strlen($row["codestpro4"]) - $li_len4, $li_len4);
$ls_codestpro5 = substr($row["codestpro5"], strlen($row["codestpro5"]) - $li_len5, $li_len5);
$ls_denestpro1 = rtrim(utf8_encode($row["denestpro1"]));
$ls_denestpro2 = rtrim(utf8_encode($row["denestpro2"]));
$ls_denestpro3 = rtrim(utf8_encode($row["denestpro3"]));
$ls_denestpro4 = rtrim(utf8_encode($row["denestpro4"]));
$ls_denestpro5 = rtrim(utf8_encode($row["denestpro5"]));
$io_funciones_apr->uf_formatoprogramatica($ls_codestpro1 . $ls_codestpro2 . $ls_codestpro3 . $ls_codestpro4 . $ls_codestpro5, &$ls_programatica);
switch ($ls_tipo) {
case "":
print "<tr class=celdas-blancas>";
print "<td width=150 align=\"center\"><a href=\"javascript: aceptar('{$ls_codestpro1}','{$ls_codestpro2}',";
print "'{$ls_codestpro3}','{$ls_codestpro4}','{$ls_codestpro5}','{$ls_programatica}');\">" . trim($ls_codestpro1) . "</td>";
switch ($ls_modalidad) {
case "1":
// Modalidad por Proyecto
print "<td width=150 align=\"center\">" . trim($ls_codestpro2) . "</td>";
print "<td width=150 align=\"center\">" . trim($ls_codestpro3) . "</a></td>";
break;
case "2":
// Modalidad por Programa
print "<td width=150 align=\"center\">" . trim($ls_codestpro2) . "</td>";
print "<td width=150 align=\"center\">" . trim($ls_codestpro3) . "</a></td>";
print "<td width=150 align=\"center\">" . trim($ls_codestpro4) . "</a></td>";
print "<td width=150 align=\"center\">" . trim($ls_codestpro5) . "</a></td>";
print "</tr>";
break;
}
break;
}
}
$io_sql->free_result($rs_data);
print "</table>";
}
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}
function uf_cargar_dt_recepcion()
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_cargar_dt_recepcion
// Access: public
// Description: Funcion para pintar los detalles presupuestarios y contables de la recepcion de documento
// Creado Por: Ing. Nelson Barraez
// Fecha Creacin: 27/05/2007 Fecha ltima Modificacin : 03/06/2007
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
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/grid_param.php";
$io_grid = new grid_param();
global $io_funciones_cxp;
$li = 0;
$ls_aux = "";
$ls_modalidad = $_SESSION['la_empresa']['estmodest'];
$ls_codemp = $io_funciones_cxp->uf_obtenervalor("codemp", "");
$ls_numrecdoc = trim($io_funciones_cxp->uf_obtenervalor("numrecdoc", ""));
$ls_codtipdoc = $io_funciones_cxp->uf_obtenervalor("codtipdoc", "");
$ls_tipproben = $io_funciones_cxp->uf_obtenervalor("tipproben", "");
$ls_codproben = trim($io_funciones_cxp->uf_obtenervalor("codproben", ""));
if ($ls_tipproben == 'P') {
$ls_aux = " AND rd.cod_pro='" . $ls_codproben . "' ";
} elseif ($ls_tipproben == 'B') {
$ls_aux = " AND rd.ced_bene='" . $ls_codproben . "' ";
}
if ($_SESSION["ls_gestor"] == "MYSQLT") {
$ls_aux_estpro = " AND rd.codestpro=CONCAT(spg.codestpro1,spg.codestpro2,spg.codestpro3,spg.codestpro4,spg.codestpro5) ";
} else {
$ls_aux_estpro = " AND rd.codestpro=spg.codestpro1||spg.codestpro2||spg.codestpro3||spg.codestpro4||spg.codestpro5 ";
}
$ls_sql = " SELECT rd.codemp, trim(rd.numrecdoc) as numrecdoc, rd.codtipdoc, trim(rd.ced_bene) as ced_bene, rd.cod_pro,\n\t\t rd.procede_doc, trim(rd.numdoccom) as numdoccom, rd.codestpro,trim(rd.spg_cuenta) as spg_cuenta, rd.monto,rd.estcla,spg.denominacion\n\t\t\t\t FROM cxp_rd_spg rd,spg_cuentas spg\n\t\t\t\t WHERE rd.codemp='" . $ls_codemp . "'\n\t\t\t\t AND trim(rd.numrecdoc) = '" . trim($ls_numrecdoc) . "'\n\t\t\t\t\t AND rd.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux}\n\t\t\t\t AND rd.codemp=spg.codemp \n\t\t\t\t\t AND rd.spg_cuenta=spg.spg_cuenta {$ls_aux_estpro}";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Error al cargar detalle presupuestario", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message), false, "");
} else {
while ($row = $io_sql->fetch_row($rs_data)) {
$li++;
$ls_numcomp = $row["numdoccom"];
$ls_codestpro = $row["codestpro"];
$io_funciones_cxp->uf_formatoprogramatica($ls_codestpro, &$ls_programatica);
$ls_estcla = $row["estcla"];
$ls_spgcuenta = $row["spg_cuenta"];
$ldec_monto = $row["monto"];
$ls_dencuenta = utf8_encode($row["denominacion"]);
$ls_estatus = "";
switch ($ls_estcla) {
case "A":
$ls_estatus = utf8_encode("Acción");
break;
case "P":
$ls_estatus = utf8_encode("Proyecto");
break;
}
$lo_object[$li][1] = "<input type=text name=txtnumcomp" . $li . " id=txtnumcomp" . $li . " class=sin-borde style=text-align:center size=18 value='" . $ls_numcomp . "' readonly>";
$lo_object[$li][2] = "<input type=text name=txtcodestpro" . $li . " class=sin-borde style=text-align:center size=40 value='" . $ls_programatica . "' readonly>";
$lo_object[$li][3] = "<input type=text name=txtestclaaux" . $li . " class=sin-borde style=text-align:center size=20 value='" . $ls_estatus . "' readonly><input name=txtestcla" . $li . " type=hidden id=txtestcla" . $li . " value='" . $ls_estcla . "'>";
$lo_object[$li][4] = "<input type=text name=txtspgcuenta" . $li . " class=sin-borde style=text-align:center size=18 value='" . $ls_spgcuenta . "' readonly>";
$lo_object[$li][5] = "<input type=text name=txtmonto" . $li . " class=sin-borde style=text-align:right size=20 value='" . number_format($ldec_monto, 2, ",", ".") . "' readonly>";
$lo_object[$li][6] = "<input type=text name=txtdencuenta" . $li . " class=sin-borde style=text-align:left size=50 value='" . $ls_dencuenta . "' readonly>";
}
if ($li == 0) {
for ($li = 1; $li <= 4; $li++) {
$lo_object[$li][1] = "<input type=text name=txtnumcomp" . $li . " id=txtnumcomp" . $li . " class=sin-borde style=text-align:center size=18 value='' readonly>";
$lo_object[$li][2] = "<input type=text name=txtcodestpro" . $li . " class=sin-borde style=text-align:center size=40 value='' readonly>";
$lo_object[$li][3] = "<input type=text name=txtestclaaux" . $li . " class=sin-borde style=text-align:center size=20 value='' readonly><input name=txtestcla" . $li . " type=hidden id=txtestcla" . $li . " value=''>";
$lo_object[$li][4] = "<input type=text name=txtspgcuenta" . $li . " class=sin-borde style=text-align:center size=18 value='' readonly>";
$lo_object[$li][5] = "<input type=text name=txtmonto" . $li . " class=sin-borde style=text-align:right size=20 value='' readonly>";
$lo_object[$li][6] = "<input type=text name=txtdencuenta" . $li . " class=sin-borde style=text-align:left size=50 value='' readonly>";
}
$li = 4;
}
// Titulos del Grid de Bienes
$lo_title[1] = "Compromiso";
$lo_title[2] = "Codigo Programatico";
$lo_title[3] = "Estatus";
$lo_title[4] = "Codigo Estadistico";
$lo_title[5] = "Monto";
$lo_title[6] = "Denominación";
$io_grid->make_gridScroll($li, $lo_title, $lo_object, 758, "Detalle Presupuestario", "grid", 120);
$io_sql->free_result($rs_data);
}
print "<input type=hidden name=rowsprerecepcion id=rowsprerecepcion value=" . $li . ">";
$li = 0;
$ls_sql = "SELECT rd.codemp, trim(rd.numrecdoc) as numrecdoc, rd.codtipdoc, trim(rd.ced_bene) as ced_bene, rd.cod_pro, \n\t\t rd.procede_doc, trim(rd.numdoccom) as numdoccom, rd.debhab, trim(rd.sc_cuenta) as sc_cuenta, rd.monto, rd.estgenasi , \n\t\t\t\t\t\tscg.denominacion\n\t\t\t\t FROM\tcxp_rd_scg rd,scg_cuentas scg\n\t\t\t\t WHERE rd.codemp='" . $ls_codemp . "'\n\t\t\t\t AND trim(rd.numrecdoc) = '" . trim($ls_numrecdoc) . "' \n\t\t\t\t AND rd.codtipdoc='" . $ls_codtipdoc . "' {$ls_aux} \n\t\t\t\t\tAND rd.codemp=scg.codemp \n\t\t\t\t\tAND rd.sc_cuenta=scg.sc_cuenta";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Error al cargar detalle contable", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message), false, "");
} else {
while ($row = $io_sql->fetch_row($rs_data)) {
$li++;
$ls_numcomp = $row["numdoccom"];
$ls_scgcuenta = $row["sc_cuenta"];
$ls_debhab = $row["debhab"];
$ldec_monto = $row["monto"];
$ls_dencuentascg = utf8_encode($row["denominacion"]);
if ($ls_debhab == 'D') {
$ldec_mondeb = $ldec_monto;
$ldec_monhab = 0;
} else {
$ldec_mondeb = 0;
$ldec_monhab = $ldec_monto;
}
$lo_objectscg[$li][1] = "<input type=text name=txtnumcomp" . $li . " id=txtnumcomp" . $li . " class=sin-borde style=text-align:center size=18 value='" . $ls_numcomp . "' readonly>";
$lo_objectscg[$li][2] = "<input type=text name=txtscgcuenta" . $li . " class=sin-borde style=text-align:center size=40 value='" . $ls_scgcuenta . "' readonly>";
$lo_objectscg[$li][3] = "<input type=text name=txtdebe" . $li . " class=sin-borde style=text-align:right size=20 value='" . number_format($ldec_mondeb, 2, ",", ".") . "' readonly>";
$lo_objectscg[$li][4] = "<input type=text name=txthaber" . $li . " class=sin-borde style=text-align:right size=20 value='" . number_format($ldec_monhab, 2, ",", ".") . "' readonly>";
$lo_objectscg[$li][5] = "<input type=text name=txtdencuentascg" . $li . " class=sin-borde style=text-align:left size=50 value='" . $ls_dencuentascg . "' readonly>";
}
if ($li == 0) {
for ($li = 1; $li <= 4; $li++) {
$lo_objectscg[$li][1] = "<input type=text name=txtnumcomp" . $li . " id=txtnumcomp" . $li . " class=sin-borde style=text-align:center size=18 value='' readonly>";
$lo_objectscg[$li][2] = "<input type=text name=txtscgcuenta" . $li . " class=sin-borde style=text-align:center size=40 value='' readonly>";
$lo_objectscg[$li][3] = "<input type=text name=txtdebe" . $li . " class=sin-borde style=text-align:right size=20 value='' readonly>";
$lo_objectscg[$li][4] = "<input type=text name=txthaber" . $li . " class=sin-borde style=text-align:right size=20 value='' readonly>";
$lo_objectscg[$li][5] = "<input type=text name=txtdencuentascg" . $li . " class=sin-borde style=text-align:left size=50 value='' readonly>";
}
$li = 4;
}
// Titulos del Grid de Bienes
$lo_titlescg[1] = "Compromiso";
$lo_titlescg[2] = "Cuenta Contable";
$lo_titlescg[3] = "Monto Debe";
$lo_titlescg[4] = "Monto Haber";
$lo_titlescg[5] = "Denominación";
$io_grid->make_gridScroll($li, $lo_titlescg, $lo_objectscg, 758, "Detalle Contable", "gridcon", 120);
print "<input type=hidden name=rowsconrecepcion id=rowsconrecepcion value=" . $li . ">";
$io_sql->free_result($rs_data);
}
unset($io_include, $io_conexion, $io_sql);
unset($io_mensajes, $io_funciones, $ls_codemp);
}
function uf_select_numero_orden_pago($as_numordpagmin, $as_codtipfon)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_select_numero_orden_pago
// Access: private
// Arguments:
// Description: Método que imprime el resultado de la busqueda de las Ordenes de Pago Ministerio.
// Creado Por: Ing. Néstor Falcón
// Fecha Creación: 11/02/2009. Fecha Última Modificación : 11/02/2009.
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
require_once "../../shared/class_folder/class_sql.php";
require_once "../../shared/class_folder/sigesp_include.php";
require_once "../../shared/class_folder/class_mensajes.php";
require_once "../../shared/class_folder/class_funciones.php";
$io_include = new sigesp_include();
$io_mensajes = new class_mensajes();
$io_funciones = new class_funciones();
$io_conexion = $io_include->uf_conectar();
$io_sql = new class_sql($io_conexion);
$lb_valido = true;
$ls_sql = "SELECT codemp\n\t\t FROM scb_movbco\n\t\t\t\t\tWHERE codemp = '" . $_SESSION["la_empresa"]["codemp"] . "'\n\t\t\t\t\t AND numordpagmin = '" . $as_numordpagmin . "'\n\t\t\t\t\t AND codtipfon = '" . $as_codtipfon . "'";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Class->sigesp_scb_c_catalogo_ajax.php;Metodo->uf_load_monto_consumido", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message), false, "");
print $io_sql->message;
} else {
if ($row = $io_sql->fetch_row($rs_data)) {
$lb_valido = false;
}
}
unset($io_include, $io_conexion, $io_sql, $io_mensajes, $io_funciones);
return $lb_valido;
}
function uf_print_cuentasspgdestino()
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_cuentasspgdestino
// Access: private
// Arguments:
// Description: Método que inprime el resultado de la busqueda de las cuentas presupuestarias
// Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang
// Fecha Creación: 07/04/2007 Fecha Última Modificación :
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_funciones_apr;
$ls_database_target = $_SESSION["ls_data_des"];
require_once "../../shared/class_folder/sigesp_include.php";
$io_include = new sigesp_include();
$io_conexion = $io_include->uf_conectar($ls_database_target);
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();
$ls_spgcuenta = "%" . $_POST['spgcuenta'] . "%";
$ls_dencue = "%" . $_POST['dencue'] . "%";
$ls_codemp = $_SESSION['la_empresa']['codemp'];
$ls_orden = $_POST['orden'];
$ls_campoorden = $_POST['campoorden'];
if ($ls_campoorden == "codpro") {
$ls_campoorden = "codestpro1,codestpro2,codestpro3,codestpro4,codestpro5";
}
$ls_cuentas = "";
$ls_tipocuenta = "";
$ls_sql = "SELECT TRIM(spg_cuenta) AS spg_cuenta , denominacion, status, sc_cuenta " . " FROM spg_cuentas " . " WHERE codemp = '" . $ls_codemp . "' " . "\tAND spg_cuenta like '" . $ls_spgcuenta . "' " . " AND denominacion like '" . $ls_dencue . "' " . " ORDER BY " . $ls_campoorden . " " . $ls_orden . " ";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_mensajes->uf_mensajes_ajax("Error al cargar Cuentas Presupuestarias ", "ERROR->" . $io_funciones->uf_convertirmsg($io_sql->message), false, "");
} else {
print "<table width=580 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Cuenta Presupuestaria' align='center' onClick=ue_orden('spg_cuenta')>Presupuestaria</td>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Cuenta Contable' align='center' onClick=ue_orden('sc_cuenta')>Contable</td>";
print "<td width=180 style='cursor:pointer' title='Ordenar por Denominacion' align='center' onClick=ue_orden('denominacion')>Denominacion</td>";
print "</tr>";
while ($row = $io_sql->fetch_row($rs_data)) {
$ls_spg_cuenta = trim($row["spg_cuenta"]);
$ls_sccuenta = trim($row["sc_cuenta"]);
$ls_status = trim($row["status"]);
$ls_denominacion = utf8_encode(rtrim($row["denominacion"]));
if ($ls_status == "C") {
print "<tr class=celdas-azules>";
print "<td align='center'><a href=\"javascript: ue_aceptar('" . $ls_spg_cuenta . "');\">" . $ls_spg_cuenta . "</a></td>";
print "<td align='center'>" . $ls_sccuenta . "</td>";
print "<td align='left'>" . $ls_denominacion . "</td>";
print "</tr>";
} else {
print "<tr class=celdas-blancas>";
print "<td align='center'>" . $ls_spg_cuenta . "</td>";
print "<td align='center'>" . $ls_sccuenta . "</td>";
print "<td align='left'>" . $ls_denominacion . "</td>";
print "</tr>";
}
}
$io_sql->free_result($rs_data);
print "</table>";
}
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}