SQL> --
SQL>
SQL>
SQL>
SQL> select decode( type||'-'||to_char(line,'fm99999'),
2 'PACKAGE BODY-1', '/'||chr(10),
3 null) ||
4 decode(line,1,'create or replace ', '' ) ||
5 text text
6 from user_source
7 where name = upper('Your PackageName')
8 order by type, line;
no rows selected
SQL>
SQL>
SQL> --