PL/SQL: Comment déclarer des variables de session?

Question

Comment déclarer une variable de session en PL/SQL - une variable qui ne durera que pendant la durée de la session, sans que je doive la stocker dans la base de données elle-même?

Answer 1

Vous créez une variable de niveau de package. Ceci est un exemple minimal:

CREATE OR REPLACE PACKAGE my_package 
AS 
    FUNCTION get_a RETURN NUMBER; 
END my_package; 
/

CREATE OR REPLACE PACKAGE BODY my_package 
AS 
    a NUMBER(20); 

    FUNCTION get_a 
    RETURN NUMBER 
    IS 
    BEGIN 
     RETURN a; 
    END get_a; 
END my_package; 
/

Si vous faites cela, vous devriez lire sur (et gérer correctement) ORA-04068 erreurs. Chaque session de base de données aura sa propre valeur pour un. Vous pouvez essayer avec:

SELECT my_package.get_a FROM DUAL; 

Answer 2

Vous pouvez utiliser un « contexte créé par l'utilisateur » pour stocker des données partagées entre plusieurs unités au sein d'une session.

D'abord, créer un contexte:

CREATE CONTEXT SYS_CONTEXT ('userenv', 'current_schema')|| '_ctx' USING PKG_COMMON 

Deuxièmement, créer un package qui gérerait votre contexte:

CREATE OR REPLACE PACKAGE PKG_COMMON 
IS 
    common_ctx_name CONSTANT VARCHAR2 (60) 
       := SYS_CONTEXT ('userenv', 'current_schema') 
        || '_ctx'; 

    FUNCTION fcn_get_context_name RETURN VARCHAR2; 
    PROCEDURE prc_set_context_value (var_name VARCHAR2, var_value NUMBER); 
END; 

CREATE OR REPLACE PACKAGE BODY PKG_COMMON 
IS 
    FUNCTION fcn_get_context_name 
     RETURN VARCHAR2 
    IS 
    BEGIN 
     RETURN common_ctx_name; 
    END; 

    PROCEDURE prc_set_context_value (var_name VARCHAR2, var_value NUMBER) 
    IS 
    BEGIN 
     DBMS_SESSION.set_context (common_ctx_name, var_name, var_value); 
    END; 
END; 

Le prc_set_context_value peut être plus avancé, c'est juste un exemple. Avec le contexte et le paquet créé, vous pouvez commencer à les utiliser. Définir une variable de contexte à l'aide d'un appel de procédure

begin 
    PKG_COMMON.prc_set_context_value('MyVariable', 9000) 
end; 

et l'utiliser partout - toute procédure, package, fonction ou événement en vue.

CREATE VIEW V_TEST AS 
    SELECT ID, LOGIN, NAME 
    FROM USERS 
    WHERE ROLE_ID = SYS_CONTEXT(PKG_COMMON.FCN_GET_CONTEXT_NAME, 'MyVariable') 

Pour plus d'informations, consultez http://www.psoug.org/reference/sys_context.html