高分急求存储过程（急急急）在线等

Question

各位大侠：
   小弟的ORACLE数据库中有一个表（T_PERSON），其中的两个字段是（LM，XZ）分别表示‘路名’和‘详址’，在这个两个字段中所存的内容包含全角输入的数字和字母如（１，２，３，４，Ａ，Ｂ，Ｃ，Ｄ），现在我要将这两个字段中的所有的全角方式输入的数字和字母都改成半角输入的数字和字母如（1，2，3，4，A，B，C，D）。就在要将全角的转换成半角的。
    本人对ORACEL的存储过程不熟，所以请高手写一个完整的可用的过程，小弟现在急着用呀！谢谢了。

Answer 1

有现成的函数translate(xxx,'xxx','xxx')啊
update t_person set 
lm=translate(LM,'１２３４５６７８９０，ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ','1234567890，ABCDEFGHIJKLMNOPQRSTUVWXYZ'),
xz=translate(XZ,'１２３４５６７８９０，ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ','1234567890，ABCDEFGHIJKLMNOPQRSTUVWXYZ')
;
....

Answer 2

上面的逗号换成半角的，更正一下update t_person set 
lm=translate(LM,'１２３４５６７８９０，ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ','1234567890,ABCDEFGHIJKLMNOPQRSTUVWXYZ'),
xz=translate(XZ,'１２３４５６７８９０，ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ','1234567890,ABCDEFGHIJKLMNOPQRSTUVWXYZ');