The following code marks a standalone subprogram as autonomous.
SQL> SQL> drop table emp; Table dropped.-- w w w . j ava 2s .co m SQL> CREATE TABLE emp( 2 empid NUMBER(6), 3 first_name VARCHAR2(20), 4 last_name VARCHAR2(25), 5 email VARCHAR2(25), 6 phone_number VARCHAR2(20), 7 hire_date DATE, 8 job_id VARCHAR2(10), 9 salary NUMBER(8,2), 10 commission_pct NUMBER(2,2), 11 manager_id NUMBER(6), 12 department_id NUMBER(4)) ; SQL> SQL> INSERT INTO emp VALUES( 100, 'Steven', 'King', 'SKING', '123.123.4567', TO_DATE('17-JUN-1987', 'dd-MON-yyyy'), 'CODER', 24000, NULL, NULL, 10); SQL> INSERT INTO emp VALUES( 200, 'Joe', 'Lee', 'abc', '123.123.9999', TO_DATE('17-JUN-1980', 'dd-MON-yyyy'), 'TESTER', 25000, NULL, NULL, 20); SQL> SQL> SQL> CREATE OR REPLACE PROCEDURE lower_salary 2 (emp_id NUMBER, amount NUMBER) 3 AS 4 PRAGMA AUTONOMOUS_TRANSACTION; 5 BEGIN 6 UPDATE emp 7 SET salary = salary - amount 8 WHERE empid = emp_id; 9 10 COMMIT; 11 END lower_salary; 12 / Procedure created. SQL>