全角转换半角
RT
如何将一个字符串中的所有的全角假名转换成半角假名。
例如：
输入："1あア2"
变成："1ぁ?2"
那位大侠，帮帮小弟。
[解决办法]
ORACLE 全角数字转半角数字
数据库表 test 字段 id name age
全角数字:１２３４５６
半角数字:123456
length和lengthb的区别:
length(123456) 6
lengthb(１２３４５６) 12
to_single_byte函数用法:
to_single_byte(１２３４５６) 123456
查找所有全角的数字：
select age from test where lengthB(age) >6
替换全角的为半角的:
update test t1 set t1.age = (select to_single_byte(t2.age) from test t2 where t1.id = t2.id)
ok!!
[解决办法]
1.ORACLE自带的函数可以转换标点符号；
2.fn_knachg函数为转换全半角函数
参数：pKna为要转换的字符串；
pPara：1为半角 → 全角；
2为全角 → 半角。
string findSQL = "";
string query = "aｂc";
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;
[解决办法]
lv_moji := Translate(lv_moji,'??????????????????????????????','アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホ');
lv_moji := Translate(lv_moji,'ぁぃぅぇぉゃゅょっゎ','ァィゥェォャュョッヮ');
[解决办法]
lv_moji := Translate(lv_moji,'あいうえおかきくけこさしすせそたちつてとなにぬねの','アイウエオカキクケコサシスセソタチツテトナニヌネノ');
[解决办法]
declare
v_zenkaku constant varchar2(4000) := 'アイウエオカキクケコサシスセソタチツテ
トナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンガギグゲゴザジズゼゾダ
ヂヅデドバビブベボパピプペポァィゥェォュョ';
v_kankaku constant varchar2(4000) := 'アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨ
ラリルレロワヲンガギグゲゴザジズゼゾダヂヅデドバビブベボパピプペポァィゥェォ';
v_test_str varchar2(4000) := '１２３エ３３＊＠（オｓｋｌス';
begin
v_test_str := TRANSLATE(v_test_str,v_zenkaku,v_kankaku);
v_test_str := TO_SINGLE_BYTE(v_test_str); dbms_output.put_line(v_test_str); end;
