Discussion :

[Michael#]

Bonjour,

Je voudrais retourner une collection à partir d'une fonction
Petit exemple de code :

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
 
CREATE OR REPLACE function maFonc
return tab_service
as
-- Collection de type nested table
type tab_service is table of varchar2(50);
tab1 tab_service;
nbre_total integer;
i integer;
begin
	 select count(*) into nbre_total from demande;
	 i := 1;
	 for srv_rec in (select unique(service) from demande) 
	 loop
		 if i = 1 then
		 	 tab1 := tab_service(srv_rec.service);
		 else
		 	 tab1.extend(1);
		 	 tab1(i) := srv_rec.service;
		 end if;
		 i := i + 1;
	 end loop;
 return tab1;
end;

Est-ce possible comme ça ou est-il préférable de créer un record?

[Michael#]

J'ai déclarer tab_sevice comme un nouveau type :

Code :

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

1
2
 
create or replace type tab_service as table of varchar2(50);

Maintenant, je peut faire un return mais j'ai un objet de type dataset en sortie (toad) dont je peux voir le type et le contenu dans sqlplus.

[SheikYerbouti]

Maintenant, je peut faire un return mais j'ai un objet de type dataset en sortie (toad) dont je peux voir le type et le contenu dans sqlplus.

s'agit-il d'une question ?

[Michael#]

Oui
En fait je n'ai pas encore réussi à exploiter ce dataset dans toad, je veux juste l'afficher dans l'onglet data toad.

[SheikYerbouti]

Une collection se parcours grâce à ces méthodes:

Code :

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

1
2
3
4
5
6
7
8
9
10
Declare
  Tableau tab_service  ;
Begin
  -- appel de la fonction --
  Tableau := mafonc ;
  -- traitement de la collection en retour --
  For i IN Tableau.First .. Tableau.Last Loop
    dbms_output.put_line( Tableau(i) ) ;
  End loop ;
End;

http://sheikyerbouti.developpez.com/...ap5[/code]