Discussion :

[Bibendum41]

Bonjour à tous,

Je chercher à développer une procédure SQL, mais je rencontre l'erreur suivante:

Message : [SQL0312] Variable BIBCIBLE non définie ou non utilisable.

Voici le script de ma procédure:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
CREATE OR REPLACE PROCEDURE MNSEC.STRJRNGRC(IN ENV CHAR(3)) 
    LANGUAGE SQL
 
BEGIN 
    DECLARE BIBCIBLE VARCHAR(128);
    DECLARE OBJ VARCHAR(128);  
 
    DECLARE WRETCODE INT DEFAULT 0 ;        -- Gestion des erreurs SQL
 
--šgestion des erreurs 
    DECLARE CONTINUE HANDLER FOR SQLEXCEPTION , SQLWARNING , NOT FOUND SET WRETCODE = SQLCODE ;     
 
--Requete pour la liste des objets à journaliser   
 
    SET BIBCIBLE = 'GRC' CONCAT(ENV) CONCAT('FIC');
 
    IF EXISTS (SELECT NAME FROM QSYS2.SYSTABLES WHERE TABLE_SCHEMA = 'EXPICIF' AND TABLE_NAME = 'JRNGRCARI') THEN           
        DROP TABLE EXPICIF.JRNGRCARI;                             
    END IF;
    CREATE TABLE EXPICIF.JRNGRCARI AS 
                    (select TABLE_SCHEMA AS BIB, TABLE_NAME as NOM_LONG, SYSTEM_TABLE_NAME as NOM_COURT 
                    from qsys2.systables A 
                    LEFT JOIN grcarific.GRCTRFP020 B 
                    ON A.SYSTEM_TABLE_NAME = B.NMOBJT 
                    WHERE B.NMOBJT IS NULL and  A.TABLE_SCHEMA = BIBCIBLE and TABLE_TYPE = 'T') WITH DATA;
 
END;

Je suis preneur de toute âme charitable qui m'aiderai ^^
Merci,

[vazymimil]

Bonjour,

L'utilisation de variable de script dans un select de CREATE TABLE AS n'est pas permis comme la documentation (mais pas le message) l'indique :

The select-statement must not reference variables, but may reference global variables.

La solution la plus proche est de faire un CREATE TABLE AS ... WITH NO DATA puis un INSERT qui lui aura droit à la vaiable

[Darkzinus]

Bonjour, pour contourner le problème tu peux passer par une instruction set (tu mets ton instruction SQL sous forme de chaine de caractères) puis prepare et enfin execute.