Discussion :

[pwrdwnsys]

Bonjour.

Une procédure stockée interne possède 2 paramètres :

• inListOf
• OutNumber

La requête qui est réalisée possède une clause WHERE ... IN() :

Code :

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

select count(*) into OutNumber from table where cle in (inListOf)

Dans mon exemple, la colonne cle est alpha, mais j'aurais d'autres cas avec du numérique.
Cette syntaxe fonctionne s'il y a un seul élément en paramètre dans l'appel de la procédure :

Code :

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

call Procedure ('001', 0)

Mais s'il y en a deux, la requête ne fonctionne plus :

Code :

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

call Procedure ('001, 002', 0)

En effet, la requête exécutée est celle-ci :

Code :

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

select count(*) into OutNumber from table where cle in ('001, 002')

et évidemment, elle ne renvoie rien, car c'est celle-ci que je souhaite exécuter :

Code :

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

select count(*) into OutNumber from table where cle in ('001', '002')

J'aimerais ne pas avoir à faire une requête dynamique (prepare avec construction de l'instruction SQL) mais bien une requête statique.

Est-ce possible ? Quelqu'un a-t-il une solution pour les deux cas (colonne alpha et colonne numérique) ?
Merci.

[Macfurp]

Bonjour,

il me semble difficile de faire autre chose qu'un appel dynamique, sinon boucler de façon itérative sur les valeurs de clés pour réaliser autant de lectures que de clés en paramètre puis faire le cumul des différents COUNT(*)

[escartefigue]

sous réserve que le nombre maximal de valeurs à rechercher soit connu et pas trop grand, la solution est relativement simple, il faut utiliser une zone groupe composée de sous champs séparateurs(contenant les cotes et les virgules) et de sous-champs variables, puis de construire la requete à partir de la zone groupe

Les sous-champs variables inutilisés seront "comblés" avant appel comme dans l'exemple ci-dessous typé cobol, à adapter en fonction du langage

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
 
01  ZONE-PARM.
    02 FILLER        PIC X(01)   VALUE '''.
    02 ZONE-PARM-V1  PIC X(05)   VALUE SPACES.
    02 FILLER        PIC X(03)   VALUE '', '.   
    02 ZONE-PARM-V2  PIC X(05)   VALUE SPACES.
    02 FILLER        PIC X(03)   VALUE '', '.   
    02 ZONE-PARM-V3  PIC X(05)   VALUE SPACES.
    02 FILLER        PIC X(03)   VALUE '', '.   
    02 ZONE-PARM-V4  PIC X(05)   VALUE SPACES.
    02 FILLER        PIC X(03)   VALUE '', '.   
    02 ZONE-PARM-V5  PIC X(05)   VALUE SPACES.
    02 FILLER        PIC X(03)   VALUE '', '.   
01  ZONE-RQST    PIC X(500).
[...]
    MOVE ma-variable1 TO ZONE-PARM-V1  
    MOVE ma-variable2 TO ZONE-PARM-V2  
    MOVE ma-variable3 TO ZONE-PARM-V3 
*--- remplissage des variables inutilisées
    MOVE ma-variable3 TO ZONE-PARM-V4 
    MOVE ma-variable3 TO ZONE-PARM-V5
    STRING 'select count(*) into OutNumber from table where cle in ' ZONE-PARM
    DELIMITED BY SIZE INTO ZONE-RQST