Oracle PL/SQL - Declaring Autonomous Standalone Procedure

Introduction

The following code marks a standalone subprogram as autonomous.

Demo

SQL>
SQL> drop table emp;

Table dropped.-- from   www . j a v a 2s.com

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>

Related Topic