Discussion :

[zenobe]

Bonjour,

Je voudrais créer un tableau ayant quelques champs ainsi qu'un tableau associé. Voir l'exemple:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
DECLARE
   TYPE Ma_Structure AS OBJECT (
        Champs1    VARCHAR2(10),
        Champs2    VARCHAR2(10),
        Champs3    INTEGER,
        Table          DBMS_SQL.VARCHAR2_TABLE
        );
   TYPE Ma_Structure_tab IS VARRAY(10) OF Ma_structure;
BEGIN
...
END;

L'erreur suivante m'est renvoyé:
PLS-00540: object not supported in this context.

Est-ce que quelqu'un peut m'aider ou me donner une alternative à cette solution?

Merci bcp!

[SheikYerbouti]

Créez ces types au niveau SQL avec la commande CREATE TYPE.

ensuite, vous pourrez les utiliser avec PL/SQL

[zenobe]

Je viens d'essayer votre solution mais j'ai une autre erreur qui m'est renvoyé:
PLS-00201: identifier 'DBMS_SQL.VARCHAR2_TABLE' must be declared

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
CREATE TYPE Ma_Structure AS OBJECT ( 
                    Champs1    VARCHAR2(10), 
                    Champs2    VARCHAR2(10), 
                    Champs3    INTEGER, 
                    Table          DBMS_SQL.VARCHAR2_TABLE 
                    ); 
 
DECLARE
...
BEGIN
...
END;

Avez-vous une idée?
Merci!

[Marc Musette]

en direct de la doc (apllication developper guide / object relational features) n'hésite pas à t'y référer pour découvrir les types objets (DBMS_SQL.VARCHAR2_TABLE c'est quoi comme type de données ?!?!?)

The following example creates a multilevel collection type that is a nested table of nested tables. The example models a system of stars in which each star has a nested table collection of the planets revolving around it, and each planet has a nested table collection of its satellites.

CREATE TYPE satellite_t AS OBJECT (
name VARCHAR2(20),
diameter NUMBER);

CREATE TYPE nt_sat_t AS TABLE OF satellite_t;

CREATE TYPE planet_t AS OBJECT (
name VARCHAR2(20),
mass NUMBER,
satellites nt_sat_t);

CREATE TYPE nt_pl_t AS TABLE OF planet_t;

[SheikYerbouti]

Renomez votre colonne Table en autre chose ! (Tab)

[zenobe]

J'admets que j'ai abandonné l'idée du tableau dans le tableau.
Toutefois j'ai des difficultés pour gérer un simple tableau à 2 dimensions.

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
 
CREATE OR REPLACE TYPE Clean_child AS OBJECT (
        Src_table    VARCHAR2(10),
        Bck_table    VARCHAR2(10),
        Cnt_Delete   INTEGER
        );
 
DECLARE
 
   Clean_child_tab IS VARRAY(20) OF Clean_child;
   Child_tables Clean_child_tab;
 
BEGIN
...
END;

Du coup j'ai le problème suivant:
PLS-00103: Encountered the symbol "VARRAY" when expecting one of the following:

constant exception <an identifier>
<a double-quoted delimited-identifier> table LONG_ double ref
char time timestamp interval date binary national character
nchar


Aute question est: 'Comment vais-je initialiser ce tableau?'

Je pensais à un truc du genre:

Code :

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

1
2
3
4
 
  for i in 1..20 LOOP
    Child_tables(i) := ('VAL1','VAL1CU',0);
  end loop;

Mais ça n'a pas l'air de marcher. :-(

Merci!

[orafrance]

Essaye ceci :

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
DECLARE
TYPE Clean_child IS RECORD (Src_table    VARCHAR2(10), 
        Bck_table    VARCHAR2(10), 
        Cnt_Delete   INTEGER 
        ); 
 
 
Type Clean_child_tab IS TABLE OF Clean_child INDEX BY BINARY_INTEGER;
 
Child_tables Clean_child_tab;
BEGIN
for i in 1..20 LOOP 
    Child_tables(i).Src_table := 'VAL1';
    Child_tables(i).Bck_table := 'VAL1CU;
    Child_tables(i).Cnt_Delete:= 0;
end loop; 
END;
/

[SheikYerbouti]

Vous pouvez utiliser des tableaux d'enregistrements à la place de vos tableaux d'objets.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Declare
TYPE TYP_REC IS RECORD( col1, col2,...coln ) ;
TYPE TYP_TAB_REC IS TABLE OF TYP_REC INDEX BY BINARY_INTEGER ;
mon_tab TYP_TAB_REC ;
Begin
  For i IN 1.. 10 Loop
     mon_tab(i).col1 := ... ;
     mon_tab(i).col2 := ... ;
     .....
  End loop ;
  .........
End ;

[zenobe]

Ca marche... un grand MERCI!
Je vais finir arriver à faire un truc convenable. ;-)

[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
 
CREATE OR REPLACE TYPE Clean_child AS OBJECT (
        Src_table    VARCHAR2(10),
        Bck_table    VARCHAR2(10),
        Cnt_Delete   INTEGER
        );
 
DECLARE
 
   Clean_child_tab IS VARRAY(20) OF Clean_child;
   Child_tables Clean_child_tab;
 
BEGIN
...
END;

Du coup j'ai le problème suivant:
PLS-00103: Encountered the symbol "VARRAY" when expecting one of the following:

constant exception <an identifier>
<a double-quoted delimited-identifier> table LONG_ double ref
char time timestamp interval date binary national character
nchar

Merci!

Il manque le mot clé TYPE devant votre déclaration : Clean_child_tab IS VARRAY(20) OF Clean_child;

[Marc Musette]

J'admets que j'ai abandonné l'idée du tableau dans le tableau.

allez allez faut persévèrer

[zenobe]

Merci pour les encouragements... mais bon, je ne cache pas que j'ai quelques difficultés à apréhender le PL/SQL.

[Marc Musette]

en tout cas n'oublie pas le tag RESOLU, merci