Catálogo de Cuentas Bancarias

Cuenta
Nombre
Banco
 

uf_conectar(); require_once("../../shared/class_folder/class_mensajes.php"); $io_msg=new class_mensajes(); require_once("../../shared/class_folder/class_sql.php"); $SQL=new class_sql($con); $ds=new class_datastore(); require_once("../../shared/class_folder/class_funciones.php"); $fun=new class_funciones(); $ls_codemp=$arr["codemp"]; if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_codigo="%".$_POST["codigo"]."%"; $ls_ctaban="%".$_POST["cuenta"]."%"; $ls_denominacion="%".$_POST["denominacion"]."%"; } else { $ls_operacion="BUSCAR"; $ls_codigo="%%"; $ls_ctaban="%%"; $ls_denominacion="%%"; } print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; 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, a.ctabanext as ctabanext". " FROM scb_ctabanco a,scb_tipocuenta b,scb_banco c,scg_cuentas d ". " WHERE a.codemp='".$ls_codemp."' AND a.codtipcta=b.codtipcta AND a.codban=c.codban AND a.codban like '".$ls_codigo."' AND a.ctaban like '".$ls_ctaban."' ". " AND (a.sc_cuenta=d.sc_cuenta AND a.codemp=d.codemp)"; $rs_cta=$SQL->select($ls_sql); $data=$rs_cta; if($rs_cta===false) { $io_msg->message($fun->uf_convertirmsg($SQL->message)); } else { if($row=$SQL->fetch_row($rs_cta)) { $data=$SQL->obtener_datos($rs_cta); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("ctaban"); for($z=1;$z<=$totrow;$z++) { print ""; $codban=$data["codban"][$z]; $nomban=$data["nomban"][$z]; $ctaban=$data["ctaban"][$z]; $dencta=$data["dencta"][$z]; $codtipcta=$data["codtipcta"][$z]; $nomtipcta=$data["nomtipcta"][$z]; $ctabanext=$data["ctabanext"][$z]; $ctascg=$data["sc_cuenta"][$z]; $denctascg=$data["denominacion"][$z]; $fecapertura=$fun->uf_convertirfecmostrar($data["fecapr"][$z]); $feccierre=$fun->uf_convertirfecmostrar($data["feccie"][$z]); $statuscta=$data["estact"][$z]; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; } } else { $io_msg->message("No se han definido cuentas para el banco seleccionado"); } } } print "
Código DenominaciónBancoTipo de CuentaCuenta ContableDenominación Cta. ContableAperturaCierre
".$ctaban."".$dencta."".$nomban."".$nomtipcta."".$ctascg."".$denctascg."".$fecapertura."".$feccierre."
"; ?>