"; $title[2]="Cuenta Presupuestaria"; $title[3]="Denominación"; $title[4]="Cuenta Contable";
$grid1="grid";
if ($ls_operacion=="BUSCAR")
{
if (!empty($ls_codestpro1) && !empty($ls_codestpro2)&&!empty($ls_codestpro3))
{
$ls_codestpro1 = $io_funcion->uf_cerosizquierda($ls_codestpro1,25);
$ls_codestpro2 = $io_funcion->uf_cerosizquierda($ls_codestpro2,25);
$ls_codestpro3 = $io_funcion->uf_cerosizquierda($ls_codestpro3,25);
$ls_codestpro4 = $io_funcion->uf_cerosizquierda($ls_codestpro4,25);
$ls_codestpro5 = $io_funcion->uf_cerosizquierda($ls_codestpro5,25);
}
$ls_cadena = "";
if ($li_estmodest=='2')
{
$ls_cadena = " AND codestpro4 = '".$ls_codestpro4."' AND codestpro5 = '".$ls_codestpro5."'";
}
$ls_sql="SELECT spg_cuenta,denominacion,sc_cuenta,status".
" FROM spg_cuentas".
" WHERE codemp = '".$as_codemp."'".
" AND spg_cuenta like '".$ls_codestpro."%'".
" AND denominacion like '%".$ls_denestpro."%'".
" AND sc_cuenta like '".$ls_codscg."%'".
" AND codestpro1 = '".$ls_codestpro1."'".
" AND estcla = '".$ls_estcla."'".
" AND codestpro2 = '".$ls_codestpro2."'".
" AND codestpro3 = '".$ls_codestpro3."'".
$ls_cadena.
"ORDER BY spg_cuenta ";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$io_msg->message($io_funcion->uf_convertirmsg($io_sql->message));
}
else
{
$data=$rs_data;
if($row=$io_sql->fetch_row($rs_data))
{
$data = $io_sql->obtener_datos($rs_data);
$arrcols = array_keys($data);
$totcol = count($arrcols);
$io_ds->data = $data;
$totrow = $io_ds->getRowCount("spg_cuenta");
if($totrow>0)
{
for($z=1;$z<=$totrow;$z++)
{
$cuenta = $data["spg_cuenta"][$z];
$denominacion = $data["denominacion"][$z];
$cuentascg = $data["sc_cuenta"][$z];
$status = $data["status"][$z];
if($status=='C')
{
$object[$z][1]="
";
$object[$z][4]="
";
}
else
{
$object[$z][1]="
";
$object[$z][4]="
";
}
$object[$z][2]="
";
$object[$z][3]="
";
}
}
else
{
$object[1][1]="
";
$object[1][2]="
";
$object[1][3]="
";
$object[1][4]="
";
$totrow=0;
}
$grid->makegrid($totrow,$title,$object,400,'Plan de Cuentas de Presupuesto de Gasto',$grid1);
}
else
{
$io_msg->message("No se han creado cuentas para la programatica seleccionada");
}
}
}
print "";
?>