ORACLE子存储过程中的COMMIT语句引发的问题

今天花了一天时间在恢复表数据，就是因为在子存储过程中出现了个commit语句，简单描述如下：

SP_ADD_PRODUCT中调用了两个子存储过程SP_SUB_RMV_PRODUCT和SP_SUB_ADD_PRODUCT，其中SP_SUB_RMV_PRODUCT会将好几张表中的数据删除，

然后SP_SUB_ADD_PRODUCT会重新添加信息。

问题出现在：SP_SUB_RMV_PRODUCT中在结束时使用了COMMIT语句，在SP_SUB_RMV_PRODUCT处理失败时，存储过程回滚，但由于之前的COMMIT,导致数据不能完全回滚，从而产生数据不一致。

CREATE OR REPLACE PROCEDURE SP_ADD_PRODUCT(I_ID IN NUMBER, SV_NAME IN VARCHAR2, RETCODE NUMBER) AS I_INDEX INTEGER := 0; BEGIN ....... DELETE FROM TBL_A; SP_SUB_RMV_PRODUCT(I_INDEX, SV_NAME); --子存储过程1 ....... SP_SUB_ADD_PRODUCT(I_INDEX, SV_NAME, RETCODE); --子存储过程2 IF (NUMBER <> 0) RAISE EXCEPTION; END IF; ...... COMMIT; EXCEPTION WHEN others THEN ROLLBACK; END; --子存储过程1 CREATE OR REPLACE PROCEDURE SP_SUB_ADD_PRODUCT(I_ID IN NUMBER, SV_NAME IN VARCHAR2, RETCODE NUMBER) AS I_INDEX INTEGER := 0; BEGIN ....... COMMIT; --不应该出现的语句 EXCEPTION ...... END;