ORACLE SQL リファレンス(逆引き)

create or replace function han2zen (han_str in varchar2) return varchar2 as
zen_str varchar2(32767);

begin

zen_str := han_str;
if instrb(zen_str,'ﾟ') > 0 or instrb(zen_str,'ﾞ') > 0 then

　zen_str := replace(zen_str,'ｶﾞ','ガ');
　zen_str := replace(zen_str,'ｷﾞ','ギ');
　zen_str := replace(zen_str,'ｸﾞ','グ');
　zen_str := replace(zen_str,'ｹﾞ','ゲ');
　zen_str := replace(zen_str,'ｺﾞ','ゴ');

　zen_str := replace(zen_str,'ｻﾞ','ザ');
　zen_str := replace(zen_str,'ｼﾞ','ジ');
　zen_str := replace(zen_str,'ｽﾞ','ズ');
　zen_str := replace(zen_str,'ｾﾞ','ゼ');
　zen_str := replace(zen_str,'ｿﾞ','ゾ');

　zen_str := replace(zen_str,'ﾀﾞ','ダ');
　zen_str := replace(zen_str,'ﾁﾞ','ヂ');
　zen_str := replace(zen_str,'ﾂﾞ','ヅ');
　zen_str := replace(zen_str,'ﾃﾞ','デ');
　zen_str := replace(zen_str,'ﾄﾞ','ド');

　zen_str := replace(zen_str,'ﾊﾞ','バ');
　zen_str := replace(zen_str,'ﾋﾞ','ビ');
　zen_str := replace(zen_str,'ﾌﾞ','ブ');
　zen_str := replace(zen_str,'ﾍﾞ','ベ');
　zen_str := replace(zen_str,'ﾎﾞ','ボ');

　zen_str := replace(zen_str,'ﾊﾟ','パ');
　zen_str := replace(zen_str,'ﾋﾟ','ピ');
　zen_str := replace(zen_str,'ﾌﾟ','プ');
　zen_str := replace(zen_str,'ﾍﾟ','ペ');
　zen_str := replace(zen_str,'ﾎﾟ','ポ');

end if;

return translate(zen_str,
　'ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｬｭｮｯｰ',
　'アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォャュョッー');

end han2zen;