plgpriv.sps

来自「Oracle PL/SQL procedure generator (secon」· SPS 代码 · 共 112 行

CREATE OR REPLACE PACKAGE PLGpriv

/* PL/Generator Privilege Administration */

/*----------------------------------------------------------------
||                  PL/Generator from RevealNet 
||----------------------------------------------------------------
||    File: plgpriv.sps
||  Author: Steven Feuerstein
||
|| This is a part of the PL/Generator from RevealNet Code library.
|| Copyright (C) 1996-99 RevealNet, Inc.
|| All rights reserved.
||
|| For more information, call RevealNet at 1-800-REVEAL4
|| or check out our Web page: www.revealnet.com
-----------------------------------------------------------------*/

/***************** Modification History **************************
|| Date     By     Description
|| -------- ------ -----------------------------------------------
|| 04/98    SEF    Created in Kangaroo Island
******************************************************************/
IS
   /* Privilege Types */

   c_plgpriv CONSTANT CHAR(7) := 'PLGPRIV';
   defdrv CONSTANT CHAR(6)    := 'DEFDRV';
   moddrv CONSTANT CHAR(6)    := 'MODDRV';
   modobj CONSTANT CHAR(6)    := 'MODOBJ';
   modpriv CONSTANT CHAR(7)   := 'MODPRIV';
   delpriv CONSTANT CHAR(7)   := 'DELPRIV';
   deferr CONSTANT CHAR(6)    := 'DEFERR';
   allprivs CONSTANT CHAR(8)  := 'ALLPRIVS';

   PROCEDURE add (
      username IN VARCHAR2,
      tab IN VARCHAR2,
      sch IN VARCHAR2,
      privtype IN VARCHAR2
      );

   PROCEDURE remove (
      username IN VARCHAR2,
      tab IN VARCHAR2,
      sch IN VARCHAR2,
      privtype IN VARCHAR2
      );

   PROCEDURE add (
      username IN VARCHAR2,
      privtype IN VARCHAR2
      );

   PROCEDURE remove (
      username IN VARCHAR2,
      privtype IN VARCHAR2
      );

   FUNCTION granted (
      username IN VARCHAR2,
      tab IN VARCHAR2,
      sch IN VARCHAR2,
      privtype IN VARCHAR2
      )
      RETURN BOOLEAN;

   FUNCTION grantedN (
      username IN VARCHAR2,
      tab IN VARCHAR2,
      sch IN VARCHAR2,
      privtype IN VARCHAR2
      )
      RETURN INTEGER;

   FUNCTION granted (
      username IN VARCHAR2,
      privtype IN VARCHAR2
      )
      RETURN BOOLEAN;

   FUNCTION grantedN (
      username IN VARCHAR2,
      privtype IN VARCHAR2
      )
      RETURN INTEGER;

   PROCEDURE assert (
      tab IN VARCHAR2,
      sch IN VARCHAR2,
      privtype IN VARCHAR2
      );

   PROCEDURE assert (
      privtype IN VARCHAR2
      );

   PROCEDURE turn_on;
   PROCEDURE turn_off;
   FUNCTION checking RETURN BOOLEAN;

END PLGpriv;                      
/