";
print "
";
print "| Cuenta Ingreso | ";
print "Denominación | ";
print "Contable | ";
print "Disponible | ";
print "
";
if($ls_operacion=="BUSCAR")
{
$ls_straux="";
$ls_sqlaux="";
if ($li_estpreing==1)
{
$ls_straux = ", spi_cuentas_estructuras, spg_ep5";
$ls_codestpro1 = str_pad(trim($ls_codestpro1),25,0,0);
$ls_codestpro2 = str_pad(trim($ls_codestpro2),25,0,0);
$ls_codestpro3 = str_pad(trim($ls_codestpro3),25,0,0);
if ($li_estmodest==2)
{
$ls_codestpro4 = $_GET["codestpro4"];
$ls_codestpro5 = $_GET["codestpro5"];
$ls_codestpro4 = str_pad(trim($ls_codestpro4),25,0,0);
$ls_codestpro5 = str_pad(trim($ls_codestpro5),25,0,0);
}
elseif($li_estmodest==1)
{
$ls_codestpro4 = $ls_codestpro5 = str_pad("",25,0,0);
}
$ls_sqlaux = " AND spi_cuentas_estructuras.codestpro1 = '".$ls_codestpro1."'
AND spi_cuentas_estructuras.codestpro2 = '".$ls_codestpro2."'
AND spi_cuentas_estructuras.codestpro3 = '".$ls_codestpro3."'
AND spi_cuentas_estructuras.codestpro4 = '".$ls_codestpro4."'
AND spi_cuentas_estructuras.codestpro5 = '".$ls_codestpro5."'
AND spi_cuentas_estructuras.estcla = '".$ls_estcla."'
AND spi_cuentas.codemp=spi_cuentas_estructuras.codemp
AND TRIM(spi_cuentas.codemp)=TRIM(spi_cuentas_estructuras.codemp)
AND spi_cuentas_estructuras.codemp = spg_ep5.codemp
AND spi_cuentas_estructuras.codestpro1 = spg_ep5.codestpro1
AND spi_cuentas_estructuras.codestpro2 = spg_ep5.codestpro2
AND spi_cuentas_estructuras.codestpro3 = spg_ep5.codestpro3
AND spi_cuentas_estructuras.codestpro4 = spg_ep5.codestpro4
AND spi_cuentas_estructuras.codestpro5 = spg_ep5.codestpro5
AND spi_cuentas_estructuras.spi_cuenta = spi_cuentas.spi_cuenta
AND spi_cuentas_estructuras.estcla = spg_ep5.estcla";
$ls_cadena =" SELECT spi_cuentas.*,(spi_cuentas_estructuras.previsto+spi_cuentas.aumento-spi_cuentas.disminucion) as disponible, spi_cuentas_estructuras.estcla as estcla
FROM spi_cuentas $ls_straux
WHERE spi_cuentas.codemp = '".$as_codemp."'
AND spi_cuentas.spi_cuenta like '".$ls_codigo."'
AND spi_cuentas.denominacion like '".$ls_denominacion."'
AND spi_cuentas.sc_cuenta like '".$ls_codscg."' $ls_sqlaux
ORDER BY spi_cuentas.spi_cuenta";
}
else
{
$ls_cadena =" SELECT *,((previsto+(aumento-disminucion))-devengado) as disponible
FROM spi_cuentas
WHERE codemp = '".$as_codemp."' AND spi_cuenta like '".$ls_codigo."' AND denominacion like '".$ls_denominacion."' AND sc_cuenta like '".$ls_codscg."'
ORDER BY spi_cuenta";
}
//echo $ls_cadena;
$rs_data = $io_sql->select($ls_cadena);
if ($rs_data==false)
{
$msg->message($fun->uf_convertirmsg($io_sql->message));
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while($row=$io_sql->fetch_row($rs_data))
{
$cuenta = $row["spi_cuenta"];
$denominacion = $row["denominacion"];
$scgcuenta = $row["sc_cuenta"];
$status = $row["status"];
$disponible = $row["disponible"];
$estcla = $row["estcla"];
if ($status=="S")
{
print "
";
print "| ".$cuenta." | ";
print "".$denominacion." | ";
print "".$scgcuenta." | ";
print "".number_format($disponible,2,",",".")." | ";
}
else
{
print "
";
print "| ".$cuenta." | ";
print "".$denominacion." | ";
print "".$scgcuenta." | ";
print "".number_format($disponible,2,",",".")." | ";
}
print "
";
}
$io_sql->free_result($rs_data);
$io_sql->close();
}
else
{ ?>
";
?>