plgstr.sps

Oracle PL/SQL procedure generator (second generator type)

CREATE OR REPLACE PACKAGE PLGstr
/*----------------------------------------------------------------
||                  PL/Vision Professional
||----------------------------------------------------------------
||    File: plvstr.sps
||  Author: Steven Feuerstein
||
|| This is a part of the PL/Vision Professional Code library.
|| Copyright (C) 1996-99 Quest Software, Inc.
|| All rights reserved.
||
|| For more information, call Quest Software at 1-800-REVEAL4
|| or check out our Web page: www.Quest Software.com
||
-----------------------------------------------------------------*/

/***************** Modification History **************************
|| Date     By     Description
||	-------- ------ -----------------------------------------------
|| 05/03/98 SEF    Added rpart and lpart.
|| 09/18/97 SEF    Fix algorithm for rvrs.
|| 06/25/97 SEF    Add gotoend for betwn.
|| 12/96    SEF    Created from PLV
*******************************************************************/
IS
   FUNCTION betwn
      (string_in IN VARCHAR2,
       start_in IN INTEGER,
       end_in IN INTEGER,
       inclusive IN BOOLEAN := TRUE)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (betwn, WNDS);

   FUNCTION betwn
      (string_in IN VARCHAR2,
       start_in IN VARCHAR2,
       end_in IN VARCHAR2 := NULL,
       startnth_in IN INTEGER := 1,
       endnth_in IN INTEGER := 1,
       inclusive IN BOOLEAN := TRUE,
       gotoend IN BOOLEAN := FALSE)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (betwn, WNDS);

   PROCEDURE swap
      (string_inout IN OUT VARCHAR2,
       replace_in IN VARCHAR2,
       start_in IN INTEGER := 1,
       oldlen_in IN INTEGER := NULL);
   PRAGMA RESTRICT_REFERENCES (swap, WNDS);

   FUNCTION swap
      (string_in IN VARCHAR2,
       replace_in IN VARCHAR2,
       start_in IN INTEGER := 1,
       oldlen_in IN INTEGER := NULL)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (swap, WNDS);

   FUNCTION lstrip
      (string_in IN VARCHAR2,
       substring_in IN VARCHAR2,
       num_in IN INTEGER := 1)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (lstrip, WNDS);

   FUNCTION rstrip
      (string_in IN VARCHAR2,
       substring_in IN VARCHAR2,
       num_in IN INTEGER := 1)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (rstrip, WNDS);

   FUNCTION lpart
      (string_in IN VARCHAR2,
       divider_in IN VARCHAR2,
       start_in IN INTEGER := 1,
       nth_in IN INTEGER := 1,
       all_if_notfound_in IN BOOLEAN := FALSE)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (lpart, WNDS);

   FUNCTION rpart
      (string_in IN VARCHAR2,
       divider_in IN VARCHAR2,
       start_in IN INTEGER := 1,
       nth_in IN INTEGER := 1,
       all_if_notfound_in IN BOOLEAN := FALSE)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (rpart, WNDS);

   FUNCTION rvrs (string_in IN VARCHAR2,
      start_in IN INTEGER := 1,
      end_in IN INTEGER := NULL,
      embed_in IN BOOLEAN := FALSE)
   RETURN VARCHAR2;

   FUNCTION rvrs_old (string_in IN VARCHAR2,
      start_in IN INTEGER := 1,
      end_in IN INTEGER := NULL)
   RETURN VARCHAR2;
   PRAGMA RESTRICT_REFERENCES (rvrs, WNDS);

END PLGstr;
/
rem show errors