*****Oracle中多条件模糊查询、拼音码创建使用*****
说明：开发中的多条件模糊查询是一个常见的例子，这里在工作中用到的一个近似版；在此主要解决三个问题：一、ORA-0131的异常问题；二、拼音码的创建使用；三、多条件的模糊查询。
一、ORA-0131的异常问题
因为我是用oracle自带的scott用户测试的，没有设计过程的权限即报ora-0131的错误，这个错误网上解决办法很多了，解决方法用管理员权限登录，给scott授一下权就哦了。
grant debug any procedure, debug connect session to username;
二、拼音码的创建使用
曾几何时感觉拼音码查询很神秘，如果你看一下下面的实现，你就会发现你的眼睛又欺骗了你哦
CREATE OR REPLACE FUNCTION F_TRANS_PINYIN_CAPITAL(P_NAME IN VARCHAR2) RETURN VARCHAR2 AS
V_COMPARE VARCHAR2(100);
V_RETURN VARCHAR2(4000);
FUNCTION F_NLSSORT(P_WORD IN VARCHAR2) RETURN VARCHAR2 AS
BEGIN
RETURN NLSSORT(P_WORD, 'NLS_SORT=SCHINESE_PINYIN_M');
END;
BEGIN
FOR I IN 1..LENGTH(P_NAME) LOOP
V_COMPARE := F_NLSSORT(SUBSTR(P_NAME, I, 1));
IF V_COMPARE >= F_NLSSORT(' 吖 ') AND V_COMPARE <= F_NLSSORT('驁 ') THEN
V_RETURN := V_RETURN || 'a';
ELSIF V_COMPARE >= F_NLSSORT('八 ') AND V_COMPARE <= F_NLSSORT('簿 ') THEN
V_RETURN := V_RETURN || 'b';
ELSIF V_COMPARE >= F_NLSSORT('嚓 ') AND V_COMPARE <= F_NLSSORT('錯 ') THEN
V_RETURN := V_RETURN || 'c';
ELSIF V_COMPARE >= F_NLSSORT('咑 ') AND V_COMPARE <= F_NLSSORT('鵽 ') THEN
V_RETURN := V_RETURN || 'd';
ELSIF V_COMPARE >= F_NLSSORT('妸 ') AND V_COMPARE <= F_NLSSORT('樲 ') THEN
V_RETURN := V_RETURN || 'e';
ELSIF V_COMPARE >= F_NLSSORT('发 ') AND V_COMPARE <= F_NLSSORT('猤 ') THEN
V_RETURN := V_RETURN || 'f';
ELSIF V_COMPARE >= F_NLSSORT('旮 ') AND V_COMPARE <= F_NLSSORT('腂 ') THEN
V_RETURN := V_RETURN || 'g';
ELSIF V_COMPARE >= F_NLSSORT('妎 ') AND V_COMPARE <= F_NLSSORT('夻 ') THEN
V_RETURN := V_RETURN || 'h';
ELSIF V_COMPARE >= F_NLSSORT('丌 ') AND V_COMPARE <= F_NLSSORT('攈 ') THEN
V_RETURN := V_RETURN || 'j';
ELSIF V_COMPARE >= F_NLSSORT('咔 ') AND V_COMPARE <= F_NLSSORT('穒 ') THEN
V_RETURN := V_RETURN || 'k';
ELSIF V_COMPARE >= F_NLSSORT('垃 ') AND V_COMPARE <= F_NLSSORT('擽 ') THEN
V_RETURN := V_RETURN || 'l';
ELSIF V_COMPARE >= F_NLSSORT('嘸 ') AND V_COMPARE <= F_NLSSORT('椧 ') THEN
V_RETURN := V_RETURN || 'm';
ELSIF V_COMPARE >= F_NLSSORT('拏 ') AND V_COMPARE <= F_NLSSORT('瘧 ') THEN
V_RETURN := V_RETURN || 'n';
ELSIF V_COMPARE >= F_NLSSORT('筽 ') AND V_COMPARE <= F_NLSSORT('漚 ') THEN
V_RETURN := V_RETURN || 'o';
ELSIF V_COMPARE >= F_NLSSORT('妑 ') AND V_COMPARE <= F_NLSSORT('曝 ') THEN
V_RETURN := V_RETURN || 'p';
ELSIF V_COMPARE >= F_NLSSORT('七 ') AND V_COMPARE <= F_NLSSORT('裠 ') THEN
V_RETURN := V_RETURN || 'q';
ELSIF V_COMPARE >= F_NLSSORT('亽 ') AND V_COMPARE <= F_NLSSORT('鶸 ') THEN
V_RETURN := V_RETURN || 'r';
ELSIF V_COMPARE >= F_NLSSORT('仨 ') AND V_COMPARE <= F_NLSSORT('蜶 ') THEN
V_RETURN := V_RETURN || 's';
ELSIF V_COMPARE >= F_NLSSORT('侤 ') AND V_COMPARE <= F_NLSSORT('籜 ') THEN
V_RETURN := V_RETURN || 't';
ELSIF V_COMPARE >= F_NLSSORT('屲 ') AND V_COMPARE <= F_NLSSORT('鶩 ') THEN
V_RETURN := V_RETURN || 'w';
ELSIF V_COMPARE >= F_NLSSORT('夕 ') AND V_COMPARE <= F_NLSSORT('鑂 ') THEN
V_RETURN := V_RETURN || 'x';
ELSIF V_COMPARE >= F_NLSSORT('丫 ') AND V_COMPARE <= F_NLSSORT('韻 ') THEN
V_RETURN := V_RETURN || 'y';
ELSIF V_COMPARE >= F_NLSSORT('帀 ') AND V_COMPARE <= F_NLSSORT('咗 ') THEN
V_RETURN := V_RETURN || 'z';
END IF;
END LOOP;
RETURN V_RETURN;
END;
在你的用户下执行一下上在的函数，然后将你的数据表中利用这个函数生成一个拼音码字段就行了，这个函数的使用方法
select * from subarea s where F_TRANS_PINYIN_CAPITAL(s.sub_name) like 'a%'
三、多条件的模糊查询。
说明，参见下面一张books表（临时创建，测试用），这里是用存储过程来实现的，过程的好处，不用我多说了吧！
create table books(
bid varchar2(15), --ID
bname varchar2(50) not null , --书名
bauthor varchar2(15) not null,--作者
bname_pym varchar2(50) ,
bauthor_pym varchar2(15),
bpublic varchar2(50)
) ;
要求:可以通过书名，作者，书名拼音码，作者拼音码来模糊查询出相应的信息，这样的需求可是经常见的哦，记得一定要建索啊，下面没有把建索引贴出来。
1、创建一个注入游标，用来保存我们的返回值，你大可不这么做。
create or replace package bookspackage as type mycur is ref cursor; end bookspackage;
2、创建一个过程的包，以前我可没有这习惯，呵呵
create or replace package pck_books as
procedure prc_books_heck(typeCode in varchar2,
searchName in varchar2, --查询关键字
pagesize in number, --每页显示数/number
pageNow in number, --当前第几页/batch
myrows out number, --总记录数
p_cursor out bookspackage.mycur --返回的记录
);
end;
3、创建存储过程
create or replace package body pck_books as
/****************************************************************************************
***作用:根据传入条件模糊查询,返回总记录数和查询的数据集合. ***
***说明:v_sql,v_sql1是根据传入参数动态拼成的SQL语句. ***
***@Author:dyc ***
*****************************************************************************************/
procedure prc_books_heck(typeCode in varchar2,
searchName in varchar2, --查询关键字
pagesize in number, --每页显示数/number
pageNow in number, --当前第几页/batch
--myrows out number, --总记录数
p_cursor out bookspackage.mycur --返回的记录
) is
v_sql varchar2(1000); --用来拼装动态SQL
--v_sql1 varchar2(1000);
v_begin number := (pageNow - 1) * pagesize + 1; --用来做分页使用
v_end number := pageNow * pagesize;
begin
v_sql := 'select * from (select t1.*, rownum rn from (select b.bid,b.bname,b.bauthor,b.bpublic
from books b
where (b.bname like ''' || searchName ||
'%'' or b.bauthor like ''' || searchName ||
'%'' or
b.bname_pym like ''' || searchName ||
'%'' or b.bauthor_pym like ''' || searchName ||
'%'')
and b.bid > ''' || typeCode || --这个其实应该是类型编码
''') t1
where rownum <= ' || v_end || ')
where rn >= ' || v_begin;
dbms_output.put_line(v_sql);
open p_cursor for v_sql;
/* v_sql1 := 'select * from (select t1.*, rownum rn from (select b.bid,b.bname,b.bauthor,b.bpublic
from books b
where (b.bname like ''' || searchName ||
'%'' or b.bauthor like ''' || searchName ||
'%'' or
b.bname_pym like ''' || searchName ||
'%'' or b.bauthor_pym like ''' || searchName ||
'%'')
and b.bid = ''' || typeCode || --这个其实应该是类型编码
'''';
execute immediate v_sql1
into myrows;*/
exception
when others then
dbms_output.put_line('==Exception====');
end;
end;
OK！完整后可以调试了，忘记告诉你，在表里多加一些数据哦！！！！！！