Discussion :

[zivodul8]

Bonjour.

J'ai une cinquantaine de procédures stockées dans 9 packages différents et je souhaite récupérer l’ensemble des résultats en une seule fois.

Lorsque ma procédure me retourne un number, pas de souci, je passe par ça et ça fonctionne :

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
PROCEDURE tests_unitaires_values IS
 
result SYS_REFCURSOR;
volume number;
 
BEGIN
 
PKG_KPI_1_CARBURANT.Proc_1_5('YTD','FUSION','K904',null,null,null,null,null,null,null,null,null,result);
 
loop 
fetch result into Volume;
exit when result%NOTFOUND;
dbms_output.put_line(Volume);
end loop;
close result;
 
END tests_unitaires_values;
 
END PKG_TEST;

En revanche lorsque ma procédure me retour un tableau de valeurs (nombre de lignes pas forcément connu), impossible. J'ai tenté un get_lines mais sans succès et je suis bloqué sur ce point depuis un bon moment.

Auriez vous des suggestions à me proposer s'il vous plait?

J'espère que mon problème est assez clair.

PS : je suis novice en PL/SQL

[McM]

Quelle est la définition de PKG_KPI_1_CARBURANT.Proc_1_5 ?

[zivodul8]

Pour la PKG_KPI_1_CARBURANT.Proc_1_5 ça fonctionne car il n'y a qu'un seul retour. Sinon toutes mes procédures sont déclarées de la même façon :

Code :

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

1
2
3
4
5
6
7
    PROCEDURE Proc_1_5(
        periode IN VARCHAR2,
        ...
        siret IN VARCHAR2,
        debug IN INTEGER,
        result OUT SYS_REFCURSOR
    );

[McM]

Je n'ai pas de souci.

Procédure qui retourne soit 1 colonne 1 ligne, soit 1 colonne 2 lignes, soit 2 colonnes 2 lignes

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
CREATE OR REPLACE  PROCEDURE WMC ( p_type IN VARCHAR2, p_result OUT  sys_refcursor)
AS
  ret_cur sys_refcursor;
BEGIN
  IF p_type = 'un'
  THEN
    OPEN ret_cur FOR SELECT 1 FROM DUAL;
  ELSIF p_type = 'deux'
  THEN
    OPEN ret_cur FOR SELECT 1 FROM DUAL UNION ALL SELECT 2 FROM DUAL;
  ELSIF p_type = 'trois'
  THEN
    OPEN ret_cur FOR SELECT 1, 'a' FROM DUAL UNION ALL SELECT 2, 'b' FROM DUAL;
  END IF;
  p_result := ret_cur;
END;

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
DECLARE
	result SYS_REFCURSOR;
	volume number; col2 VARCHAR2(1);
BEGIN
	WMC('un',result);
  LOOP 
  FETCH result INTO Volume;
    exit WHEN result%NOTFOUND;
    dbms_output.put_line('un : ' || Volume);
  END LOOP;
	CLOSE result;
	WMC('deux',result);
  LOOP 
  FETCH result INTO Volume;
    exit WHEN result%NOTFOUND;
    dbms_output.put_line('deux : ' || Volume);
  END LOOP;
	CLOSE result;
	WMC('trois',result);
  LOOP 
  FETCH result INTO Volume, col2;
    exit WHEN result%NOTFOUND;
    dbms_output.put_line('trois : ' || Volume ||' # '|| col2);
  END LOOP;
	CLOSE result;
END;

Résultat correct

Code :

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

1
2
3
4
5
un : 1
deux : 1
deux : 2
trois : 1 # a
trois : 2 # b

[zivodul8]

Je ne connais pas à l'avance le nombre de colonnes ni le nombre de lignes. C'est pourquoi je ne peux pas appliquer cette méthodologie.

[McM]

Le nombre de ligne est géré par le curseur et la boucle LOOP

Si tu ne connais pas le nombre et type des colonnes, ce n'est pas possible.