dfd
1.ORACLE自带的函数可以转换标点符号; 2.fn_knachg函数为转换全半角函数 参数:pKna为要转换的字符串; pPara:1为半角 → 全角; 2为全角 → 半角。 string findSQL = ""; string query = "abc"; findSQL = "SELECT count(*) cout from test1 where fn_knachg(TO_MULTI_BYTE(test),1) like '%'||fn_knachg(TO_MULTI_BYTE('" + query + "'),1)||'%'"; CREATE OR REPLACE FUNCTION fn_knachg(pKna IN VARCHAR2, pPara IN VARCHAR2) RETURN VARCHAR2 IS TYPE t_Zen1 IS varray(95) of VARCHAR2(2); tZen1 t_Zen1 := t_Zen1('ア', 'イ', 'ウ', 'エ', 'オ', 'カ', 'キ', 'ク', 'ケ', 'コ', 'サ', 'シ', 'ス', 'セ', 'ソ', 'タ', 'チ', 'ツ', 'テ', 'ト', 'ナ', 'ニ', 'ヌ', 'ネ', 'ノ', 'ハ', 'ヒ', 'フ', 'ヘ', 'ホ', 'マ', 'ミ', 'ム', 'メ', 'モ', 'ヤ', 'ユ', 'ヨ', 'ラ', 'リ', 'ル', 'レ', 'ロ', 'ワ', 'ヲ', 'ン', 'ァ', 'ィ', 'ゥ', 'ェ', 'ォ', 'ッ', 'ャ', 'ュ', 'ョ', 'ー', '、', '。', '・', '」', '「', '゛', ' ', ',', '<', '.', '>', '/', '?', '_', '}', ']', '*', ':', '+', ';', '{', '[', ' ̄', '@', '|', '¥', '`', '^', '=', '-', ')', '(', '&', '%', '$', '#', '”', '!', '’'); TYPE t_Han1 IS varray(95) of VARCHAR2(2); tHan1 t_Han1 := t_Han1('ア', 'イ', 'ウ', 'エ', 'オ', 'カ', 'キ', 'ク', 'ケ', 'コ', 'サ', 'シ', 'ス', 'セ', 'ソ', 'タ', 'チ', 'ツ', 'テ', 'ト', 'ナ', 'ニ', 'ヌ', 'ネ', 'ノ', 'ハ', 'ヒ', 'フ', 'ヘ', 'ホ', 'マ', 'ミ', 'ム', 'メ', 'モ', 'ヤ', 'ユ', 'ヨ', 'ラ', 'リ', 'ル', 'レ', 'ロ', 'ワ', 'ヲ', 'ン', 'ァ', 'ィ', 'ゥ', 'ェ', 'ォ', 'ッ', 'ャ', 'ュ', 'ョ', 'ー', '、', '。', '・', '」', '「', '゙', ' ', ',', '<', '.', '>', '/', '?', '_', '}', ']', '*', ':', '+', ';', '{', '[', '~', '@', '|', '\', '`', '^', '=', '-', ')', '(', '&', '%', '$', '#', '"', '!', ''''); TYPE t_Zen2 IS varray(26) of VARCHAR2(2); tZen2 t_Zen2 := t_Zen2('ガ', 'ギ', 'グ', 'ゲ', 'ゴ', 'ザ', 'ジ', 'ズ', 'ゼ', 'ゾ', 'ダ', 'ヂ', 'ヅ', 'デ', 'ド', 'バ', 'ビ', 'ブ', 'ベ', 'ボ', 'パ', 'ピ', 'プ', 'ペ', 'ポ', 'ヴ'); TYPE t_Han2 IS varray(26) of VARCHAR2(4); tHan2 t_Han2 := t_Han2('ガ', 'ギ', 'グ', 'ゲ', 'ゴ', 'ザ', 'ジ', 'ズ', 'ゼ', 'ゾ', 'ダ', 'ヂ', 'ヅ', 'デ', 'ド', 'バ', 'ビ', 'ブ', 'ベ', 'ボ', 'パ', 'ピ', 'プ', 'ペ', 'ポ', 'ヴ'); TYPE t_Zen3 IS varray(5) of VARCHAR2(2); tZen3 t_Zen3 := t_Zen3('ヮ', 'ヰ', 'ヱ', 'ヵ', 'ヶ'); TYPE t_Han3 IS varray(5) of VARCHAR2(2); tHan3 t_Han3 := t_Han3('ワ', 'イ', 'エ', 'カ', 'ケ'); sKna varchar2(4000); i int; BEGIN sKna := pKna; if pPara = '1' then -- 半角 → 全角 for i in 1..26 loop sKna := replace(sKna, tHan2(i), tZen2(i)); end loop; for i in 1..95 loop sKna := replace(sKna, tHan1(i), tZen1(i)); end loop; sKna := to_multi_byte(sKna); elsif pPara = '2' then -- 全角 → 半角 for i in 1..26 loop sKna := replace(sKna, tZen2(i), tHan2(i)); end loop; for i in 1..95 loop sKna := replace(sKna, tZen1(i), tHan1(i)); end loop; for i in 1..5 loop sKna := replace(sKna, tZen3(i), tHan3(i)); end loop; sKna := to_single_byte(sKna); end if; return sKna; END;