Oracle PL/SQL операция над коллекциями MULTISET INTERSECT — Oracle PL/SQL •MySQL •MariaDB •SQL Server •SQLite

В этом учебном пособии вы узнаете, как использовать MULTISET INTERSECT в Oracle PL/SQL с синтаксисом и примерами.

Описание

В Oracle PL/SQL операция над коллекциями MULTISET INTERSECT возвращает пересечение двух коллекций

Синтаксис

Синтаксис MULTISET INTERSECT в Oracle PL/SQL:

nt1 MULTISET INTERSECT nt2

Параметры или аргументы

nt1, nt2 - коллекции для пересечения.

Примечание

Операции возможны только с коллекциями nested tables. Обе коллекции, которые участвуют в операции, должны быть одного типа. Результатом операции также является коллекция nested tables.

Пример

Рассмотрим пример операции над коллекциями MULTISET INTERSECT, чтобы понять, как использовать MULTISET INTERSECT в Oracle PL/SQL. Например:

DECLARE
    reslt varchar2(100); 
    TYPE nested_typ IS TABLE OF NUMBER;
    nt2 nested_typ := nested_typ(3,2,1);
    nt3 nested_typ := nested_typ(2,3,1,3,4);
    answer nested_typ; 
BEGIN 
    answer := nt2 MULTISET INTERSECT nt3;
    for iter in answer.first .. answer.last
      loop
        if iter = 1 then
          reslt:=answer(iter);
        else  
          reslt := reslt ||', '||to_char(answer(iter));
        end if;
      end loop;  
    dbms_output.put_line('nt2 MULTISET INTERSECT nt3 = '||reslt);
--Результат: nt2 MULTISET INTERSECT nt3 = 3, 2, 1
END;

DECLARE

reslt varchar2(100);

TYPE nested_typ IS TABLE OF NUMBER;

nt2 nested_typ := nested_typ(3,2,1);

nt3 nested_typ := nested_typ(2,3,1,3,4);

answer nested_typ;

BEGIN

answer := nt2 MULTISET INTERSECT nt3;

for iter in answer.first .. answer.last

loop

if iter = 1 then

reslt:=answer(iter);

else

reslt := reslt ||', '||to_char(answer(iter));

end if;

end loop;

dbms_output.put_line('nt2 MULTISET INTERSECT nt3 = '||reslt);

--Результат: nt2 MULTISET INTERSECT nt3 = 3, 2, 1

END;

Еще пример MULTISET INTERSECT со строковыми коллекциями.

DECLARE
    reslt varchar2(100); 
    TYPE nested_typ IS TABLE OF varchar2(20); 
    nt2 nested_typ := nested_typ('бета','гамма','альфа'); 
    nt3 nested_typ := nested_typ('бета','альфа','гамма','дельта');     
    answer nested_typ; 
BEGIN 
    answer := nt2 MULTISET INTERSECT nt3;
    for iter in answer.first .. answer.last
      loop
        if iter = 1 then
          reslt:=answer(iter);
        else
          reslt := reslt ||', '||answer(iter);
        end if;
      end loop;
    dbms_output.put_line('nt2 MULTISET INTERSECT nt3 = '||reslt);
--Результат: nt2 MULTISET INTERSECT nt3 = бета, гамма, альфа
END;