";
print "
";
print "| Comprobante | ";
print "Descripcion Comprobante | ";
print "Procede | ";
print "Fecha | ";
print "
";
}
if($ls_operacion=="BUSCAR")
{
$ls_fecdesde=$io_funciones->uf_convertirdatetobd($ls_fecdesde);
$ls_fechasta=$io_funciones->uf_convertirdatetobd($ls_fechasta);
$ls_logusr = $_SESSION["la_logusr"];
$ls_gestor = $_SESSION["ls_gestor"];
$ls_sql_seguridad = "";
if (strtoupper($ls_gestor) == "MYSQLT")
{
$ls_sql_seguridad = " AND CONCAT('".$ls_codemp."','SPG','".$ls_logusr."',b.codestpro1,b.codestpro2,b.codestpro3,b.codestpro4,b.codestpro5,b.estcla) IN (SELECT CONCAT(codemp,codsis,codusu,codintper)
FROM sss_permisos_internos WHERE codusu = '".$ls_logusr."' AND codsis = 'SPG' AND enabled=1)";
}
else
{
$ls_sql_seguridad = " AND '".$ls_codemp."'||'SPG'||'".$ls_logusr."'||b.codestpro1||b.codestpro2||b.codestpro3||b.codestpro4||b.codestpro5||b.estcla IN (SELECT codemp||codsis||codusu||codintper
FROM sss_permisos_internos WHERE codusu = '".$ls_logusr."' AND codsis = 'SPG' AND enabled=1)";
}
if($ls_tipocat=="rep_ejecucion")
{
$ls_estapro=0; // No Aprobadas
$ls_sql=" SELECT distinct a.procede,a.codemp,a.comprobante,a.fecha,a.ced_bene,a.cod_pro,a.descripcion, ".
" a.tipo_destino,a.total ".
" FROM sigesp_cmp_md a,spg_dtmp_cmp b ".
" WHERE a.codemp='".$as_codemp."' AND a.comprobante like '%".$ls_comprobante."%' AND ".
" a.procede like '%".$ls_procedencia."%' AND a.fecha BETWEEN '".$ls_fecdesde."' AND '".$ls_fechasta."' AND".
" a.estapro='".$ls_estapro."' AND a.tipo_comp=2 AND ".
" a.procede=b.procede AND a.comprobante=b.comprobante AND ".
" a.fecha=b.fecha AND a.codemp=b.codemp ".$ls_sql_seguridad.
" ORDER BY a.fecha, a.comprobante, a.procede ";
}
elseif($ls_tipocat=="")
{
$ls_estapro=1; // Aprobadas
$ls_sql=" SELECT distinct a.procede,a.codemp,a.comprobante,a.fecha,a.ced_bene,a.cod_pro,a.descripcion, ".
" a.tipo_destino,a.total ".
" FROM sigesp_cmp a,spg_dt_cmp b ".
" WHERE a.procede=b.procede AND a.tipo_comp=2 AND a.comprobante=b.comprobante AND a.fecha=b.fecha AND ".
" a.codemp=b.codemp AND a.codemp='".$as_codemp."' AND a.comprobante like '%".$ls_comprobante."%' AND ".
" a.procede like '%".$ls_procedencia."%' AND a.fecha>='".$ls_fecdesde."' AND a.fecha<='".$ls_fechasta."' ".$ls_sql_seguridad.
" ORDER BY a.fecha, a.comprobante, a.procede ";
}
$rs_data=$io_sql->select($ls_sql);
$data=$rs_data;
if (!empty($data))
{
while($row=$io_sql->fetch_row($rs_data))
{
$ls_comprobante=$row["comprobante"];
$ls_descripcion=utf8_encode($row["descripcion"]);
$ls_procedencia=$row["procede"];
$ls_fecha=date("Y-m-d",strtotime($row["fecha"]));
$ldt_fecha=$io_funciones->uf_convertirfecmostrar($ls_fecha);
$ldec_monto=number_format($row["total"],2,",",".");
if($ls_destino!="")
{
print "
";
print "| ".$ls_comprobante." | ";
print "".$ls_descripcion." | ";
print "".$ls_procedencia." | ";
print "".$ldt_fecha." | ";
print "
";
}
if(($ls_tipocat=="")&&($ls_destino==""))
{
print "
";
print "| ".$ls_comprobante." | ";
print "".$ls_descripcion." | ";
print "".$ls_procedencia." | ";
print "".$ldt_fecha." | ";
print "
";
}
if($ls_tipocat=="rep_ejecucion")
{
print "
";
print "| ".$ls_comprobante." | ";
print "".$ls_descripcion." | ";
print "".$ls_procedencia." | ";
print "".$ldt_fecha." | ";
print "
";
}
}
}
else
{
?>
free_result($rs_data);
}
}
print "";
?>