Calling a Function : Function Call « Stored Procedure Function « Oracle PL / SQL

1. Oracle PL / SQL
2. Stored Procedure Function
3. Function Call

Calling a Function

 
SQL>
SQL>
SQL> CREATE TABLE session (
  2    department       CHAR(3),
  3    course           NUMBER(3),
  4    description      VARCHAR2(2000),
  5    max_lecturer     NUMBER(3),
  6    current_lecturer NUMBER(3),
  7    num_credits      NUMBER(1),
  8    room_id          NUMBER(5)
  9    );

Table created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('HIS', 101, 'History 101', 30, 11, 4, 20000);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('HIS', 301, 'History 301', 30, 0, 4, 20004);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('CS', 101, 'Computer Science 101', 50, 0, 4, 20001);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('ECN', 203, 'Economics 203', 15, 0, 3, 20002);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('CS', 102, 'Computer Science 102', 35, 3, 4, 20003);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('MUS', 410, 'Music 410', 5, 4, 3, 20005);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('ECN', 101, 'Economics 101', 50, 0, 4, 20007);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('NUT', 307, 'Nutrition 307', 20, 2, 4, 20008);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('MUS', 100, 'Music 100', 100, 0, 3, NULL);

1 row created.

SQL>
SQL>
SQL> CREATE TABLE MyTable (
  2    num_col    NUMBER,
  3    char_col   VARCHAR2(60)
  4    );

Table created.

SQL>
SQL>
SQL> CREATE OR REPLACE FUNCTION AlmostFull (
  2    p_Department session.department%TYPE,
  3    p_Course     session.course%TYPE)
  4    RETURN BOOLEAN IS
  5
  6    studentCount NUMBER;
  7    studentMax     NUMBER;
  8    v_ReturnValue     BOOLEAN;
  9    v_FullPercent     CONSTANT NUMBER := 90;
 10  BEGIN
 11    SELECT current_lecturer, max_lecturer
 12      INTO studentCount, studentMax
 13      FROM session
 14      WHERE department = p_Department
 15      AND course = p_Course;
 16
 17    IF (studentCount / studentMax * 100) > v_FullPercent THEN
 18      v_ReturnValue := TRUE;
 19    ELSE
 20      v_ReturnValue := FALSE;
 21    END IF;
 22
 23    RETURN v_ReturnValue;
 24  END AlmostFull;
 25  /

Function created.

SQL>
SQL> DECLARE
  2    CURSOR c_session IS
  3      SELECT department, course
  4        FROM session;
  5  BEGIN
  6    FOR v_ClassRecord IN c_session LOOP
  7      IF AlmostFull(v_ClassRecord.department, v_ClassRecord.course) THEN
  8        INSERT INTO MyTable (char_col) VALUES
  9          (v_ClassRecord.department || ' ' || v_ClassRecord.course ||
 10           ' is almost full!');
 11      END IF;
 12    END LOOP;
 13  END;
 14  /

PL/SQL procedure successfully completed.

SQL>
SQL> select * from MyTable;

no rows selected

SQL>
SQL> drop table session;

Table dropped.

SQL>
SQL> drop table MyTable;

Table dropped.

 

Related examples in the same category