Discussion :

[AFIJARODOX]

Bonjour tout le monde,

J'ai une collection refletant l'image d'une table MyTable, (contenant plus de 300 colonnes toutes aux noms très longs et composé).

ci-dessous le 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
....
....
TYPE TypeOfMyCollection IS TABLE OF My_Table%ROWTYPE INDEX BY PLS_INTEGER ;
MyCollection TypeOfMyCollection ;
....
....
BEGIN
....
-- Là, je remplit ma collection jusqu'à un niveau N
....
....
-- Ici je veux passer mes data de ma collection vers ma table
FORALL MyIndex IN MyCollection.FIRST .. MyCollection.LAST
INSERT INTO MyTable VALUES ???????? ; -- Si possible d'utiliser une seule fois ma collection et non pas lister toutes les colonnes (NBR>300) préfixées par le nom de ma collection.
....
....
END;
/

Merci d'avance pour vos réponses.

[SheikYerbouti]

A partir d'oracle9i, les copies d'informations par blocs peuvent être effectuées directement dans les collections d'enregistrements

Code :

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

1
2
Forall i in tabrec.first..tabrec.last
        insert into TEST values tabrec(i) ;

voir le chapitre 5 du Guide PL/SQL

http://sheikyerbouti.developpez.com/...age=Chap5#L5.4

[AFIJARODOX]

Merci pour la réponse.

Pour ma version d'ORACLE : sous SQL*Plus

Code :

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

1
2
3
4
5
6
7
8
9
IREF - BOMBARDIER > select * from v$version ;
 
BANNER
----------------------------------------------------------------
Oracle9i Enterprise Edition Release 9.2.0.3.0 - 64bit Production
PL/SQL Release 9.2.0.3.0 - Production
CORE    9.2.0.3.0       Production
TNS for IBM/AIX RISC System/6000: Version 9.2.0.3.0 - Production
NLSRTL Version 9.2.0.3.0 - Production

Avec ça j'ai une erreur de compilation :

Code :

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

1
2
3
4
5
6
Erreurs pour PROCEDURE P_PROTECT_C :
 
LINE/COL ERROR
-------- -----------------------------------------------------------------
7691/7    PL/SQL: SQL Statement ignored
7691/19   PL/SQL: ORA-00947: Nombre de valeurs insuffisant

Je précise que contrairement à l'exemple que tu donnes dans ton cours (que j'apprécis énormément), je ne suis pas passé par le BULK, nécessité l'oblige, je remplit ma collection via plusieurs étapes. Peut-être ça la source d'erreur ??!!

Merci par avance.

[SheikYerbouti]

Il apparait, au travers du message d'erreur, que les colonnes de la collection ne correspondent pas, au moins en nombre, à celle de la table en insertion

[AFIJARODOX]

Merci SheikYerbouti pour la réponse

Sauf que la collection est déclarée en %ROWTYPE, et donc, en nombre cela devrait marcher !

Je mentionne bien en haut dans le code que ma collection est indexée (PLS_INTEGER) et donc n'est pas NESTED TABLE,
D'autres parts, je ne passe pas par le BULK COLLECT INTO MyCollection pour l'alimenter, non, je l'alimente autrement ligne par ligne,....etc.

Est-ce que le FORALL doit être accompagnée par le BULK,... (doit opérer sur une collection alimentée par BULK).

Merci encore.

[SheikYerbouti]

Non, il n'y a aucun rapport. FORALL fonctionne sur des collections qui peuvent être alimentées soit par un select soit à la mano.

[SheikYerbouti]

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
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
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
SQL> select * from v$version ;
 
BANNER
----------------------------------------------------------------
Oracle9i Enterprise Edition Release 9.2.0.5.0 - 64bit Production
PL/SQL Release 9.2.0.5.0 - Production
CORE    9.2.0.6.0       Production
TNS for Solaris: Version 9.2.0.5.0 - Production
NLSRTL Version 9.2.0.5.0 - Production
 
SQL> 
SQL> desc messages;
 Nom                                       NULL ?   Type
 ----------------------------------------- -------- ----------------------------
 CODE                                      NOT NULL NUMBER(5)
 TEXTE                                     NOT NULL VARCHAR2(256)
 TITRE                                              VARCHAR2(100)
 STOP                                      NOT NULL VARCHAR2(1)
 ALERTE                                             VARCHAR2(15)
 
SQL>  create table messages2 as select * from messages where 1=2 ;
 
Table créée.
 
SQL> desc messages2 ;
 Nom                                       NULL ?   Type
 ----------------------------------------- -------- ----------------------------
 CODE                                      NOT NULL NUMBER(5)
 TEXTE                                     NOT NULL VARCHAR2(256)
 TITRE                                              VARCHAR2(100)
 STOP                                      NOT NULL VARCHAR2(1)
 ALERTE                                             VARCHAR2(15)
 
SQL> 
SQL> declare
  2    type TYP_REC is table of messages%rowtype index by binary_integer;
  3    tableau TYP_REC ;
  4  begin
  5    tableau(1).code := 101;
  6    tableau(1).texte := 'texte1';
  7    tableau(1).titre := 'titre1';
  8    tableau(1).stop := 'O';
  9    tableau(1).alerte := 'erreur';
 10    tableau(2).code := 102;
 11    tableau(2).texte := 'texte2';
 12    tableau(2).titre := 'titre2';
 13    tableau(2).stop := 'O';
 14    tableau(2).alerte := 'erreur';       
 15    FORALL i IN tableau.first..tableau.last 
 16       INSERT INTO messages2 values tableau(i) ;
 17  end;
 18  /
 
Procédure PL/SQL terminée avec succès.
 
SQL> SQL> select * from messages2 ;
 
      CODE
----------
TEXTE
--------------------------------------------------------------------------------
TITRE
--------------------------------------------------------------------------------
S ALERTE
- ---------------
       101
texte1
titre1
O erreur
 
 
      CODE
----------
TEXTE
--------------------------------------------------------------------------------
TITRE
--------------------------------------------------------------------------------
S ALERTE
- ---------------
       102
texte2
titre2
O erreur
 
 
SQL>

aucun problème.

[AFIJARODOX]

Merci SheikYerbouti pour tes réponses et ton aide très précieuse.

Cependant, je vais voir, ailleurs dans le code pourquoi ça ne marche pas, j'appliquerai aussi l'exemple donné sur ma base.

D'ici là c'est un sujet résolu.