";
print "| Código | ";
print "Denominación | ";
print "Emite Req. | ";
print "".$la_empresa["nomestpro1"]." | ";
print "".$la_empresa["nomestpro2"]." | ";
print "".$la_empresa["nomestpro3"]." | ";
if ($la_empresa["estmodest"]==2)
{
print "".$la_empresa["nomestpro4"]." | ";
print "".$la_empresa["nomestpro5"]." | ";
}
print "
";
if ($ls_operacion=="BUSCAR")
{
$ls_sqlaux = "";
if ($ls_estuac!='C')
{
$ls_sqlaux = " AND spg_unidadadministrativa.coduniadmsig='".$ls_coduniadm."' AND spg_unidadadministrativa.coduniadm like '%".$ls_codunieje."%'";
if (!empty($ls_codestpro1))
{
$ls_codestpro1 = str_pad($ls_codestpro1,25,0,0);
$ls_sqlaux = $ls_sqlaux." AND spg_dt_unidadadministrativa.codestpro1='".$ls_codestpro1."'";
}
if (!empty($ls_codestpro2))
{
$ls_codestpro2 = str_pad($ls_codestpro2,25,0,0);
$ls_sqlaux = $ls_sqlaux." AND spg_dt_unidadadministrativa.codestpro2='".$ls_codestpro2."'";
}
if (!empty($ls_codestpro3))
{
$ls_codestpro3 = str_pad($ls_codestpro3,25,0,0);
$ls_sqlaux = $ls_sqlaux." AND spg_dt_unidadadministrativa.codestpro3='".$ls_codestpro3."'";
}
if (!empty($ls_codestpro4))
{
$ls_codestpro4 = str_pad($ls_codestpro4,25,0,0);
$ls_sqlaux = $ls_sqlaux." AND spg_dt_unidadadministrativa.codestpro4='".$ls_codestpro4."'";
}
if (!empty($ls_codestpro5))
{
$ls_codestpro5 = str_pad($ls_codestpro5,25,0,0);
$ls_sqlaux = $ls_sqlaux." AND spg_dt_unidadadministrativa.codestpro5='".$ls_codestpro5."'";
}
}
$ls_sql = "SELECT spg_unidadadministrativa.coduniadm,
spg_unidadadministrativa.denuniadm,
spg_unidadadministrativa.estemireq,
spg_dt_unidadadministrativa.codestpro1,
spg_dt_unidadadministrativa.codestpro2,
spg_dt_unidadadministrativa.codestpro3,
spg_dt_unidadadministrativa.codestpro4,
spg_dt_unidadadministrativa.codestpro5,
spg_dt_unidadadministrativa.estcla,
spg_ep1.denestpro1,
spg_ep2.denestpro2,
spg_ep3.denestpro3,
spg_ep4.denestpro4,
spg_ep5.denestpro5,
spg_unidadadministrativa.coduniadmsig
FROM spg_unidadadministrativa, spg_dt_unidadadministrativa, spg_ep1, spg_ep2, spg_ep3, spg_ep4, spg_ep5
WHERE spg_unidadadministrativa.codemp='".$ls_codemp."'
AND spg_unidadadministrativa.denuniadm like '%".$ls_denunieje."%' $ls_sqlaux
AND spg_ep1.codestpro1<>'-------------------------'
AND spg_unidadadministrativa.codemp=spg_dt_unidadadministrativa.codemp
AND spg_unidadadministrativa.coduniadm=spg_dt_unidadadministrativa.coduniadm
AND spg_ep2.codemp=spg_ep1.codemp
AND spg_ep2.codestpro1=spg_ep1.codestpro1
AND spg_ep2.estcla=spg_ep1.estcla
AND spg_ep3.codemp=spg_ep2.codemp
AND spg_ep3.codestpro1=spg_ep2.codestpro1
AND spg_ep3.codestpro2=spg_ep2.codestpro2
AND spg_ep3.estcla=spg_ep2.estcla
AND spg_ep4.codemp=spg_ep3.codemp
AND spg_ep4.codestpro1=spg_ep3.codestpro1
AND spg_ep4.codestpro2=spg_ep3.codestpro2
AND spg_ep4.codestpro3=spg_ep3.codestpro3
AND spg_ep4.estcla=spg_ep3.estcla
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
AND spg_ep5.estcla=spg_ep4.estcla
AND spg_dt_unidadadministrativa.codemp=spg_ep1.codemp
AND spg_dt_unidadadministrativa.codestpro1=spg_ep1.codestpro1
AND spg_dt_unidadadministrativa.estcla=spg_ep1.estcla
AND spg_dt_unidadadministrativa.codemp=spg_ep2.codemp
AND spg_dt_unidadadministrativa.codestpro2=spg_ep2.codestpro2
AND spg_dt_unidadadministrativa.codestpro1=spg_ep2.codestpro1
AND spg_dt_unidadadministrativa.estcla=spg_ep2.estcla
AND spg_dt_unidadadministrativa.codemp=spg_ep3.codemp
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.estcla=spg_ep3.estcla
AND spg_dt_unidadadministrativa.codemp=spg_ep4.codemp
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.estcla=spg_ep4.estcla
AND spg_dt_unidadadministrativa.codemp=spg_ep5.codemp
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
AND spg_dt_unidadadministrativa.estcla=spg_ep5.estcla
ORDER BY spg_dt_unidadadministrativa.codestpro1,spg_dt_unidadadministrativa.codestpro2,
spg_dt_unidadadministrativa.codestpro3,spg_dt_unidadadministrativa.codestpro4,
spg_dt_unidadadministrativa.codestpro5,spg_dt_unidadadministrativa.estcla ASC";//print $ls_sql;
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$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 "