";
print "
";
print "| Código | ";
print "Denominación | ";
print "Tipo | ";
print "
";
if ($ls_operacion=="BUSCAR")
{
$ls_sql = "SELECT trim(spg_cuenta) as spg_cuenta,
max(denominacion) as denominacion,
max(status) as status,
max(estcla) as estcla
FROM spg_cuentas
WHERE codemp = '".$ls_codemp."'
AND spg_cuenta like '".$ls_codigo."'
AND denominacion like '".$ls_denominacion."'
GROUP BY spg_cuenta
ORDER BY spg_cuenta ASC";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$io_msg->message("Error en Select Cuentas Gasto !!!");
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while($row=$io_sql->fetch_row($rs_data))
{
$ls_spgcta = $row["spg_cuenta"];
$ls_dencta = $row["denominacion"];
$ls_estcta = $row["status"];
$ls_estcla = $row["estcla"];
if ($ls_estcla=='P')
{
if ($_SESSION["la_empresa"]["estmodest"]=='2')
{
$ls_denestcla=$_SESSION["la_empresa"]["denestpro1"];
}
else
{
$ls_denestcla='Proyecto';
}
}
elseif($ls_estcla=='A')
{
$ls_denestcla='Acción';
}
if ($ls_estcta=="S")
{
print "
";
print "| $ls_spgcta | ";
}
else
{
print "
";
print "| ".$ls_spgcta." | ";
}
print "".$ls_dencta." | ";
print "".$ls_denestcla." | ";
print "
";
}
$io_sql->free_result($rs_data);
}
else
{
$io_msg->message("No se han creado Cuentas de gasto para la programática seleccionada !!!");
}
}
}
print "";
?>