中文数字转阿拉伯数字 oracle函数

Question

需要写个oracl函数，实现将中文数字转阿拉伯数字。。例子：现在我需要将数据表A中的aa字段”三室一厅“字符串，变成3，1 分别插入数据表B中的 a，b字段因为以上功能我是需要用触发器实现。。所以只得写一个函数来调用。。求助各位！！

Answer 1

这里应该不会出现两位数的数字，比如十室十厅吧
直接写触发器好了
create table ttext(a varchar2(10),b number,c number);
create or replace trigger tgtest
before insert or update on ttext
for each row
declare
flag boolean:=false;
v number;
begin
:new.b:=null;
:new.c:=null;
if :new.a is null then return; end if;
for i in 1..length(:new.a) loop
    v:=case substr(:new.a,i,1) when '一' then 1 
      when '二' then 2
      when '三' then 3
      when '四' then 4
      when '五' then 5
      when '六' then 6
      when '七' then 7
      when '八' then 8
      when '九' then 9
      when '零' then 0
      when '两' then 2 end;
    if v is not null then
      if flag=false then :new.b:=v;
        flag:=true;
      else :new.c:=v;
        return;
      end if;
    end if;
end loop;
end tgtest;
case 部分可以根据需要增删

Answer 2

这样比较好
create or replace trigger tgtest
before insert or update on ttext
for each row
declare
v1 number;
v2 number;
begin
v1:=instr(:new.a,'室')-1;
v2:=instr(:new.a,'厅')-1;
if v1>0 then
 :new.b:=(case substr(:new.a,v1,1) when '一' then 1 
      when '二' then 2
      when '三' then 3
      when '四' then 4
      when '五' then 5
      when '六' then 6
      when '七' then 7
      when '八' then 8
      when '九' then 9
      when '零' then 0
      when '两' then 2 end);
else :new.b:=null;
end if;
if v2>0 then
 :new.c:=(case substr(:new.a,v2,1) when '一' then 1 
      when '二' then 2
      when '三' then 3
      when '四' then 4
      when '五' then 5
      when '六' then 6
      when '七' then 7
      when '八' then 8
      when '九' then 9
      when '零' then 0
      when '两' then 2 end);
else :new.c:=null;
end if;
exception
when others then
  :new.b:=null;
  :new.c:=null;
end tgtest;

Answer 3

谢谢wildwave ！！我先试试！