plgstk.sps

Oracle PL/SQL procedure generator (second generator type)

CREATE OR REPLACE PACKAGE PLGstk 
/*----------------------------------------------------------------
||                  PL/Vision Professional 
||----------------------------------------------------------------
||    File: PLGstk.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
||
******************************************************************/
IS
   defstk CONSTANT VARCHAR2(5) := 'stack';
   lifo CONSTANT VARCHAR2(4) := 'LIFO';
   fifo CONSTANT VARCHAR2(4) := 'FIFO';
   
   /* Remove the stack from memory. */
   PROCEDURE destroy (stack_in IN VARCHAR2 := defstk);

   /* Create a new stack. */
   PROCEDURE make 
      (stack_in IN VARCHAR2 := defstk,
      overwrite_in IN BOOLEAN := TRUE);

   /* Put a new item on the top of the stack. */
   PROCEDURE push
      (item_in IN VARCHAR2, stack_in IN VARCHAR2 := defstk);

   /* Pop an item off the top (LIFO) or bottom (FIFO) of the stack. */
   PROCEDURE pop 
      (value_out IN OUT VARCHAR2, 
       stack_in IN VARCHAR2 := defstk,
       stack_type_in IN VARCHAR2 := lifo); 

   FUNCTION nitems (stack_in IN VARCHAR2 := defstk) 
      RETURN INTEGER;

   FUNCTION itemin 
      (stack_in IN VARCHAR2, item_in IN VARCHAR2) RETURN BOOLEAN;

END PLGstk;
/
rem show errORS