有没有办法在oracle中进行选择性提交？

我有一个PL/SQL脚本，它运行一堆命令，并在最后调用commit。有没有办法在oracle中进行选择性提交？

select count(*) into countCol from USER_TAB_COLUMNS where TABLE_NAME = 'EVAPP_CARLETON_RESULT' and COLUMN_NAME = 'AMTFIN' and DATA_SCALE is null; 
IF (countCol <> 0) then 

execute immediate 'alter table EVAPP_CARLETON_RESULT add AMTFIN_TMP NUMBER(10,2)' ; 

execute immediate 'update EVAPP_CARLETON_RESULT set AMTFIN_TMP = AMTFIN' ; 

execute immediate 'alter table EVAPP_CARLETON_RESULT drop column AMTFIN' ; 

execute immediate 'alter table EVAPP_CARLETON_RESULT rename column AMTFIN_TMP to AMTFIN' ; 


DBMS_OUTPUT.put_line('This column EVAPP_CARLETON_RESULT.AMTFIN has been modified to the required precision'); 
END IF; 
logger('68'); 

evaluate.commitScript;

在此之前有68个这样的块，但evaluate.commitScript在最后被调用。

但是，记录器在每个这样的块之后被调用，并且它内部有一个提交语句。

create or replace 
PROCEDURE LOGGER 
(MESSAGE1 IN VARCHAR2 ) AS 
pragma autonomous_transaction; 
    BEGIN 
    insert into message_log (datetime, message) values (sysdate, message1); 
    commit; 
    END LOGGER;

该提交同时提交所有更改。不仅仅是程序所做的更改。无论如何，我们可以选择性地调用提交吗？

来源

2012-02-17 roymustang86