scott@9i > column text format a40
scott@9i > break on name
scott@9i > select name,text from user_source order by name;

NAME                           TEXT
------------------------------ ----------------------------------------
FOO                            procedure foo
                               as
                               begin
                               null;
                               end;