Discussion :

[banana31]

Je veux manipuler un tableau qui est en paramètre OUt de ma proc stockée suivante :

PROCEDURE Plandetravail(UserParameter1 IN VARCHAR2, Numero OUT tbl_numero,
t_NumFeuilletP1 OUT tbl_numfeuilletP1,
t_NumFeuilletP2 OUT tbl_numfeuilletP2)
IS

CURSOR QueryInitCursor(UserParameter1 IN CHAR) IS
SELECT NUMERO,NUMFEUILLETP1, NUMFEUILLETP2
FROM TB_TABLEDESOT
WHERE MASSETAG = UserParameter1;

T_Feuillets T_numfeuillet;
T_NbreOccus T_NbreOccu;
LigneQueryInit QueryInitCursor%ROWTYPE;

BEGIN
FOR LigneQueryInit IN QueryInitCursor(UserParameter1) LOOP
--SearchFeuilletTableOccu(LigneQueryInit.NUMFEUILLETP1,T_Feuillets,T_NbreOccus);
--SearchFeuilletTableOccu(LigneQueryInit.NUMFEUILLETP2,T_Feuillets,T_NbreOccus);
DBMS_OUTPUT.PUT_LINE (LigneQueryInit.NUMFEUILLETP1);
t_NumFeuilletP1.EXTEND;
t_NumFeuilletP1(t_NumFeuilletP1.LIMIT) := LigneQueryInit.NUMFEUILLETP2;
END LOOP;
END;

J'ai le message suivant quand je compile mon package :
PLS-00306: wrong number or types of arguments in call to 'EXTEND'

Merci pour votre aide.

[Marc Musette]

hello

EXTEND ne peut être utilisé dans les cas suivants

1- pour initialiser une collection (ce qui me semble être ton cas ?)
2- index-by tables

en cas de NOT NULL contraintes, tu ne peux utiliser que la forme EXTEND(n,i) avec n le nombre de copies ajoutées à l'élément i (ce qui semble correpondre à ton message d'erreur)

voir doc PLSQL au chapitre 5 pour l'info officielle

bon debugging

[banana31]

Ok, mais je fais comment pour initialiser ma collection ?

J'ai du rater un truc dans les exemples que j'ai vus. Mais je vois pas quoi...

[Marc Musette]

tu la remplis via un select into ou un curseur

PL/SQL user guide chapitre 5

[banana31]

Celà reviendrais à faire ceci par exemple (?):
LCRequete := 'SELECT NUMERO,NUMFEUILLETP1, NUMFEUILLETP2 FROM TB_TABLEDESOT WHERE MASSETAG = '''||UserParameter1||'''' ;

EXECUTE IMMEDIATE LCRequete BULK COLLECT INTO Numero, t_NumFeuilletP1, t_NumFeuilletP2;

Cependant le BULK COLLECT n'a pas l'air de marcher chez moi.

D'autres part, où puis-je trouver la doc PLSQL (lien) ?

[SheikYerbouti]

Comment avez-vous déclaré le type de votre tableau ?
TABLE, INDEX-BY, VARRAY ?

[banana31]

Voici la déclaration des tableaux que je souhaite manipuler :
TYPE tbl_numero IS TABLE OF TB_TABLEDESOT.NUMERO%TYPE INDEX BY BINARY_INTEGER;
TYPE tbl_numfeuilletP1 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP1%TYPE INDEX BY BINARY_INTEGER;
TYPE tbl_numfeuilletP2 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP2%TYPE INDEX BY BINARY_INTEGER;

[SheikYerbouti]

Vous n'avez pas besoin de la fonction EXTEND avec les collections de type index-by.

[banana31]

Merci, mais de quoi ai-je besoin alors ?

[SheikYerbouti]

de rien !

[banana31]

C'est abscond pour moi.
Comment je fais alors pour remplir mon tableau sans l'agrandir à chaque itération?

[SheikYerbouti]

Vous augmentez simplement l'indice :

Code :

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

montab(n) := ... ;

Code :

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

1
2
3
For i in 1..10 loop
  montab(i) := .... ;
End loop ;

[banana31]

Oh la la . çà paraît si simple quand c'est écrit clairement. Merci bcp, je m'en vais l'essayer tout de suite.

[Marc Musette]

hello

EXTEND ne peut être utilisé dans les cas suivants

...
2- index-by tables
...

la doc plsql et toute la doc relative à la 8i, 9i et 10g se trouve sur otn.oracle.com/documentation

bonne lecture !

[Admin]

banana31, pourrais-tu utiliser la balise code tel qu'indiqué dans les règles du forum.

Ceci est plus lisible :

Code :

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

1
2
3
TYPE tbl_numero IS TABLE OF TB_TABLEDESOT.NUMERO%TYPE INDEX BY BINARY_INTEGER; 
TYPE tbl_numfeuilletP1 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP1%TYPE INDEX BY BINARY_INTEGER; 
TYPE tbl_numfeuilletP2 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP2%TYPE INDEX BY BINARY_INTEGER;

que ceci :
TYPE tbl_numero IS TABLE OF TB_TABLEDESOT.NUMERO%TYPE INDEX BY BINARY_INTEGER;
TYPE tbl_numfeuilletP1 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP1%TYPE INDEX BY BINARY_INTEGER;
TYPE tbl_numfeuilletP2 IS TABLE OF TB_TABLEDESOT.NUMFEUILLETP2%TYPE INDEX BY BINARY_INTEGER;