ORA-06533:Subscript beyond count dans une clollection PL/SQL

Version imprimable

Bonjour,
je dois utiliser une collection pour stocker les valeurs d'un champ dans un bloc multiligne.
voici le code que j'utilise.

attestation_risque. NUMEPAPI est le champ de la base de données qui correspond au champ du bloc NUMATTEPAPIER dont je dois stocker les valeurs.
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 declare TYPE TYP_TAB_A IS TABLE OF attestation_risque. NUMEPAPI%TYPE ; tab2 TYP_TAB_A ; i number(1); msg varchar2(200):=' '; begin first_record; i:=1; loop IF :NUMATTEPAPIER IS NOT NULL THEN tab2:= TYP_TAB_A(); tab2.EXTEND(i); tab2(i):= :NUMATTEPAPIER ; i:=i+1; END IF; IF (:System.Last_Record = 'TRUE') THEN EXIT; ELSE Next_Record; END IF; end loop; first_record; FOR i IN 1 .. tab2.count Loop msg := msg || tab2(i); end;
mais à l'execution il me signale l'erreur
Code:

1 2 ORA-06533:Subscript beyond count.
Quel est le problème ?
une aide SVP

C'est normal la limitation NUMBER(1) pour i ?

Ton code ne marche pas bien chez moi en plsql.
J'ai mis quelques traces.

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
DECLARE
  TYPE  TYP_TAB_A IS TABLE OF VARCHAR2(1);
   tab2 TYP_TAB_A ;
	i number;
	msg varchar2(200):=' ';
BEGIN
	i:=1;
	FOR k IN 1..10
  LOOP
      tab2:= TYP_TAB_A();
      tab2.EXTEND(i);
  		tab2(i):= CHR(64 + k)  ;
      DBMS_OUTPUT.put_line(k ||':' || tab2(i));
	    i:=i+1;
	END LOOP;
	FOR i IN 1 .. tab2.COUNT
  LOOP
    msg := msg || tab2(i);
 	END LOOP;
  DBMS_OUTPUT.put_line('Total ('|| tab2.COUNT ||') Msg='|| msg);
END;
 
1:A
2:B
3:C
4:D
5:E
6:F
7:G
8:H
9:I
10:J
Total (10) Msg= J

Tu redéclares tab2:= TYP_TAB_A(); à chaque boucle, donc c'est réinitialisé.

Pour les collections, le plus simple est cette façon

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
DECLARE
  TYPE  TYP_TAB_A IS TABLE OF VARCHAR2(1) INDEX BY BINARY_INTEGER;
   tab2 TYP_TAB_A ;
	i number;
	msg varchar2(200):=' ';
BEGIN
	i:=1;
	FOR k IN 1..10
  LOOP
      tab2(i):= CHR(64 + k)  ;
      DBMS_OUTPUT.put_line(k ||':'|| tab2(i));
	    i:=i+1;
	END LOOP;
	FOR i IN 1 .. tab2.COUNT
  LOOP
    msg := msg || tab2(i);
 	END LOOP;
    DBMS_OUTPUT.put_line('Total ('|| tab2.COUNT ||') Msg='|| msg);
END;
 
1:A
2:B
3:C
4:D
5:E
6:F
7:G
8:H
9:I
10:J
Total (10) Msg= ABCDEFGHIJ

29/07/2010, 12h38
madina

J'avais mal placé le constructeur d'initialisation . il fallait le sortir hors du boucle.
Merci.