ora_sql_txt函数 内容有中文 可能会出现乱码

shaunsyb

通过触发器 获取 DDL语句，如果获取的内容中包含中文，就会导致 出现乱码，示例如下：

1. ---- 存储DDL语句的表
   
2. create table sys.test_audit_ddl
   
3. (opertime date,
   
4. operation varchar2(30),
   
5. object_type varchar2(30),
   
6. object_name varchar2(30),
   
7. sql_stmt varchar2(4000)
   
8. );
   
9. 
   
10. ---- 捕获DDL语句的触发器
    
11. create or replace trigger sys.test_trg_audit_ddl
    
12. before ddl on database
    
13. declare
    
14. pragma autonomous_transaction;
    
15. n number;
    
16. stmt varchar2(4000) :=null;
    
17. sql_text ora_name_list_t;
    
18. begin
    
19. 
    
20. n := ora_sql_txt(sql_text);
    
21. for i in 1..n loop
    
22. stmt := stmt || sql_text(i);
    
23. end loop;
    
24. 
    
25. insert into sys.test_audit_ddl
    
26. (
    
27. opertime,operation,
    
28. object_type,object_name,sql_stmt
    
29. )
    
30. values(
    
31. sysdate,
    
32. ora_sysevent,
    
33. ora_dict_obj_type,
    
34. ora_dict_obj_name,
    
35. stmt
    
36. );
    
37. commit;
    
38. end;
    
39. /
    
40. 
    
41. ---- 测试DDL捕获乱码的情形
    
42. create or replace procedure test_proc as
    
43. begin
    
44. -- 这是一个测试中文DDL是否乱码的例子
    
45. dbms_output.put_line('这是一个测试中文DDL是否乱码的过程');
    
46. end;
    
47. /
    
48. 
    
49. create or replace procedure test_proc as
    
50. begin
    
51. --------------- 这是一个测试中文DDL是否乱码的例子
    
52. dbms_output.put_line('这是一个测试中文DDL是否乱码的过程');
    
53. end;
    
54. /

复制代码

结果如下：

1. 14:36:11 SQL> select * from sys.test_audit_ddl;
   
2. 
   
3. OPERTIME OPERATION OBJECT_TYPE
   
4. ------------------- ------------------------------ ------------------------------
   
5. OBJECT_NAME
   
6. ----------------------------------------
   
7. SQL_STMT
   
8. ---------------------------------------------------------------------------------------------------
   
9. 2012-06-26 14:36:02 CREATE PROCEDURE
   
10. TEST_PROC
    
11. create or replace procedure test_proc as
    
12. begin
    
13. -- 这是一个测试中文DDL是否乱码的例子
    
14. dbms_output.put_line('这是一个测试中文DDL是否乱码的过程');
    
15. end;
    
16. 
    
17. 2012-06-26 14:36:11 CREATE PROCEDURE
    
18. TEST_PROC
    
19. create or replace procedure test_proc as
    
20. begin
    
21. --------------- 这是一个测试中文DDL是否乱码的例子
    
22. dbms_output.put_line('这是桓霾馐灾形腄DL是否乱码的过程');
    
23. end;

复制代码

以上示例代码是从其他帖子 复制来的，不过和我遇到的问题是一摸一样的，自己也进行了验证，故就直接采用了。
（没有权限写URL地址，故没有贴出）

数据库版本：10.2.0.5

我的想法是 中文是占2个字符的，而在 dbms_standard.ora_name_list_t 这个函数将  获取的 内容 进行分割的时候，将一个中文给分割了，就导致分割之后的中文内容全部是乱码，
不知道有没有办法解决呢？？