uf_conectar(); $io_sql = new class_sql($ls_conect); $io_msg = new class_mensajes(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; if (array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; } else { $ls_operacion=""; } ?>
Catálogo de Beneficiarios
Cédula
Apellido
Nombre
Banco
uf_select_banco($ls_codemp); ?>
---seleccione---
fetch_row($rs_ben)) { $ls_codban=$row["codban"]; $ls_nomban=$row["nomban"]; if ($ls_codban==$ls_banco) { print "
$ls_nomban
"; } else { print "
$ls_nomban
"; } } ?>
Buscar
"; print "
"; print "
Cédula
"; print "
Nombre
"; print "
Dirección
"; print "
Teléfono
"; print "
"; if ($ls_operacion=="BUSCAR") { $ls_cedbene = $_POST["txtcedula"]; $ls_nombene = $_POST["txtnombre"]; $ls_apebene = $_POST["txtapellido"]; $ls_codban = $_POST["cmbbanco"]; $ls_sql = "SELECT rpc_beneficiario.ced_bene,rpc_beneficiario.nombene,rpc_beneficiario.dirbene, rpc_beneficiario.telbene,scg_cuentas.denominacion FROM rpc_beneficiario LEFT JOIN scg_cuentas ON rpc_beneficiario.sc_cuenta=scg_cuentas.sc_cuenta WHERE rpc_beneficiario.ced_bene ILIKE '%".$ls_cedbene."%' AND rpc_beneficiario.nombene ILIKE '%".$ls_nombene."%' AND rpc_beneficiario.apebene ILIKE '%".$ls_apebene."%' AND rpc_beneficiario.codban ILIKE '%".$ls_codban."%' AND rpc_beneficiario.ced_bene<>'----------' ORDER BY rpc_beneficiario.ced_bene ASC"; $rs_data = $io_sql->select($ls_sql); if ($rs_data===false) { $io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!"); } else { $li_numrows = $io_sql->num_rows($rs_data); if ($li_numrows>0) { while (!$rs_data->EOF) { echo "
"; $ls_cedbene = trim($rs_data->fields["ced_bene"]); $ls_nombene = $rs_data->fields["nombene"]; $ls_dirbene = $rs_data->fields["dirbene"]; $ls_telbene = $rs_data->fields["telbene"]; echo "
".$ls_cedbene."
"; echo "
".$ls_nombene."
"; echo "
".$ls_dirbene."
"; echo "
".$ls_telbene."
"; echo "
"; $rs_data->MoveNext(); } } else { $io_msg->message("No se han definido Beneficiario para este Criterio !!!"); } } } echo ""; ?>