Oracle 事务相关的一些测试

1.sqlplus 客户端正常退出

SQL> desc t;
名称 是否为空? 类型
----------------------------------------- -------- ----------------------------
TSP TIMESTAMP(6)
CNT NOT NULL NUMBER(38) SQL> insert into t values(sysdate,1); 已创建 1 行。 SQL> exit
从 Oracle Database 11g Enterprise Edition Release 11.2.0.1.0 - Production
With the Partitioning, OLAP, Data Mining and Real Application Testing options 断开 C:\Users\zen>sqlplus hbkf_crm/hbkf_crm4test SQL*Plus: Release 11.2.0.1.0 Production on 星期日 11月 17 12:28:29 2013 Copyright (c) 1982, 2010, Oracle. All rights reserved. 连接到:
Oracle Database 11g Enterprise Edition Release 11.2.0.1.0 - Production
With the Partitioning, OLAP, Data Mining and Real Application Testing options SQL> select * from t; TSP
---------------------------------------------------------------------------
CNT
----------
17-11月-13 12.27.58.000000 下午
1 SQL>

语句正常执行sqlplus正常退出,sqlplus commit修改。

SQL> insert into t values(sysdate,2);

已创建 1 行。

SQL> insert into t values(sysdate,2);
insert into t values(sysdate,2)
*
第 1 行出现错误:
ORA-00001: 违反唯一约束条件 (HBKF_CRM.SYS_C0011518) SQL> exit
从 Oracle Database 11g Enterprise Edition Release 11.2.0.1.0 - Production
With the Partitioning, OLAP, Data Mining and Real Application Testing options 断开 C:\Users\zen>sqlplus hbkf_crm/hbkf_crm4test SQL*Plus: Release 11.2.0.1.0 Production on 星期日 11月 17 12:33:35 2013 Copyright (c) 1982, 2010, Oracle. All rights reserved. 连接到:
Oracle Database 11g Enterprise Edition Release 11.2.0.1.0 - Production
With the Partitioning, OLAP, Data Mining and Real Application Testing options SQL> select * from t; TSP
---------------------------------------------------------------------------
CNT
----------
17-11月-13 12.27.58.000000 下午
1 17-11月-13 12.33.19.000000 下午
2 SQL>

这里应该是显示的语句级原子性。

SQL> select name,text from user_source t where t.name ='P1';

NAME  TEXT
----- ------------------------------------------------------------
P1 procedure p1(num INT)
P1 IS
P1
P1 BEGIN
P1
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+1);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 COMMIT;
P1 NAME TEXT
----- ------------------------------------------------------------
P1 end p1; 已选择12行。 SQL> exec p1(6);
BEGIN p1(6); END; *
第 1 行出现错误:
ORA-00001: 违反唯一约束条件 (HBKF_CRM.SYS_C0011518)
ORA-06512: 在 "HBKF_CRM.P1", line 9
ORA-06512: 在 line 1 SQL> select * from t; TSP
-------------------------------------------------------------------------
CNT
----------
17-11月-13 12.27.58.000000 下午
1 17-11月-13 12.49.08.000000 下午
3 17-11月-13 12.33.19.000000 下午
2 TSP
-------------------------------------------------------------------------
CNT
----------
17-11月-13 12.46.55.000000 下午
4 17-11月-13 12.47.23.000000 下午
5 SQL> select name,text from user_source t where t.name ='P1'; NAME TEXT
----- ------------------------------------------------------------
P1 procedure p1(num INT)
P1 IS
P1
P1 BEGIN
P1
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+1);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 COMMIT;
P1 EXCEPTION WHEN OTHERS THEN NAME TEXT
----- ------------------------------------------------------------
P1 dbms_output.put_line(sqlcode||':'||SQLERRM);
P1
P1 end p1; 已选择14行。 SQL> exec p1(6); PL/SQL 过程已成功完成。
SQL> select tsp,cnt from t; TSP CNT
---------------------------------- ----------
17-11月-13 01.00.20.000000 下午 6
17-11月-13 01.00.20.000000 下午 7
17-11月-13 01.00.20.000000 下午 8
17-11月-13 12.27.58.000000 下午 1
17-11月-13 12.49.08.000000 下午 3
17-11月-13 12.33.19.000000 下午 2
17-11月-13 12.46.55.000000 下午 4
17-11月-13 12.47.23.000000 下午 5 已选择8行。 SQL>

可以看出TOM大师为何对 when others 语句如此有看法了SQL> select name,text from user_source t where t.name ='P1';


NAME TEXT
----- ------------------------------------------------------------
P1 procedure p1(num INT)
P1 IS
P1
P1 BEGIN
P1
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+1);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 COMMIT;
P1 EXCEPTION WHEN OTHERS THEN NAME TEXT
----- ------------------------------------------------------------
P1 dbms_output.put_line(sqlcode||':'||SQLERRM);
P1 ROLLBACK;
P1 end p1; 已选择14行。 SQL> exec p1(10); PL/SQL 过程已成功完成。 SQL> select * from t; TSP CNT
---------------------------------- ----------
17-11月-13 12.27.58.000000 下午 1
17-11月-13 12.49.08.000000 下午 3
17-11月-13 12.33.19.000000 下午 2
17-11月-13 12.46.55.000000 下午 4
17-11月-13 12.47.23.000000 下午 5 --加上rollback 可以回滚整个事务。
SQL> select name,text from user_source t where t.name ='P1';

NAME  TEXT
----- ------------------------------------------------------------
P1 procedure p1(num INT)
P1 IS
P1
P1 BEGIN
P1
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+1);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 INSERT INTO t(tsp,cnt) VALUES(sysdate,num+2);
P1 COMMIT;
P1 EXCEPTION WHEN OTHERS THEN NAME TEXT
----- ------------------------------------------------------------
P1 dbms_output.put_line(sqlcode||':'||SQLERRM);
P1 --ROLLBACK;
P1 RAISE;
P1 end p1; 已选择15行。
SQL> exec p1(10);
BEGIN p1(10); END; *
第 1 行出现错误:
ORA-00001: 违反唯一约束条件 (HBKF_CRM.SYS_C0011518)
ORA-06512: 在 "HBKF_CRM.P1", line 14
ORA-06512: 在 line 1 SQL> select * from t; TSP CNT
---------------------------------- ----------
17-11月-13 12.27.58.000000 下午 1
17-11月-13 12.49.08.000000 下午 3
17-11月-13 12.33.19.000000 下午 2
17-11月-13 12.46.55.000000 下午 4
17-11月-13 12.47.23.000000 下午
5 --抛出异常也会使事务回滚。

一个好的习惯是捕获到了错误,要么回滚,要么抛出异常。

上一篇:Session和Cookie的关系


下一篇:fopen()函数