rem {{ $Header: L:\\\\model\\jin\\RCS\\jrilabel.jps 40.5 1998/11/26 11:24:17 wstallar Exp $
rem {{ -----------------------------------------------------------------------+
rem File:        $Workfile:   jrphlman.sql  $
rem Author:      $Author: wstallar $
rem Date:        $Date: 1998/11/26 11:24:17 $
rem Version:     $Revision: 40.5 $
rem Status:      $State: Exp $
rem Locked_by:   $Locker:  $
rem Project:     The Oracle Repository
rem Description: Generate version labels. This is string manipulation only.
rem Notes:
rem Notes:
rem RealAuth:    Patrick Lorrimer
rem IncepDate:   17 Sept 1997
rem Copyright:   (c) Oracle Corporation 1997. All Rights Reserved.
rem Tagline:         -- Repository: Managing *all* your data -+
rem --------------------------------------------------------------------------+
rem Log of Changes from Source Control System
rem --------------------------------------------------------------------------+
rem $Log: jrilabel.jps $
rem Revision 40.5  1998/11/26 11:24:17  wstallar
rem Removed redundant method check_in().
rem Removed redundant parameter from first
rem Added method next_check_out to generate new vlabels if current one is being
rem used.
rem Ammended method next() to generate labels based on root label and sequence of
rem node along branch.
rem
rem Revision 40.4  1998/08/17  15:51:34  wstallar
rem  Ammended version label service to cope with non-standard user input VLABELs
rem
rem Revision 40.3  1998/07/23  10:48:49  plorrime
rem see http://des2000.uk.oracle.com:8002/repos/specinfo/netdoc/version/release.htm
rem 	Moved description to http://des2000.uk.oracle.com:8002/repos/specinfo/netdoc/version/versnAPIdesc.htm
rem 	Made addition vlabels aotumatic or manual based on policy
rem 	Added automatic_vlabel_policy() and get_automatic_vlabel_policy
rem 	Removed exception generation at the version label level.
rem
rem Revision 40.2  1998/05/27  13:08:15  eharding
rem Moved reference JR_* PL/SQL from ClearCase
rem
rem
rem    Rev 1.1   14 Jan 1998 18:08:46   kmchorto
rem Restructuring: Checkpoint for Jon & DavidD
rem
rem    Rev 1.0   12 Jan 1998 20:36:40   kmchorto
rem Checkpoint for Schema Cutover
rem
rem    Rev 1.5   23 Sep 1997 16:22:40   plorrime
rem Disallow creation ob objects in checked in state.
rem
rem    Rev 1.4   23 Sep 1997 15:59:38   plorrime
rem Can now create with null vlabel. This is same as CO state.
rem
rem    Rev 1.3   22 Sep 1997 14:19:24   plorrime
rem Merge conflicts
rem
rem    Rev 1.2   19 Sep 1997 17:09:02   jgitterm
rem Comment changes
rem
rem    Rev 1.1   18 Sep 1997 11:16:52   jwetherb
rem Fix header to use rem instead of //
rem
rem    Rev 1.0   17 Sep 1997 17:32:10   plorrime
rem Initial revision.
rem }} -----------------------------------------------------------------------+
rem

prompt Package Header: jr_version_label
create or replace package jr_version_label is

  -- DESCRIPTION HAS BEEN MOVED TO THE WEB ON DES2000

   -----------------------------------------------------------+

  function first return VARCHAR2 ;
  function next  (i_root_label VARCHAR2, i_sequence number) return VARCHAR2 ;
  function branch(i_vlabel VARCHAR2, depth number) return VARCHAR2 ;
  function check_out(i_vlabel  VARCHAR2) return VARCHAR2 ;
  function next_check_out(i_vlabel VARCHAR2) return VARCHAR2;
  function is_invalid_label(i_vlabel in varchar2) return boolean ;

  procedure automatic_vlabel_policy   (i_enable boolean);
  function get_automatic_vlabel_policy return  boolean;
  function automatic_vlabel_policy return integer;

  PRAGMA RESTRICT_REFERENCES(first, WNPS, WNDS);
  PRAGMA RESTRICT_REFERENCES(next, WNPS, WNDS);
  PRAGMA RESTRICT_REFERENCES(branch, WNPS, WNDS);
  PRAGMA RESTRICT_REFERENCES(check_out, WNPS, WNDS);
  PRAGMA RESTRICT_REFERENCES(is_invalid_label, WNPS, WNDS);
  PRAGMA RESTRICT_REFERENCES(next_check_out, WNPS, WNDS);  


end ;
/


rem
rem ---------------------------------------------------------------------------+
rem }} End of file $Workfile:   jrphlman.sql  $  $$Header_is_done
rem ---------------------------------------------------------------------------+