oracle查看存储过程代吗

select text from user_source a where a.name = 'pro_name' order by a.line;

select object_name from user_procedures;

select text from user_source a where a.name in (select object_name from user_procedures) order by a.name;