Live ORACLE

DECLARE

  TYPE numlist IS TABLE OF NUMBER;

   n        NUMLIST := Numlist(1,3,5,7);

   counter  INTEGER;

BEGIN

  n.DELETE(2); -- Delete second element.

 

  -- When the subscripts have gaps, the loop logic is more extensive. We start at

  -- the first element, and keep looking for the next element until there are no more.

  counter := n.FIRST;

 

  WHILE counter IS NOT NULL  LOOP

    dbms_output.Put_line('Counting up: Element #'

                         ||counter

                         ||' = '

                         ||N(counter));

   

    counter := n.NEXT(counter);

  END LOOP;

 

  -- Run the same loop in reverse order.

  counter := n.LAST;

 

  WHILE counter IS NOT NULL  LOOP

    dbms_output.Put_line('Counting down: Element #'

                         ||counter

                         ||' = '

                         ||N(counter));

   

    counter := n.PRIOR(counter);

  END LOOP;

END;

/

Using NEXT to Access Elements of a Nested Table