Query Your Database for Stored Procedure DDL

SELECT A.text
  FROM syscomments A
 WHERE A.id = Object_Id(:sSP)
 ORDER BY colid

SELECT SUBSTR(text,1,Length(text) - 1), line
  FROM all_source
 WHERE type = 'PROCEDURE'
   AND owner = :sOwner
   AND name = :sSP

SELECT A.text
  FROM syscomments A, sysobjects B
 WHERE A.id = B.id
   AND B.id = Object_Id(:sSP)
 ORDER BY colid

IF (SELECT count(*)
      FROM sys.syscolumn c
      JOIN sys.sysdomain d ON c.domain_id=d.domain_id
      JOIN sys.systable t ON c.table_id=t.table_id
     WHERE t.table_id = (SELECT A.table_id
                           FROM sys.SYSTABLE A, dbo.sysusers B
                          WHERE Upper(A.table_name) =
                                Upper('SYSPROCEDURE')
                            AND A.creator = B.suid)
                            AND Upper(c.column_name) =
                                Upper('object_id')) > 0
BEGIN
    SELECT IsNull(source, proc_defn) as 'text'
      FROM SYSPROCEDURE
     WHERE object_id = Object_Id(:sSP)
END
ELSE
BEGIN
    SELECT IsNull(source, proc_defn) as 'text'
      FROM SYSPROCEDURE
     WHERE Cast(proc_id+200000 as integer) = Object_Id(:sSP)
END