Oracle PL/SQL/System Tables Views/dba source

Query dba_source table

   <source lang="sql">

SQL> SQL> SQL> SQL> set feedback on SQL> set heading off SQL> set termout off SQL> set linesize 1000 SQL> set trimspool on SQL> set verify off SQL> SQL> select decode( type||"-"||to_char(line,"fm99999"),

 2                 "PACKAGE BODY-1", "/"||chr(10),
 3                  null) ||
 4         decode(line,1,"create or replace ", "" ) ||
 5         text text
 6    from dba_source
 7   where rownum < 50;

create or replace TYPE re$nv_list

                                                                      AS OBJECT

( actx_list sys.re$nv_array,

 MEMBER PROCEDURE add_pair(name IN varchar2, value IN sys.anydata),
 MEMBER PROCEDURE remove_pair(name IN varchar2),
 MEMBER FUNCTION  get_value(name IN varchar2) RETURN sys.anydata,
 MEMBER FUNCTION  get_all_names RETURN sys.re$name_array

) create or replace package STANDARD AUTHID CURRENT_USER is -- careful on this line; SED edit occurs!

 /********** Types and subtypes, do not reorder **********/
 type BOOLEAN is (FALSE, TRUE);
 type DATE is DATE_BASE;
 type NUMBER is NUMBER_BASE;
 subtype FLOAT is NUMBER; -- NUMBER(126)
 subtype REAL is FLOAT; -- FLOAT(63)
 subtype "DOUBLE PRECISION" is FLOAT;
 subtype INTEGER is NUMBER(38,0);
 subtype INT is INTEGER;
 subtype SMALLINT is NUMBER(38,0);
 subtype DECIMAL is NUMBER(38,0);
 subtype NUMERIC is DECIMAL;
 subtype DEC is DECIMAL;

 subtype BINARY_INTEGER is INTEGER range "-2147483647"..2147483647;
 subtype NATURAL is BINARY_INTEGER range 0..2147483647;
 subtype NATURALN is NATURAL not null;
 subtype POSITIVE is BINARY_INTEGER range 1..2147483647;
 subtype POSITIVEN is POSITIVE not null;
 subtype SIGNTYPE is BINARY_INTEGER range "-1"..1;  -- for SIGN functions
 type VARCHAR2 is NEW CHAR_BASE;
 subtype VARCHAR is VARCHAR2;
 subtype STRING is VARCHAR2;
 subtype LONG is VARCHAR2(32760);
 subtype RAW is VARCHAR2;
 subtype "LONG RAW" is RAW(32760);
 subtype ROWID is VARCHAR2(256);
 -- Ansi fixed-length char
 -- Define synonyms for CHAR and CHARN.
 subtype CHAR is VARCHAR2;

49 rows selected. SQL> SQL> set feedback on SQL> set heading on SQL> set termout on SQL> set linesize 100 SQL> SQL> --

</source>