Overloading Packaged Subprograms

    

SQL>
SQL>
SQL> CREATE TABLE myStudent (
  2    student_id NUMBER(5) NOT NULL,
  3    department CHAR(3)   NOT NULL,
  4    course     NUMBER(3) NOT NULL,
  5    grade      CHAR(1)
  6    );

Table created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10000, 'CS', 102, 'A');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10002, 'CS', 102, 'B');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10003, 'CS', 102, 'C');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10000, 'HIS', 101, 'A');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10001, 'HIS', 101, 'B');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10002, 'HIS', 101, 'B');

1 row created.

SQL>
SQL> INSERT INTO myStudent (student_id, department, course, grade)
  2                           VALUES (10003, 'HIS', 101, 'A');

1 row created.

SQL>
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 lecturer (
  2    id               NUMBER(5) PRIMARY KEY,
  3    first_name       VARCHAR2(20),
  4    last_name        VARCHAR2(20),
  5    major            VARCHAR2(30),
  6    current_credits  NUMBER(3)
  7    );

Table created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10001, 'Scott', 'Lawson','Computer Science', 11);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major, current_credits)
  2                VALUES (10002, 'Mar', 'Wells','History', 4);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10003, 'Jone', 'Bliss','Computer Science', 8);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10004, 'Man', 'Kyte','Economics', 8);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10005, 'Pat', 'Poll','History', 4);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10006, 'Tim', 'Viper','History', 4);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10007, 'Barbara', 'Blues','Economics', 7);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10008, 'David', 'Large','Music', 4);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10009, 'Chris', 'Elegant','Nutrition', 8);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10010, 'Rose', 'Bond','Music', 7);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10011, 'Rita', 'Johnson','Nutrition', 8);

1 row created.

SQL>
SQL> INSERT INTO lecturer (id, first_name, last_name, major,current_credits)
  2                VALUES (10012, 'Sharon', 'Clear','Computer Science', 3);

1 row created.

SQL>
SQL> CREATE OR REPLACE PACKAGE ClassPackage AS
  2    PROCEDURE AddStudent(p_ID  IN lecturer.id%TYPE,
  3                         p_Department IN session.department%TYPE,
  4                         p_Course     IN session.course%TYPE);
  5
  6    PROCEDURE AddStudent(p_FirstName IN lecturer.first_name%TYPE,
  7                         p_LastName  IN lecturer.last_name%TYPE,
  8                         p_Department IN session.department%TYPE,
  9                         p_Course     IN session.course%TYPE);
 10
 11  END ClassPackage;
 12  /

Package created.

SQL>
SQL> CREATE OR REPLACE PACKAGE BODY ClassPackage AS
  2    PROCEDURE AddStudent(p_ID  IN lecturer.id%TYPE,
  3                         p_Department IN session.department%TYPE,
  4                         p_Course     IN session.course%TYPE) IS
  5    BEGIN
  6      INSERT INTO myStudent (student_id, department, course)
  7        VALUES (p_ID, p_Department, p_Course);
  8      COMMIT;
  9    END AddStudent;
 10
 11    PROCEDURE AddStudent(p_FirstName IN lecturer.first_name%TYPE,
 12                         p_LastName  IN lecturer.last_name%TYPE,
 13                         p_Department IN session.department%TYPE,
 14                         p_Course     IN session.course%TYPE) IS
 15      myLecturerID lecturer.ID%TYPE;
 16    BEGIN
 17      SELECT ID
 18        INTO myLecturerID
 19        FROM lecturer
 20        WHERE first_name = p_FirstName
 21        AND last_name = p_LastName;
 22
 23      INSERT INTO myStudent (student_id, department, course)
 24        VALUES (myLecturerID, p_Department, p_Course);
 25      COMMIT;
 26    END AddStudent;
 27
 28  END ClassPackage;
 29  /

Package body created.

SQL> drop table myStudent;

Table dropped.

SQL> drop table session;

Table dropped.

SQL> drop table lecturer;

Table dropped.

Related examples in the same category

1.	Create a package declaration and create its body after
2.	Create a package level variable
3.	call utitilities package
4.	Package for output employee table and log message
5.	Package with package level cursor variable
6.	A PL/SQL package with two methods
7.	Package level Exception
8.	This package will not compile because the body does not match the specification.
9.	dependencies between an anonymous calling block and package runtime state.
10.	RESTRICT_REFERENCES pragma.
11.	Without RESTRICT_REFERENCES pragma.
12.	Persistance of packaged variables.
13.	A package with one method
14.	Package level variable as global level variable
15.	Global definition
16.	Student fetch package
17.	Cursor operation between package functions
18.	The pragma is not valid at the package level.
19.	Create package and member cursor
20.	Nested package reference
21.	Overloaded packages.
22.	Overloading based on user defined object types.
23.	package RECURSION
24.	Crosss reference between two packages
25.	Counter package
26.	Package initialization.
27.	Packages allows forward references, thus opening the possibilities for recursion.
28.	Use package level type as global variables
29.	Use package member variable to pass value

Overloading Packaged Subprograms : Package « PL SQL « Oracle PL / SQL

Related examples in the same category