For example, your procedure called pro1
Method 1: pl / sql developer, then enter --pro1, in the process name right, select view
Method two: select text from user_source where name = 'PRO1'
SQL> desc user_source;
whether the name is null type?
------------- -------------- ------------ -
NAME VARCHAR2 (30)
the TYPE VARCHAR2 (12 is)
the LINE NUMBER
the TEXT VARCHAR2 (4000)