[SQL0312] Erreur lors de la création d'une procédure SQL
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:
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,