Oracle PL/SQL/Stored Procedure Function/exec
Exec: execute a procedure
SQL>
SQL> set serverout on;
SQL>
SQL> -- Displaying "Hello World!" to the screen.
SQL>
SQL> CREATE OR REPLACE PROCEDURE HELLO AS
2 BEGIN
3 DBMS_OUTPUT.PUT_LINE("Hello World! " ||
4 TO_CHAR(SYSDATE,"MM-DD-YY HH:MI:SS AM"));
5 END;
6 /
SQL>
SQL> exec HELLO();
Hello World! 09-09-06 07:23:06 PM
SQL>
Procedure without parameters
SQL>
SQL> CREATE or replace PROCEDURE my_first_proc IS
2 greetings VARCHAR2(20);
3 BEGIN
4 greetings := "Hello World";
5 dbms_output.put_line(greetings);
6 END my_first_proc;
7 /
Procedure created.
SQL>
SQL>
SQL> set serveroutput on
SQL> EXECUTE my_first_proc;
Hello World
PL/SQL procedure successfully completed.
SQL>
SQL> BEGIN
2 my_first_proc;
3 END;
4 /
Hello World
PL/SQL procedure successfully completed.
SQL>
SQL>
Use EXEC to execute a Stored Procedure
SQL>
SQL>
SQL> CREATE TABLE EMP (EMPNO NUMBER(4) NOT NULL,
2 ENAME VARCHAR2(10),
3 JOB VARCHAR2(9),
4 MGR NUMBER(4),
5 HIREDATE DATE,
6 SAL NUMBER(7, 2),
7 COMM NUMBER(7, 2),
8 DEPTNO NUMBER(2));
Table created.
SQL>
SQL> INSERT INTO EMP VALUES (7369, "SMITH", "CLERK", 7902, TO_DATE("17-DEC-1980", "DD-MON-YYYY"), 800, NULL, 20);
1 row created.
SQL> INSERT INTO EMP VALUES (7499, "ALLEN", "SALESMAN", 7698, TO_DATE("20-FEB-1981", "DD-MON-YYYY"), 1600, 300, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7521, "WARD", "SALESMAN", 7698, TO_DATE("22-FEB-1981", "DD-MON-YYYY"), 1250, 500, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7566, "JONES", "MANAGER", 7839, TO_DATE("2-APR-1981", "DD-MON-YYYY"), 2975, NULL, 20);
1 row created.
SQL> INSERT INTO EMP VALUES (7654, "MARTIN", "SALESMAN", 7698,TO_DATE("28-SEP-1981", "DD-MON-YYYY"), 1250, 1400, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7698, "BLAKE", "MANAGER", 7839,TO_DATE("1-MAY-1981", "DD-MON-YYYY"), 2850, NULL, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7782, "CLARK", "MANAGER", 7839,TO_DATE("9-JUN-1981", "DD-MON-YYYY"), 2450, NULL, 10);
1 row created.
SQL> INSERT INTO EMP VALUES (7788, "SCOTT", "ANALYST", 7566,TO_DATE("09-DEC-1982", "DD-MON-YYYY"), 3000, NULL, 20);
1 row created.
SQL> INSERT INTO EMP VALUES (7839, "KING", "PRESIDENT", NULL,TO_DATE("17-NOV-1981", "DD-MON-YYYY"), 5000, NULL, 10);
1 row created.
SQL> INSERT INTO EMP VALUES (7844, "TURNER", "SALESMAN", 7698,TO_DATE("8-SEP-1981", "DD-MON-YYYY"), 1500, 0, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7876, "ADAMS", "CLERK", 7788,TO_DATE("12-JAN-1983", "DD-MON-YYYY"), 1100, NULL, 20);
1 row created.
SQL> INSERT INTO EMP VALUES (7900, "JAMES", "CLERK", 7698,TO_DATE("3-DEC-1981", "DD-MON-YYYY"), 950, NULL, 30);
1 row created.
SQL> INSERT INTO EMP VALUES (7902, "FORD", "ANALYST", 7566,TO_DATE("3-DEC-1981", "DD-MON-YYYY"), 3000, NULL, 20);
1 row created.
SQL> INSERT INTO EMP VALUES (7934, "MILLER", "CLERK", 7782,TO_DATE("23-JAN-1982", "DD-MON-YYYY"), 1300, NULL, 10);
1 row created.
SQL>
SQL> select * from emp;
EMPNO ENAME JOB MGR
---------- ---------- --------- ----------
HIREDATE SAL COMM
-------------------- ---------- ----------
DEPTNO
----------
7369 SMITH CLERK 7902
17-DEC-1980 00:00:00 800
20
7499 ALLEN SALESMAN 7698
20-FEB-1981 00:00:00 1600 300
30
7521 WARD SALESMAN 7698
22-FEB-1981 00:00:00 1250 500
30
7566 JONES MANAGER 7839
02-APR-1981 00:00:00 2975
20
7654 MARTIN SALESMAN 7698
28-SEP-1981 00:00:00 1250 1400
30
7698 BLAKE MANAGER 7839
01-MAY-1981 00:00:00 2850
30
7782 CLARK MANAGER 7839
09-JUN-1981 00:00:00 2450
10
7788 SCOTT ANALYST 7566
09-DEC-1982 00:00:00 3000
20
7839 KING PRESIDENT
17-NOV-1981 00:00:00 5000
10
EMPNO ENAME JOB MGR
---------- ---------- --------- ----------
HIREDATE SAL COMM
-------------------- ---------- ----------
DEPTNO
----------
7844 TURNER SALESMAN 7698
08-SEP-1981 00:00:00 1500 0
30
7876 ADAMS CLERK 7788
12-JAN-1983 00:00:00 1100
20
7900 JAMES CLERK 7698
03-DEC-1981 00:00:00 950
30
7902 FORD ANALYST 7566
03-DEC-1981 00:00:00 3000
20
7934 MILLER CLERK 7782
23-JAN-1982 00:00:00 1300
10
14 rows selected.
SQL>
SQL> CREATE OR REPLACE PROCEDURE emp_change_s (i_emp_id IN integer)
2 AS BEGIN
3 UPDATE emp
4 set ename = "S"
5 WHERE empno = i_emp_id;
6 END emp_change_s;
7 /
Procedure created.
SQL> show error
No errors.
SQL>
SQL> exec emp_change_s(7369);
PL/SQL procedure successfully completed.
SQL>
SQL>
SQL> drop table emp;
Table dropped.
SQL>
SQL> --