"; print "close();"; print "opener.document.form1.submit();"; print ""; } ?> Catálogo de Cuentas
uf_conectar(); $io_sql = new class_sql($ls_conect); $io_msg = new class_mensajes(); $io_function = new class_funciones(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; $io_ctaban = new sigesp_c_cuentas_banco(); if (array_key_exists("operacion",$_POST)) { $ls_operacion = $_POST["operacion"]; $ls_codigo = $_POST["codigo"]; $ls_nomban = $_POST["hidnomban"]; $ls_ctaban = $_POST["cuenta"]; $ls_denctaban = $_POST["denominacion"]; $ls_codcon= $_POST["codcon"]; if (array_key_exists("tipo",$_GET)) { $ls_tipo=$_GET["tipo"]; $ls_codbandes=$_GET["bandes"]; $ls_nombandes=$_GET["hidnombandes"]; $ls_codbanhas=$_GET["banhas"]; $ls_nombanhas=$_GET["hidnombanhas"]; } else { $ls_tipo=''; $ls_codbandes=''; $ls_nombandes=''; $ls_codbanhas=''; $ls_nombanhas=''; } } else { if (array_key_exists("tipo",$_GET)) { $ls_tipo=$_GET["tipo"]; $ls_codbandes=$_GET["bandes"]; $ls_nombandes=$_GET["hidnombandes"]; $ls_codbanhas=$_GET["banhas"]; $ls_nombanhas=$_GET["hidnombanhas"]; } else { $ls_tipo=''; $ls_codbandes=''; $ls_nombandes=''; $ls_codbanhas=''; $ls_nombanhas=''; } $ls_operacion = "BUSCAR"; if ($ls_tipo=='') { $ls_codigo = $_GET["codigo"]; $ls_nomban = $_GET["hidnomban"]; } if (array_key_exists("codcon",$_GET)) { $ls_codcon=$_GET["codcon"]; } else { $ls_codcon='---'; } $ls_ctaban = ""; $ls_denctaban = ""; } ?> Catálogo de Cuentas entre Bancos y
Catálogo de Cuentas
   
Cuenta
Nombre
 
   

"; echo ""; echo "Código"; echo "Denominación"; echo "Tipo"; echo "Contable"; echo "Descripción"; echo "Apertura"; echo ""; $ls_casacon=$_SESSION["la_empresa"]["casconmov"]; if ($ls_operacion=="BUSCAR") { if (($ls_casacon==1)&&($ls_codcon!=="---")) { $ls_sql="SELECT scb_ctabanco.ctaban as ctaban,scb_ctabanco.dencta as dencta,TRIM(scb_ctabanco.sc_cuenta) as sc_cuenta, scg_cuentas.denominacion as denominacion,scb_ctabanco.codban as codban,scb_banco.nomban as nomban, scb_ctabanco.codtipcta as codtipcta,scb_tipocuenta.nomtipcta as nomtipcta,scb_ctabanco.fecapr as fecapr, scb_ctabanco.feccie as feccie,scb_ctabanco.estact as estact FROM scb_ctabanco, scb_tipocuenta, scb_banco, scg_cuentas, scb_casamientoconcepto WHERE scb_ctabanco.codemp='".$ls_codemp."' AND scb_ctabanco.codban like '%".$ls_codigo."%' AND scb_ctabanco.ctaban like '".$ls_ctaban."%' AND scb_casamientoconcepto.codconmov='".$ls_codcon."' AND scb_casamientoconcepto.codban='".$ls_codigo."' AND UPPER(scb_ctabanco.dencta) like '%".strtoupper($ls_denctaban)."%' AND scb_ctabanco.codtipcta=scb_tipocuenta.codtipcta AND scb_ctabanco.codban=scb_banco.codban AND scb_ctabanco.sc_cuenta=scg_cuentas.sc_cuenta AND scb_ctabanco.codemp=scg_cuentas.codemp GROUP BY scb_ctabanco.ctaban, scb_ctabanco.dencta, scb_ctabanco.sc_cuenta, scg_cuentas.denominacion, scb_ctabanco.codban, scb_banco.nomban, scb_ctabanco.codtipcta, scb_tipocuenta.nomtipcta, scb_ctabanco.fecapr, scb_ctabanco.feccie, scb_ctabanco.estact"; } else { if ($ls_tipo!='') { $ls_sql="SELECT scb_ctabanco.ctaban as ctaban,scb_ctabanco.dencta as dencta,TRIM(scb_ctabanco.sc_cuenta) as sc_cuenta, scg_cuentas.denominacion as denominacion,scb_ctabanco.codban as codban,scb_banco.nomban as nomban, scb_ctabanco.codtipcta as codtipcta,scb_tipocuenta.nomtipcta as nomtipcta,scb_ctabanco.fecapr as fecapr, scb_ctabanco.feccie as feccie,scb_ctabanco.estact as estact FROM scb_ctabanco, scb_tipocuenta, scb_banco, scg_cuentas WHERE scb_ctabanco.codemp='".$ls_codemp."' AND scb_ctabanco.codban between '".$ls_codbandes."' and '".$ls_codbanhas."' AND scb_ctabanco.ctaban like '%".$ls_ctaban."' AND UPPER(scb_ctabanco.dencta) like '%".strtoupper($ls_denctaban)."%' AND scb_ctabanco.codtipcta=scb_tipocuenta.codtipcta AND scb_ctabanco.codban=scb_banco.codban AND scb_ctabanco.sc_cuenta=scg_cuentas.sc_cuenta AND scb_ctabanco.codemp=scg_cuentas.codemp"; } else { $ls_sql="SELECT scb_ctabanco.ctaban as ctaban,scb_ctabanco.dencta as dencta,TRIM(scb_ctabanco.sc_cuenta) as sc_cuenta, scg_cuentas.denominacion as denominacion,scb_ctabanco.codban as codban,scb_banco.nomban as nomban, scb_ctabanco.codtipcta as codtipcta,scb_tipocuenta.nomtipcta as nomtipcta,scb_ctabanco.fecapr as fecapr, scb_ctabanco.feccie as feccie,scb_ctabanco.estact as estact FROM scb_ctabanco, scb_tipocuenta, scb_banco, scg_cuentas WHERE scb_ctabanco.codemp='".$ls_codemp."' AND scb_ctabanco.codban like '%".$ls_codigo."%' AND scb_ctabanco.ctaban like '".$ls_ctaban."%' AND UPPER(scb_ctabanco.dencta) like '%".strtoupper($ls_denctaban)."%' AND scb_ctabanco.codtipcta=scb_tipocuenta.codtipcta AND scb_ctabanco.codban=scb_banco.codban AND scb_ctabanco.sc_cuenta=scg_cuentas.sc_cuenta AND scb_ctabanco.codemp=scg_cuentas.codemp"; } } $rs_data = $io_sql->select($ls_sql); //echo $rs_data->RecordCount(); if ($rs_data===false) { $io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!"); } else { $li_totrows = $io_sql->num_rows($rs_data); if ($li_totrows>0) { while(!$rs_data->EOF) { $ls_codban = trim(str_pad($rs_data->fields["codban"],3,0,0)); $ls_nomban = $rs_data->fields["nomban"]; $ls_ctaban = trim($rs_data->fields["ctaban"]); $ls_dencta = $rs_data->fields["dencta"]; $ls_codtipcta = $rs_data->fields["codtipcta"]; $ls_nomtipcta = $rs_data->fields["nomtipcta"]; $ls_ctascg = $rs_data->fields["sc_cuenta"]; $ls_denctascg = $rs_data->fields["denominacion"]; $ls_fecapertura = $io_function->uf_convertirfecmostrar($rs_data->fields["fecapr"]); $ls_feccierre = $io_function->uf_convertirfecmostrar($rs_data->fields["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 = $rs_data->fields["estact"]; if ($ls_tipo==1) { echo "".$ls_ctaban.""; echo "".$ls_dencta.""; echo "".$ls_nomtipcta.""; echo "".$ls_ctascg.""; echo "".$ls_denctascg.""; echo "".$ls_fecapertura.""; echo ""; } elseif ($ls_tipo==2) { echo "".$ls_ctaban.""; echo "".$ls_dencta.""; echo "".$ls_nomtipcta.""; echo "".$ls_ctascg.""; echo "".$ls_denctascg.""; echo "".$ls_fecapertura.""; echo ""; } else { echo "".$ls_ctaban.""; echo "".$ls_dencta.""; echo "".$ls_nomtipcta.""; echo "".$ls_ctascg.""; echo "".$ls_denctascg.""; echo "".$ls_fecapertura.""; echo ""; } $rs_data->MoveNext(); } } else { if (($ls_casacon==1)&&($ls_codcon!=="---")) { $io_msg->message("No se han creado Cuentas Bancarias !!!"); } else { if ($ls_tipo!='') { $io_msg->message("Por Favor Ajuste el Rango de los Bancos"); } else { $io_msg->message("No se han asociado Cuentas Bancarias al tipo de concepto seleccionado!!!"); } } } } } echo ""; ?>