Laborator 5. Colectii de date PL/SQL In multe limbaje de ...

Anca Ion, Proiectarea Bazelor de Date, 2010
ELSE
DBMS_OUTPUT.PUT_LINE('Inainte de initializare, vectorul nu este nul.');
END IF;
dept_names := dnames_var(); -- initializarea vectorului
IF dept_names IS NULL THEN
DBMS_OUTPUT.PUT_LINE('Dupa initializare, vectorul este nul.');
ELSE
DBMS_OUTPUT.PUT_LINE('Inainte de initializare, vectorul nu este nul.');
DBMS_OUTPUT.PUT_LINE('Vectorul are ' || dept_names.COUNT || ' elemente.');
END IF;
END;
o Cum accesam elementele din colectii
Fiecare referire la un element dintr-o colectie implica numele colectiei si indexul
(subscriptul) inchis intre paranteze rotunde.
collection_name(index)
unde index este o expresie care este un intreg in cele mai multe cazuri dar poate fi
si un VARCHAR2 pentru vectorii asociati in care cheile sunt declarate ca siruri de
caractere.
Limitele pentru subscript sunt:
Pentru tabele grupate: 1 .. 2147483647
Pentru vectori cu dim fixa 1 .. size_limit, (size_limit nu depaseste
2147483647).
Pentru vectorii asociati cu chei numerice -2147483648 la 2147483647.
Pentru vectorii asociati cu chei de tip string lungimea cheii depinde de
declaratia tipului VARCHAR2.
Exemplu:
DECLARE
TYPE Roster IS TABLE OF VARCHAR2(15);
names Roster := Roster('D Caruso', 'J Hamil', 'D Piro', 'R Singh');
BEGIN
FOR i IN names.FIRST .. names.LAST
LOOP
IF names(i) = 'J Hamil' THEN
DBMS_OUTPUT.PUT_LINE(names(i));
END IF;
END LOOP;
verify_name(names(3));
END;
--creati procedura
PROCEDURE list_name(the_name VARCHAR2) IS
BEGIN
DBMS_OUTPUT.PUT_LINE(the_name);
END;
Exemplu: