|
SQL>
SQL> CREATE OR REPLACE PACKAGE valerr
2 IS
3 FUNCTION get RETURN VARCHAR2;
4 END valerr;
5 /
Package created.
SQL>
SQL> CREATE OR REPLACE PACKAGE BODY valerr
2 IS
3 v VARCHAR2(1);
4
5 FUNCTION get RETURN VARCHAR2 -- Added Line
6 IS
7 BEGIN
8 RETURN v;
9 END;
10 BEGIN
11 v := 'ABC';
12
13 EXCEPTION
14 WHEN OTHERS
15 THEN
16 DBMS_OUTPUT.PUT_LINE ('Error initializing valerr:');
17 DBMS_OUTPUT.PUT_LINE (SQLERRM);
18
19 END valerr;
20 /
Package body created.
SQL>
SQL>
SQL>
|