Convertir Tables reçues d'une PS vers un Ref Cursor ? [Résolu]

[Olif_C]

Bonjour,

Voici mon problème : j'ai un package, contenant une PS, qui renvoie entre autres 2 tables de char :

Code :

1
2
3
4
5
6
7
	PROCEDURE ps_getListe(
		TYPE_LIST				IN char,
 
		NB_ITEMS				OUT INTEGER,
		CODES				OUT CODES_tbl,
		LIBS					OUT LIBS_tbl
	);

Mes types CODE_tbl et LIBS_tbl sont définis au niveau du schéma, comme suit :

Code :

1
2
TYPE CODES_tbl		AS TABLE OF char(4);
TYPE LIBS_tbl		AS TABLE OF char(50);

Seulement, .Net ne peut apparemment pas travailler directement sur des tables qui sont renvoyées en OUT d'une procédure. Je créée donc une fonction supérieure, qui récupérera le contenu de ma procédure, et le transformera en REF CURSOR (en tous cas, c'est ce que je voudrais faire) :

Code :

1
2
3
4
5
	TYPE lRefCursor IS REF CURSOR;
 
	FUNCTION fc_getListeDotNet(
		TYPE_LIST				IN char,
	) RETURN lRefCursor;

C'est possible, ce genre de choses ?
Malheureusement, je suis oblige de suivre ce process de fonction et de sous procédure pour différentes raisons internes, inévitables et inexplicables ici.

Merci d'avance pour votre aide !
Olif.

[mnitu]

C'est possible, par contre je ne suis pas convaincu que c'est une bonne idée.

[Edit]
Ah j’avais oublié, c’est quoi le « PS » : le parti socialiste, le play station, la procédure stockée, la procédure synchronisée ou la procédure stupide ?
[/Edit]

[Olif_C]

Possible, c'est un bon début, mais comment ?
Je suis bien conscient que ce n'est surement pas le meilleur moyen, mais j'ai actuellement des contraintes spécifiques qui m'imposent ces méthodes.
Sinon, quel(s) moyen(s) proposerais-tu, que je voie si ca peut coller ?

Pour le PS, c'est une procédure stockée, ton intuition était la bonne (à ma décharge, vu le contexte, ca me semblait assez logique, non ?)

[skuatamad]

Envoyé par Olif_C

Seulement, .Net ne peut apparemment pas travailler directement sur des tables qui sont renvoyées en OUT d'une procédure.

Je ne connais pas .Net mais le lien suivant semble contenir un exemple de ce que tu essaie de faire :
http://forums.oracle.com/forums/thre...93435&tstart=0

Dis-nous déjà si ça peut marcher ou si l'encapsulation est nécessaire.

[mnitu]

Voilà un example bidon.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
 
CREATE OR REPLACE FUNCTION foo RETURN sys_refcursor IS
  l_var sys.odcivarchar2list := sys.odcivarchar2list();
  l_crs sys_refcursor;
Begin
  l_var.extend(3);
  l_var(1) := 'un';
  l_var(2) := 'deux';
  l_var(3) := 'trois';
  --
  open l_crs FOR SELECT column_value FROM TABLE(l_var);
  RETURN l_crs;
End;

Et le test:

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
 
SQL*Plus: Release 10.2.0.4.0 - Production ON Mer. Juin 29 16:03:12 2011
 
Copyright (c) 1982, 2007, Oracle.  ALL Rights Reserved.
 
 
Connecté à :
Oracle DATABASE 10g Enterprise Edition Release 10.2.0.4.0 - 64bit Production
WITH the Partitioning, OLAP, DATA Mining AND Real Application Testing options
 
SQL> variable rc refcursor
SQL> SET autoprint ON
SQL> exec :rc := foo
 
Procédure PL/SQL terminée avec succès.
 
 
COLUMN_VALUE
--------------------------------------------------------------------------------
un
deux
trois
 
SQL>

Le PS n'est pas une abréviation habituelle sur ce forum. Mes réponses ne doivent pas dépendre de mes intuitions mais des vos énonces assez claires concernant votre question.

[Olif_C]

Envoyé par skuatamad

Je ne connais pas .Net mais le lien suivant semble contenir un exemple de ce que tu essaie de faire :
http://forums.oracle.com/forums/thre...93435&tstart=0

Dis-nous déjà si ça peut marcher ou si l'encapsulation est nécessaire.

Merci pour cette piste, mais cette solution passe par le connecteur Oracle du framework .Net, et j'utilise le connecteur ODBC. Inapplicable dans mon cas, malheureusement.

Mnitu, j’étais parti sur cette solution la, à un détail près : la PS me retourne 2 tables distinctes, que je dois donc renvoyer dans le Ref cursor de sortie. Pour résumer, ça ressemblerait plutôt à ceci :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
CREATE OR REPLACE FUNCTION foo RETURN sys_refcursor IS
  l_var sys.odcivarchar2list := sys.odcivarchar2list();
  l_var2 sys.odcivarchar2list := sys.odcivarchar2list();
  l_crs sys_refcursor;
Begin
  l_var.extend(3);
  l_var(1) := 'un';
  l_var(2) := 'deux';
  l_var(3) := 'trois';
  l_var2.extend(3);
  l_var2(1) := '1';
  l_var2(2) := '2';
  l_var2(3) := '3';
  --
  open l_crs FOR SELECT column_value FROM TABLE(l_var);
  RETURN l_crs;
End;

Et, dans le open du curseur, je dois récupérer ligne à ligne le contenu de chacune de mes tables, sous une forme qui ressemblerait, à peu pres, à ca :

Code :

1
2
3
4
5
6
 
COLUMN_VALUE        COLUMN2_VALUE
--------------------------------------------------------------------------------
un                          1
deux                       2
trois                        3

[mnitu]

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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
 
ConnectÚ Ó :
Oracle DATABASE 11g Enterprise Edition Release 11.2.0.1.0 - Production
WITH the Partitioning, OLAP, DATA Mining AND Real Application Testing options
 
mni@DIANA> CREATE OR REPLACE Type deux_col_typ AS Object (
  2    col1     varchar2(10),
  3    col2  Varchar2(10)
  4  )
  5  /
 
Type crÚÚ.
 
mni@DIANA> CREATE OR REPLACE Type deux_col_nt AS TABLE Of deux_col_typ
  2  /
 
Type crÚÚ.
 
mni@DIANA> CREATE OR REPLACE FUNCTION foo RETURN sys_refcursor IS
  2    l_var1 sys.odcivarchar2list;
  3    l_var2 sys.odcivarchar2list;
  4    l_deux_col  deux_col_nt := deux_col_nt();
  5    l_crs sys_refcursor;
  6    --
  7    Procedure init_2_tab (
  8       tab1_o              Out  sys.odcivarchar2list,
  9       tab2_o              Out  sys.odcivarchar2list
 10    ) IS
 11    Begin
 12      tab1_o := sys.odcivarchar2list();
 13      tab1_o.extend(3);
 14      tab1_o(1) := 'un';
 15      tab1_o(2) := 'deux';
 16      tab1_o(3) := 'trois';
 17      tab2_o := sys.odcivarchar2list();
 18      tab2_o.extend(3);
 19      tab2_o(1) := '1';
 20      tab2_o(2) := '2';
 21      tab2_o(3) := '3';
 22    End;
 23    --
 24  Begin
 25    -- proc qui renvoie les deux tableaux
 26    init_2_tab(l_var1, l_var2);
 27    --
 28    FOR i IN 1..l_var1.Count() Loop
 29       l_deux_col.extend;
 30       l_deux_col(i) := deux_col_typ(l_var1(i), l_var2(i));
 31    End Loop;
 32    --
 33    open l_crs FOR SELECT t.col1, t.col2 FROM TABLE(l_deux_col) t;
 34    RETURN l_crs;
 35  End;
 36  /
 
Fonction crÚÚe.
 
mni@DIANA> variable rc refcursor
mni@DIANA> SET autoprint ON
mni@DIANA> exec :rc := foo;
 
ProcÚdure PL/SQL terminÚe avec succÞs.
 
 
COL1       COL2
---------- ----------
un         1
deux       2
trois      3
 
mni@DIANA>

"

La PS

La PS

" continue à me faire penser à la playStation

[Olif_C]

Yes, un GRAND Merci, mnitu. J'ai enfin pu mettre en place cette fonction grâce à ton aide.
Ensuite, pour fêter ça, j'ai joué à la PS toute la soirée, puis suivi les évolutions des mammouths du PS une bonne partie de la nuit, lancé PS pour faire quelques photo-montages (ma grande passion), et enfin fini de coder ma PS appelée par cette fonction.

PS : Ceci étant, à nouveau, un grand merci pour ton aide .