Gestion des excceptions

Version imprimable

Voir 40 message(s) de cette discussion en une page

Quand j'essaies de le creer j'ai le message suivant :

Code:

1
2
3
4
5
6
 
LINE/COL ERROR
-------- -----------------------------------------------------------------
0/0      PL/SQL: Compilation unit analysis terminated
1/30     PLS-00329: le type de niveau schéma comporte une référence non
         valide à CONT.T_ANOMAL

j'ai utiliser

Code:

1
2
 
CREATE OR REPLACE TYPE VP_TabType  IS TABLE OF T_ANOMAL%ROWTYPE

est-ce correct ?

28/08/2006, 13h31
Yorglaa

oui, c'est correct...

et je pourrais voir la partie du code qui plante ? (aux environs dela ligne 30 il semble)
28/08/2006, 13h45
plaineR
Moi je pense que cela n'est pas correct : %rowtype est une commande Pl-Sql .

Par ailleurs, il me semble également que la commande suivante ne fonctionne qu'à partir de la 9.02 (en 8i, c'est sûr cela ne fonctionne pas => erreur : PLS-00518) :
Code:

1 2 forall i IN VP_Tabl.first..VP_Tabl.last INSERT INTO T_ANOMAL VALUES VP_Tabl(j);
Pour les versions antérieures tu es obligé de faire :
Code:

1 2 3 4 for i in i IN VP_Tabl.first..VP_Tabl.last loop insert into T_ANOMAL (col1, col2, ... coln) VALUES (VP_Tabl(j).col1, VP_Tabl(j).col2, ..., VP_Tabl(j).coln); end loop;
ou créer autant de tableau que tu as de colonnes (le forall ne fonctionne pas sur des tableaux composites)
28/08/2006, 13h56
Yorglaa

c'est vrai que mes procédures fonctionnent, mais je suis en 9.2.0.6...

alors essaie peut-être la suggestion de PlaineR et fais un Loop standard pour faire l'insert...
28/08/2006, 13h59
remi4444

En tout cas, je trouve que c'est dommage de glisser d'un problème vers un autre... Il faudrait à mon avis d'abord faire des insertions simples (sans bulk-collect) pour valider que tu tiens la bonne méthode pour tracer des erreurs, puis dans un second temps optimiser par les forall...
28/08/2006, 14h17
delphine_lep

Je n'ai plus d'erreur avec la méthode de plaineR. Il semblerait que ce soit bien un probleme de version (je suis en 9.0.1.3.0)

for i in i IN VP_Tabl.first..VP_Tabl.last loop
insert into T_ANOMAL (col1, col2, ... coln)
VALUES (VP_Tabl(j).col1, VP_Tabl(j).col2, ..., VP_Tabl(j).coln);
end loop;

Je fais un test global avant de fermer complètement cette discussion...

J'y ai cru l'espace de 20 secondes ...

J'ai l'erreur suivante à l'execution

Code:

1
2
3
4
5
 
ERREUR à la ligne 1 :
ORA-06531: Référence à un ensemble non initialisé
ORA-06512: à "CONT.PKG_ERREUR", ligne 237
ORA-06512: à ligne 1

Mon tableau est initialisé de la facon suivante :

Code:

1
2
3
4
5
6
7
 
VP_Tabl(1).R_CODPAT := 'X';
 VP_Tabl(1).R_FICHIER := 'X';
 VP_Tabl(1).R_CHAMPS := 'X';
 VP_Tabl(1).R_CODE_REJET := 'X';
 VP_Tabl(1).R_NATURE_REJET := 'X';
 VP_Tabl(1).R_DATE_REJET := SYSDATE;

28/08/2006, 14h52
Yorglaa
ne pas oublier, dans la procédure que tu appelles :
ceci n'est pas l'initialisation
Code:

1 2 3 4 5 6 VP_Tabl(1).R_CODPAT := 'X'; VP_Tabl(1).R_FICHIER := 'X'; VP_Tabl(1).R_CHAMPS := 'X'; VP_Tabl(1).R_CODE_REJET := 'X'; VP_Tabl(1).R_NATURE_REJET := 'X'; VP_Tabl(1).R_DATE_REJET := SYSDATE;
tu dois initialiser le tableau avec

Code:

VP_Tabl VP_TabType := VP_TabType(NULL);

AVANT de pouvoir y insérer des valeurs...
28/08/2006, 14h55
remi4444

sans oublier le ".extend" ....
28/08/2006, 14h56
plaineR

ou de déclarer ton tableau de la manière suivante :

Code:

TYPE VP_TabType IS TABLE OF T_ANOMAL%ROWTYPE index by binary_integer;

=> cela t'évite d'avoir à initialiser ta collection ;) , oracle le gère tout seul
28/08/2006, 15h00
Yorglaa

Attention avec le .extend :

l'initialisation avec type(NULL); initialise ET ajoute une première ligne vide, prête à acceuillir des valeurs...

si tu initialise de la sorte, fais un .extend, puis met des valeurs, tu auras 2 lignes dans ton tableau... une vide et une avec tes valeurs... or ce n'est forcément ce que tu veux insérer, sutout si tu as des colonnes NOT NULL !

si tu fais le .extend en début de procédure ou de loop, il faut d'abord faire un .delete (avant le loop bien sur, pour ne pas vider le tableau à chaque boucle).

j'ai ajoute

Code:

1
2
3
TYPE VP_TabType  IS TABLE OF T_ANOMAL%ROWTYPE index by binary_integer;
VP_TABL VP_TabType  ;

puis dans mon traitement avant le loop je fais un

Code:

1
2
 
VP_TABL.delete

Puis des qu'il tombe sur une anomalie
j'appelle ma procédure

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
 
PROCEDURE P_ALIM_TABLEAU_ANO (    
in_PAT IN T_ANOMAL.R_CODPAT%TYPE,
in_FICH IN T_ANOMAL.R_fichier%TYPE,
in_CHAMP IN T_ANOMAL.r_champs%TYPE,
in_CODEREJ IN T_ANOMAL.r_code_rejet%TYPE,
in_R_NATURE_REJET IN T_ANOMAL.r_nature_rejet%TYPE,
in_R_DATE IN T_ANOMAL.r_date_rejet%TYPE)
IS
 
BEGIN
 
VP_Tabl(1).R_CODPAT :='1';
VP_Tabl(1).R_FICHIER :='1';
VP_Tabl(1).R_CHAMPS := '1';
VP_Tabl(1).R_CODE_REJET := '1';
VP_Tabl(1).R_NATURE_REJET := '1';
VP_Tabl(1).R_DATE_REJET :=SYSDATE;
 
 
    VP_idx := VP_idx + 1 ; -- on incrémente l'INDEX des item
    VP_Tabl.extend ; -- on étend le tableau d'une ligne
 
INSERT INTO T_ANOMAL VALUES ( in_PAT,in_FICH , in_CHAMP,  in_CODEREJ, in_R_NATURE_REJET, in_R_DATE);
 
COMMIT;
 
 
    VP_Tabl(VP_idx).R_CODPAT:= in_PAT ;
    VP_Tabl(VP_idx).R_FICHIER:= in_FICH ;
    VP_Tabl(VP_idx).R_CHAMPS:= in_CHAMP;
    VP_Tabl(VP_idx).R_CODE_REJET:= in_CODEREJ;
    VP_Tabl(VP_idx).R_NATURE_REJET:= in_R_NATURE_REJET;
    VP_Tabl(VP_idx).R_DATE_REJET:= in_R_DATE;
END;

a la compilation erreur

Code:

1
2
 
PLS-00306: numéro ou types d'arguments erronés dans appel à 'EXTEND'

28/08/2006, 15h55
plaineR

Quand tu as un tableau "index by binary_indeger", tu n'as plus a géré l'extend, ni l'initialisation de ta collection.

Par contre je ne comprends pas ce que fait ta procédure ? Tu alimentes le tableau et tu insères en même temps ? Quel est l'intérêt ?

Non pardon je faisais un test pour savoir qui faisait planter mon traitement...
voila ce que fait la procedure réellement.

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
 
PROCEDURE P_ALIM_TABLEAU_ANO (    
in_PAT IN T_ANOMAL.R_CODPAT%TYPE,
in_FICH IN T_ANOMAL.R_fichier%TYPE,
in_CHAMP IN T_ANOMAL.r_champs%TYPE,
in_CODEREJ IN T_ANOMAL.r_code_rejet%TYPE,
in_R_NATURE_REJET IN T_ANOMAL.r_nature_rejet%TYPE,
in_R_DATE IN T_ANOMAL.r_date_rejet%TYPE)
IS
 
BEGIN
 
VP_Tabl(1).R_CODPAT :='1';
VP_Tabl(1).R_FICHIER :='1';
VP_Tabl(1).R_CHAMPS := '1';
VP_Tabl(1).R_CODE_REJET := '1';
VP_Tabl(1).R_NATURE_REJET := '1';
VP_Tabl(1).R_DATE_REJET :=SYSDATE;
 
 
    VP_idx := VP_idx + 1 ; -- on incrémente l'INDEX des item
    VP_Tabl.extend ; -- on étend le tableau d'une ligne
 
    VP_Tabl(VP_idx).R_CODPAT:= in_PAT ;
    VP_Tabl(VP_idx).R_FICHIER:= in_FICH ;
    VP_Tabl(VP_idx).R_CHAMPS:= in_CHAMP;
    VP_Tabl(VP_idx).R_CODE_REJET:= in_CODEREJ;
    VP_Tabl(VP_idx).R_NATURE_REJET:= in_R_NATURE_REJET;
    VP_Tabl(VP_idx).R_DATE_REJET:= in_R_DATE;
END;

je ne sais pas si c'est vraiment utile d'initialise

Code:

1
2
3
4
5
6
7
 
VP_Tabl(1).R_CODPAT :='1';
VP_Tabl(1).R_FICHIER :='1';
VP_Tabl(1).R_CHAMPS := '1';
VP_Tabl(1).R_CODE_REJET := '1';
VP_Tabl(1).R_NATURE_REJET := '1';
VP_Tabl(1).R_DATE_REJET :=SYSDATE;

Voilà ce que je ferais :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
PROCEDURE P_ALIM_TABLEAU_ANO (    
in_PAT IN T_ANOMAL.R_CODPAT%TYPE,
in_FICH IN T_ANOMAL.R_fichier%TYPE,
in_CHAMP IN T_ANOMAL.r_champs%TYPE,
in_CODEREJ IN T_ANOMAL.r_code_rejet%TYPE,
in_R_NATURE_REJET IN T_ANOMAL.r_nature_rejet%TYPE,
in_R_DATE IN T_ANOMAL.r_date_rejet%TYPE)
IS
 
BEGIN
    VP_idx := VP_idx + 1 ; -- on incrémente l'INDEX des item
    VP_Tabl(VP_idx).R_CODPAT:= in_PAT ;
    VP_Tabl(VP_idx).R_FICHIER:= in_FICH ;
    VP_Tabl(VP_idx).R_CHAMPS:= in_CHAMP;
    VP_Tabl(VP_idx).R_CODE_REJET:= in_CODEREJ;
    VP_Tabl(VP_idx).R_NATURE_REJET:= in_R_NATURE_REJET;
    VP_Tabl(VP_idx).R_DATE_REJET:= in_R_DATE;
END;

La première partie est non seulement inutile, mais dangereuse : tu écrases les données que tu aurais pu mettre quand vp_idx = 1.

28/08/2006, 17h50
delphine_lep
Mon programme plante sur la ligne
Code:

1 2 FOR i IN VP_Tabl.first..VP_Tabl.last LOOP
avec le message suivant
Code:

1 2 ORA-06502: PL/SQL : erreur numérique ou erreur sur une valeur
comment puis je verifier ce qu'il essaye d'inserer ?
28/08/2006, 18h45
delphine_lep
Ca marche mieux si je remplace
Code:

1 2 for i IN VP_Tabl.first..VP_Tabl.last loop
par
Code:

1 2 FOR i IN 1..VP_Tabl.COUNT LOOP
Est-ce qq'un sait pourquoi ?
28/08/2006, 19h19
delphine_lep

finalement ca marche pas mieux

VP_Tabl.COUNT est toujours = 0 ??!!!
28/08/2006, 19h25
delphine_lep
oups c'est normal j'ai re-déclaré
Code:

1 2 VP_Tabl VP_TabType
dans ma procedure qui insère les données dans mon tableau

donc

Code:

FOR i IN VP_Tabl.first..VP_Tabl.last LOOP

marche en fait tres bien
28/08/2006, 19h45
Yorglaa

désolé, j'ai un peu lâché l'affaire, j'ai aussi dû traiter un p'tit Bug chez nous...

on touche au but ?

Voir 40 message(s) de cette discussion en une page