Parameters to Format the Output from DBA_SOURCE.

Set the Below Variables:

set verify off
set feedback off
set lines 132
set pages 0
set heading off
set space 0
set recsep off
column text format a79
column line noprint

select DECODE(line,1,'create or replace ','')||text, line
from dba_source where owner = upper('&&1')
and type = upper('&&2')
and name = upper('&&3')


REFER MOS NOTE:SCRIPT:REGENERATING PACKAGE and PROCEDURE CODE from DBA_SOURCE 
[ID 1012473.7]