";
print "
";
print "| Presupuestaria | ";
print "".$arr["nomestpro1"]." | ";
print "".$arr["nomestpro2"]." | ";
print "".$arr["nomestpro3"]." | ";
print "Denominación | ";
print "Contable | ";
print "Disponible | ";
print "
";
if($ls_operacion=="BUSCAR")
{
$ls_cadena ="SELECT *,(asignado-(comprometido+precomprometido)+aumento-disminucion) as disponible FROM spg_cuentas ".
"WHERE codemp = '".$as_codemp."'".
" AND spg_cuenta like '".$ls_codigo."'".
" AND denominacion like '".$ls_denominacion."'".
" AND sc_cuenta like '".$ls_codscg."'".
" AND codestpro1 like '%".$ls_estpro1."%'".
" AND codestpro2 like '%".$ls_estpro2."%'".
" AND codestpro3 like '%".$ls_estpro3."%'".
" ORDER BY spg_cuenta";
$rs_cta=$io_sql->select($ls_cadena);
if($rs_cta==false)
{
$msg->message($fun->uf_convertirmsg($io_sql->message));
}
else
{
$data=$rs_cta;
if($row=$io_sql->fetch_row($rs_cta))
{
$data=$io_sql->obtener_datos($rs_cta);
$arrcols=array_keys($data);
$totcol=count($arrcols);
$ds->data=$data;
$totrow=$ds->getRowCount("spg_cuenta");
for($z=1;$z<=$totrow;$z++)
{
$cuenta=$data["spg_cuenta"][$z];
$denominacion=$data["denominacion"][$z];
$codest1=$data["codestpro1"][$z];
$codest2=$data["codestpro2"][$z];
$codest3=$data["codestpro3"][$z];
$scgcuenta=$data["sc_cuenta"][$z];
$status=$data["status"][$z];
$disponible=$data["disponible"][$z];
if($status=="S")
{
print "
";
print "| ".$cuenta." | ";
print "".$codest1." | ";
print "".$codest2." | ";
print "".$codest3." | ";
print "".$denominacion." | ";
print "".$scgcuenta." | ";
print "".number_format($disponible,2,",",".")." | ";
}
else
{
print "
";
print "| ".$cuenta." | ";
print "".$codest1." | ";
print "".$codest2." | ";
print "".$codest3." | ";
print "".$denominacion." | ";
print "".$scgcuenta." | ";
print "".number_format($disponible,2,",",".")." | ";
}
print "
";
}
$io_sql->free_result($rs_cta);
$io_sql->close();
}
else
{
?>
";
?>