SQL> CREATE OR REPLACE PROCEDURE submultiset_example AS
2 TYPE charTable IS TABLE OF VARCHAR2(10);
3 emp1 charTable;
4 emp2 charTable;
5 emp3 charTable;
6 result BOOLEAN;
7 BEGIN
8 emp1 := charTable('A', 'B', 'C');
9 emp2 := charTable('C', 'D', 'E');
10
11 result := emp1 SUBMULTISET OF emp2;
12 IF result THEN
13 DBMS_OUTPUT.PUT_LINE('emp1 subset of emp2');
14 END IF;
15 END submultiset_example;
16 /
Procedure created.
SQL>
SQL>
|