|
SQL>
SQL>
SQL> CREATE OR REPLACE PROCEDURE println (val IN VARCHAR2)
2 IS
3 BEGIN
4 IF LENGTH (val) > 80
5 THEN
6
7 DBMS_OUTPUT.PUT_LINE (SUBSTR (val, 1, 80));
8
9 println (SUBSTR (val, 81));
10
11 ELSE
12
13 DBMS_OUTPUT.PUT_LINE (val);
14
15 END IF;
16
17 EXCEPTION
18
19 WHEN OTHERS
20
21 THEN
22
23 DBMS_OUTPUT.ENABLE (1000000);
24
25 println (val);
26 END;
27 /
Procedure created.
SQL>
|