SQL>
SQL> -- An example of an anonymous block.
SQL> -- Count up by hundreds until we get an error.
SQL>
SQL> DECLARE
2
3 hundreds_counter NUMBER(1,-2);
4 BEGIN
5 hundreds_counter := 100;
6 LOOP
7 DBMS_OUTPUT.PUT_LINE(hundreds_counter);
8 hundreds_counter := hundreds_counter + 100;
9 END LOOP;
10 EXCEPTION
11 WHEN OTHERS THEN
12 DBMS_OUTPUT.PUT_LINE('That is as high as you can go.');
13 END;
14 /
100
200
300
400
500
600
700
800
900
That is as high as you can go.
PL/SQL procedure successfully completed.
SQL>
|