oracle 繁体转简体函数

需要字典表，字典表收录7434个繁体字
亲测有效，支持短句转换

字典表下载链接：https://download.csdn.net/download/qq_34658759/12183548
Oracle字典表导出版本为：11gR2

Oracle dmp 文件导入

CREATE OR REPLACE FUNCTION F_FANTI_TO_JIANTI(OLD_STRING IN VARCHAR2)
  RETURN VARCHAR2 AS
  LENGTH_NUM NUMBER := NULL;
  OLD_WORD   VARCHAR2(500) := NULL;
  NEW_WORD   VARCHAR2(500) := NULL;
  ZZ_WORD    VARCHAR2(500) := NULL;
  I          NUMBER := 0;
BEGIN
  LENGTH_NUM := LENGTH(OLD_STRING);
  FOR I IN REVERSE 1 .. LENGTH_NUM LOOP
    OLD_WORD := SUBSTR(OLD_STRING, I, 1);
    BEGIN
      SELECT t.simplified
        INTO NEW_WORD
        FROM dm_fanti_jianti_7434 T
       WHERE t.traditional = OLD_WORD;
    EXCEPTION
      WHEN NO_DATA_FOUND THEN
        NEW_WORD := OLD_WORD;
    END;
    ZZ_WORD := NEW_WORD || ZZ_WORD;
  END LOOP;
  RETURN ZZ_WORD;
END;