";
print "
";
print "| Código | ";
print "Denominación | ";
print "Banco | ";
print "Tipo de Cuenta | ";
print "Cuenta Contable | ";
print "Denominación Cta. Contable | ";
print "Apertura | ";
print "
";
if($ls_operacion=="BUSCAR")
{
$ls_sql="SELECT a.ctaban as ctaban,a.dencta as dencta,a.sc_cuenta as sc_cuenta,d.denominacion as denominacion,a.codban as codban,c.nomban as nomban,a.codtipcta as codtipcta,b.nomtipcta as nomtipcta,a.fecapr as fecapr,a.feccie as feccie,a.estact as estact ".
" FROM scb_ctabanco a,scb_tipocuenta b,scb_banco c,scg_cuentas d ".
" WHERE a.codemp='".$ls_codemp."' AND a.codban like '%".$ls_codigo."%' AND a.ctaban like '".$ls_ctaban."' AND a.dencta like '".$ls_denominacion."'".
" AND a.codtipcta=b.codtipcta AND a.codban=c.codban AND (a.sc_cuenta=d.sc_cuenta AND a.codemp=d.codemp)";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$io_msg->message("Error en select");
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while ($row=$io_sql->fetch_row($rs_data))
{
print "
";
$ls_codban = $row["codban"];
$ls_nomban = $row["nomban"];
$ls_ctaban = $row["ctaban"];
$ls_dencta = $row["dencta"];
$ls_codtipcta = $row["codtipcta"];
$ls_nomtipcta = $row["nomtipcta"];
$ls_ctascg = $row["sc_cuenta"];
$ls_denctascg = $row["denominacion"];
$ls_fecapertura = $fun->uf_convertirfecmostrar($row["fecapr"]);
$ls_feccierre = $fun->uf_convertirfecmostrar($row["feccie"]);
$io_ctaban->uf_verificar_saldo($ls_codban,$ls_ctaban,$adec_saldo);
if ($adec_saldo>0)
{
echo "
";
}
else
{
echo "
";
}
$ldec_saldo = number_format($adec_saldo,2,',','.');
$ls_status = $row["estact"];
print "| ".$ls_ctaban." | ";
print "".$ls_dencta." | ";
print "".$ls_nomban." | ";
print "".$ls_nomtipcta." | ";
print "".$ls_ctascg." | ";
print "".$ls_denctascg." | ";
print "".$ls_fecapertura." | ";
print "
";
}
}
else
{?>
";
if ($ls_operacion=="TOMAR")
{
$li_cfgchq = $_SESSION["la_empresa"]["confi_ch"];
if ($li_cfgchq=='1')//Generación Automática de los Cheques.
{
$ls_ctaban = $_POST["txtcuenta"];
$ls_codban = $_POST["codigo"];
$ls_codusu = $_SESSION["la_empresa"][""];
$ls_numche = $io_update->uf_select_cheques($ls_codban,$ls_ctaban,$ls_codusu,$ls_chenum);
if (!empty($ls_numche))
{
$ls_numche = str_pad($ls_numche,15,0,0);
}
else
{
$io_msg->message("No tiene Chequera asociada !!!");
}
?>