PACKAGE PKG1

Function list:


1. FCN_SEQ1_GET_NEXT

Procedure list:


1. PRC_2
2. PRC_REF_CUR_TAB2

Constants list:


1. GC_MAGIC_DATE

Types list:


1. TYPE1

Subtypes list:


1. SUBTYPE1

CREATE OR REPLACE PACKAGE pkg1 IS

/* ***************************************************
  This is a sample of a reference cursor
  declared in a package
*************************************************** */
  TYPE type1 IS REF CURSOR /*=>*/
    RETURN tab2%ROWTYPE;

/* ***************************************************
  This is a sample of a subtype
  declared in a package
*************************************************** */
  SUBTYPE subtype1 IS CHAR;

/* ***************************************************
  This is a sample of a constant declared in a package
*************************************************** */
  gc_magic_date CONSTANT DATE /*=>*/
    := TO_DATE('10/10/1998','MM/DD/YYYY');

--- Returns the next value of SEQ1  
  FUNCTION fcn_seq1_get_next RETURN NUMBER;


/* ***************************************************
  This procedure returns a reference cursor pointing
  to a SELECT statement.
*************************************************** */
  PROCEDURE prc_ref_cur_tab2(iov_ref IN OUT type1);

/* ***************************************************
  This procedure is a sample of how reference cursors
  can be used.
*************************************************** */
  PROCEDURE prc_2;

END;
/