By using db<>fiddle, you agree to license everything you submit by Creative Commons CC0.
DECLARE
TYPE maxarray IS VARRAY(10) OF NUMBER NOT NULL;
v_element maxarray := maxarray(1,5,4,3,6,2);
v_max NUMBER;
idx PLS_INTEGER;
BEGIN
idx := v_element.FIRST;
LOOP
EXIT WHEN idx IS NULL;
IF v_max IS NULL OR v_max < v_element(idx) THEN
v_max := v_element(idx);
END IF;
idx := v_element.NEXT(idx);
END LOOP;
DBMS_OUTPUT.PUT_LINE(v_max);
END;
/
1 rows affected
dbms_output:
6
DECLARE
TYPE maxarray IS VARRAY(10) OF NUMBER NOT NULL;
v_element maxarray := maxarray(1,5,4,3,6,2);
v_max NUMBER;
BEGIN
FOR i IN 1 .. v_element.COUNT LOOP
IF v_max IS NULL OR v_max < v_element(i) THEN
v_max := v_element(i);
END IF;
END LOOP;
DBMS_OUTPUT.PUT_LINE(v_max);
END;
/
1 rows affected
dbms_output:
6