"; $title[2]="Cuenta Presupuestaria"; $title[3]="Denominación";
$grid1="grid";
if($ls_operacion=="BUSCAR")
{
$arr_cuentas=split("-",$ls_cuentas_existe);
$li_totcuentas=count($arr_cuentas);
$ls_sql2="";
for($li_i=0;$li_i<$li_totcuentas;$li_i++)
{
$ls_cuenta=substr($arr_cuentas[$li_i],0,$li_size);
$ls_sql2=" AND sig_cuenta <> '".$ls_cuenta."' ".$ls_sql2;
}
$ls_codestpro1=str_pad($ls_codestpro1,25,0,0);
$ls_codestpro2=str_pad($ls_codestpro2,25,0,0);
$ls_codestpro3=str_pad($ls_codestpro3,25,0,0);
$ls_codestpro4=str_pad($ls_codestpro4,25,0,0);
$ls_codestpro5=str_pad($ls_codestpro5,25,0,0);
$ls_cadena="SELECT DISTINCT trim(sig_cuenta) as sig_cuenta,denominacion,".
" (SELECT sc_cuenta".
" FROM scg_casa_presu".
" WHERE scg_casa_presu.sig_cuenta=sigesp_plan_unico_re.sig_cuenta) as sc_cuenta
FROM sigesp_plan_unico_re
WHERE not exists (select * from spg_cuentas where spg_cuentas.spg_cuenta='".$ls_cuenta."' ";
if($_SESSION["ls_gestor"]=="MYSQL")
{
$ls_cadena=$ls_cadena." like concat(sigesp_plan_unico_re.sig_cuenta,'%') ";
}
if($_SESSION["ls_gestor"]=="POSTGRE")
{
$ls_cadena=$ls_cadena." like sigesp_plan_unico_re.sig_cuenta||'%' ";
}
if($_SESSION["ls_gestor"]=="INFORMIX")
{
$ls_cadena=$ls_cadena." like sigesp_plan_unico_re.sig_cuenta || '%' ";
}
if($ls_codigo!="")
{
$ls_cadena=$ls_cadena." AND codestpro1='".$ls_codestpro1."' AND codestpro2='".$ls_codestpro2."' AND codestpro3='".$ls_codestpro3."' AND codestpro4='".$ls_codestpro4."' AND codestpro5='".$ls_codestpro5."' AND estcla='".$ls_estcla."') AND sig_cuenta like '".$ls_codigo."%' AND denominacion like '%".$ls_nombre."%'";
}
else
{
$ls_cadena=$ls_cadena." AND codestpro1='".$ls_codestpro1."' AND codestpro2='".$ls_codestpro2."' AND codestpro3='".$ls_codestpro3."' AND codestpro4='".$ls_codestpro4."' AND codestpro5='".$ls_codestpro5."' AND estcla='".$ls_estcla."') AND sig_cuenta like '".$ls_codigo_gasto."%' AND denominacion like '%".$ls_nombre."%'";
}
$ls_cadena=$ls_cadena.$ls_sql2." ORDER BY sig_cuenta";
$rs_cta=$io_sql->select($ls_cadena);
if($rs_cta===false)
{
$io_msg->message($io_funcion->uf_convertirmsg($io_sql->message));
}
else
{
$data=$rs_cta;
$z=0;
$totrow=$io_sql->num_rows($rs_cta);
if($totrow==0)
{
$io_msg->message("No existen cuentas asociadas");
}else
{
if($totrow>0)
{
while($row=$io_sql->fetch_row($rs_cta))
{
$z++;
$cuenta=$row["sig_cuenta"];
$denominacion=$row["denominacion"];
$sc_cuenta=$row["sc_cuenta"];
$object[$z][1]="";
$object[$z][2]="";
$object[$z][3]="";
}
}
else
{
$object[1][1]="";
$object[1][2]="";
$object[1][3]="";
$totrow=1;
}
$grid->makegrid($totrow,$title,$object,650,'Cuentas Recursos y Egresos',$grid1);
}
}
}
print "";
?>