";
echo "
";
echo "| ".$la_empresa["nomestpro1"]." | ";
echo "".$la_empresa["nomestpro2"]." | ";
echo "".$la_empresa["nomestpro3"]." | ";
if ($li_estmodest==2)
{
echo "".$la_empresa["nomestpro4"]." | ";
echo "".$la_empresa["nomestpro5"]." | ";
}
echo "Tipo | ";
echo "
";
if ($ls_operacion=="BUSCAR")
{
if (!empty($ls_codunieje))
{
$ls_codunieje = str_pad($ls_codunieje,10,0,0);
}
if (strtoupper($ls_gestor) == "MYSQLT")
{
$ls_sql_seguridad = " WHERE CONCAT('".$la_empresa["codemp"]."','SPG','".$_SESSION["la_logusr"]."',presup.codestpro1,presup.codestpro2,presup.codestpro3,presup.codestpro4,presup.codestpro5,presup.estcla) IN (SELECT CONCAT(codemp,codsis,codusu,codintper)
FROM sss_permisos_internos WHERE codusu = '".$_SESSION["la_logusr"]."' AND codsis = 'SPG' AND enabled=1)";
}
else
{
$ls_sql_seguridad = " WHERE '".$la_empresa["codemp"]."'||'SPG'||'".$_SESSION["la_logusr"]."'||presup.codestpro1||presup.codestpro2||presup.codestpro3||presup.codestpro4||presup.codestpro5||presup.estcla IN (SELECT codemp||codsis||codusu||codintper
FROM sss_permisos_internos WHERE codusu = '".$_SESSION["la_logusr"]."' AND codsis = 'SPG' AND enabled=1)";
}
$ls_sql="
SELECT * FROM(
SELECT spg_unidadadministrativa.coduniadm,spg_unidadadministrativa.denuniadm,spg_dt_unidadadministrativa.codestpro1,
spg_dt_unidadadministrativa.codestpro2,spg_dt_unidadadministrativa.codestpro3,spg_ep1.denestpro1,
spg_ep2.denestpro2,spg_ep3.denestpro3,spg_ep4.denestpro4,spg_ep5.denestpro5,spg_dt_unidadadministrativa.codestpro4,
spg_dt_unidadadministrativa.codestpro5,spg_dt_unidadadministrativa.estcla
FROM spg_unidadadministrativa, spg_dt_unidadadministrativa, spg_ep1, spg_ep2, spg_ep3, spg_ep4, spg_ep5
WHERE spg_unidadadministrativa.codemp='".$la_empresa["codemp"]."'
AND spg_unidadadministrativa.coduniadm='".$ls_codunieje."'
AND spg_dt_unidadadministrativa.central='0'
AND spg_dt_unidadadministrativa.codestpro1 like '%".$ls_codestpro1."%'".
"AND spg_unidadadministrativa.codemp=spg_dt_unidadadministrativa.codemp
AND spg_unidadadministrativa.coduniadm=spg_dt_unidadadministrativa.coduniadm
AND spg_dt_unidadadministrativa.codemp=spg_ep1.codemp
AND spg_dt_unidadadministrativa.estcla=spg_ep1.estcla
AND spg_dt_unidadadministrativa.codestpro1=spg_ep1.codestpro1
AND spg_dt_unidadadministrativa.codemp=spg_ep2.codemp
AND spg_dt_unidadadministrativa.estcla=spg_ep2.estcla
AND spg_dt_unidadadministrativa.codestpro1=spg_ep2.codestpro1
AND spg_dt_unidadadministrativa.codestpro2=spg_ep2.codestpro2
AND spg_dt_unidadadministrativa.codemp=spg_ep3.codemp
AND spg_dt_unidadadministrativa.estcla=spg_ep3.estcla
AND spg_dt_unidadadministrativa.codestpro1=spg_ep3.codestpro1
AND spg_dt_unidadadministrativa.codestpro2=spg_ep3.codestpro2
AND spg_dt_unidadadministrativa.codestpro3=spg_ep3.codestpro3
AND spg_dt_unidadadministrativa.codemp=spg_ep4.codemp
AND spg_dt_unidadadministrativa.estcla=spg_ep4.estcla
AND spg_dt_unidadadministrativa.codestpro1=spg_ep4.codestpro1
AND spg_dt_unidadadministrativa.codestpro2=spg_ep4.codestpro2
AND spg_dt_unidadadministrativa.codestpro3=spg_ep4.codestpro3
AND spg_dt_unidadadministrativa.codestpro4=spg_ep4.codestpro4
AND spg_dt_unidadadministrativa.codemp=spg_ep5.codemp
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
ORDER BY $ls_campoorden $ls_orden
) AS presup ".$ls_sql_seguridad."
";
//echo $ls_sql;
//exit();
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$io_msg->message(" ERROR-> ".$io_sql->message);
//$io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!");
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while ($row=$io_sql->fetch_row($rs_data))
{
echo "
";
$ls_codunieje = $row["coduniadm"];
$ls_denunieje = $row["denuniadm"];
$ls_codestpro1 = $row["codestpro1"];
$ls_codestpro2 = $row["codestpro2"];
$ls_codestpro3 = $row["codestpro3"];
$ls_codestpro4 = $row["codestpro4"];
$ls_codestpro5 = $row["codestpro5"];
$ls_denestpro1 = $row["denestpro1"];
$ls_denestpro2 = $row["denestpro2"];
$ls_denestpro3 = $row["denestpro3"];
$ls_denestpro4 = $row["denestpro4"];
$ls_denestpro5 = $row["denestpro5"];
$ls_estcla = $row["estcla"];
if ($ls_estcla=='P')
{
$ls_denestcla='Proyecto';
}
elseif($ls_estcla=='A')
{
$ls_denestcla='Acción';
}
if ($li_estmodest==2)
{
$ls_denestcla = $_SESSION["la_empresa"]["nomestpro1"];
}
echo "| ".trim(substr($ls_codestpro1,-$li_loncodestpro1))." | ";
echo "".trim(substr($ls_codestpro2,-$li_loncodestpro2))." | ";
echo "".trim(substr($ls_codestpro3,-$li_loncodestpro3))." | ";
if ($li_estmodest==2)
{
echo "".trim(substr($ls_codestpro4,-$li_loncodestpro4))." | ";
echo "".trim(substr($ls_codestpro5,-$li_loncodestpro5))." | ";
}
echo "".$ls_denestcla." | ";
echo "
";
}
}
else
{
$io_msg->message("No se han definido registros !!!");
}
}
}
echo "";
?>