|
SQL>
SQL> CREATE OR REPLACE PACKAGE process_vacations IS
2 TYPE pv_vacation_rec IS RECORD
3 (pv_vacationing_user_txt VARCHAR2(30),
4 pv_start_date VARCHAR2(10),
5 pv_end_date VARCHAR2(10),
6 pv_redirect_interviews_txt VARCHAR2(30),
7 pv_redirect_reviews_txt VARCHAR2(30));
8 TYPE pv_type_vacation_tab IS TABLE OF pv_vacation_rec
9 INDEX BY BINARY_INTEGER;
10 PROCEDURE process_schedules (p_vac_tab IN pv_type_vacation_tab);
11 END process_vacations;
12 /
Package created.
SQL>
SQL>
SQL> CREATE OR REPLACE PACKAGE BODY process_vacations IS
2
3 PROCEDURE process_schedules (p_vac_tab IN pv_type_vacation_tab) IS
4 BEGIN
5 FOR lv_loop_counter_num IN 1..p_vac_tab.COUNT LOOP
6 NULL;
7 END LOOP;
8 END process_schedules;
9 END process_vacations;
10 /
Package body created.
SQL>
|