Discussion :

[doukem]

Bonjour,

Je cherchais à réaliser une opération qui me paraissait tout simple en PL/SQL, jusqu'à me rendre compte que ça n'existe pas :

Code :

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

1
2
3
FOR i IN ('A', 'B', 'C', 'D') LOOP
...
END LOOP

En gros je cherche à réaliser une boucle FOR sur une liste quelconque.
Je trouve ça tellement gros que je rate surement quelque chose de simple.

Merci de vos lumières

[nuke_y]

Bonjour,

de mémoire ce n'est pas possible en PL/SQL. Autant il gère bien le "for i in a...b" autant il ne permet pas de déclarer des listes de valeurs dans le for.

Par contre tu dois pouvoir t'en sortir avec des collections :

* Les collections de type VARRAY

Ce type de collection possède une dimension maximale qui doit être précisée lors de sa déclaration
Elle possède une longueur fixe et donc la suppression d'éléments ne permet pas de gagner de place en mémoire
Ses éléments sont numérotés à partir de la valeur 1

Déclaration d'une collection de type VARRAY
TYPE nom type IS VARRAY (taille maximum) OF type élément [NOT NULL] ;

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
SQL> declare
  2    -- collection de type VARRAY
  3    TYPE TYP_VAR_TAB is VARRAY(30) of varchar2(100) ;
  4    tab1 TYP_VAR_TAB := TYP_VAR_TAB('','','','','','','','','','');
  5  Begin
  6    for i in 1..10 loop
  7       tab1(i):= to_char(i) ;
  8    end loop ;
  9  End;
 10  /
 
Procédure PL/SQL terminée avec succès.

Déclaration d'un tableau VARRAY de 30 éléments de type varchar2(100)

[Severn]

VARRAY ou bien des collections de type NESTED TABLE.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
declare
   type t_tabchar is table of varchar2(100);
   tableau   t_tabchar := t_tabchar('A', 'B', 'C', 'D');
begin
   for i in tableau.first..tableau.last
   loop
      dbms_output.put_line('element '||i||' = '||tableau(i));
   end loop;
end;

[doukem]

Effectivement, j'avais contourné le problème avec un tableau, mais je ne savais pas qu'on pouvait l'initialiser directement comme dans vos solutions.
J'espérais une solution plus simple, je suis en fait surpris que ça ne soit pas possible directement en PL/SQL.
Merci pour vos réponses.

[GoLDoZ]

Vous pouvez aussi utiliser un curseur:

Code :

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

1
2
3
4
5
6
7
8
9
10
BEGIN
   FOR cur IN (SELECT 'A' col FROM DUAL UNION ALL
               SELECT 'B' FROM DUAL UNION ALL
               SELECT 'C' FROM DUAL UNION ALL
               SELECT 'D' FROM DUAL)
   LOOP
      DBMS_OUTPUT.put_line (cur.col);
   END LOOP;
END;
/