Discussion :

[totofff78]

Bonjour,

Je n'ai trouvé que 2 moyens pour appeler une procédure stockée à partir d'un CLP ou CLLE.
Soit j'appelle un RPGLE qui appelle la procédure
Soit j'appelle un Query qui appelle la procédure.
Comment fait-on si c'est possible pour appeler une procédure directement par un CLP ou CLLE ?

J'ai essayé ça, mais je me suis fait jeter

CLP :

Code :

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

1
2
DCL        VAR(&MAIL1) TYPE(*CHAR) LEN(64) VALUE(toto@titi.fr')    
CALL       toto/TESTX (&MAIL1)

Procédure TESTX:

Code :

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

1
2
3
4
5
6
7
CREATE OR REPLACE PROCEDURE QGPL.testx(IN Mail1 CHAR(64))    
LANGUAGE SQL                                                   
BEGIN                                                          
DECLARE STM1  varchar(32000);                                  
DECLARE SQLCODE INTEGER DEFAULT 0;                             
        SET STM1 ='Test de passage de paramètre';              
END

L'appel se fait bien avec le paramètre qui va bien, mais j'ai une insulte du type :

Le texte du message pour MCH3601 est : Pointeur non défini pour
position mémoire référencée.. Utilisez la touche F10 (si elle est...

et pas plus d'info

Faut-il en déduire que ce n'est pas possible directement

[Darkzinus]

Pour l'appeler il faut qu'elle soit encapsulée dans des ordes SQL au sein du CL. (dans un QFMTSRC, un RUNSQL...)

[totofff78]

Merci Darkzinus, ça marche nickel

le code modifié

Code :

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

1
2
3
CHGVAR     VAR(&RESULT) VALUE('call testx(' *TCAT +      
             &qot *tcat &mail1 *tcat &qot *tcat ')')     
RUNSQL     SQL(&RESULT) COMMIT(*NONE)