creation de table dynamique

**ldiaz** · 25/08/2009, 10h20

Bonjour a tous
je dois automatiser un script qui, a partir d'un fichier plat type CSV, doit d'abord charger les données dans une table et ensuite faire un certain nombre de manip avec cette table.

La premiere fois j'ai creer la table a la main, en adaptant les champs aux diferents champs du fichier CSV...mais voila pour que ce soit automatique pour de vrai, ca serait bien que la table se cree automaquement en fonction des champs du CSV...
J'ai pas acces au serveur, sinon avec bash ou python je pourrait faire:
1 lire le fichier CSV
2 detecter la quantité et nom des champs
3 recuperer le tout pour le create table...
mais voila vu que j'ai pas acces la seul solution est de faire tout ca en PL/SQL
est ce possible?
peut on ouvrir un CSV avec PL/SQL et parser le contenu?
Qqu'un sait comment faire ca?

D'avance merci

**GoLDoZ** · 25/08/2009, 12h04

Bonjour.
Utilisez le package UTL_FILE pour lire le fichier.

**ldiaz** · 25/08/2009, 12h09

Bonjour,
j'ai trouvé ceci...ca a l'air de faire la premiere partie, a savoir lire et placer dans 's' le contenu de la premiere ligne...

Code :

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

1
2
3
4
5
6
7
8
9
10
declare
f utl_file.file_type;
s varchar2(200);
begin
f := utl_file.fopen('SAMPLEDATA','sample1.txt','R');
utl_file.get_line(f,s);
utl_file.fclose(f);
dbms_output.put_line(s);
end;
/

Une fois que j'ai la variable 's' comment je peux faire pour generer l'instruction avec les valeurs des champs qui se trouvent dans 's':

Code :

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

1
2
3
CREATE TABLE MA_TABLE(
nom des champs
);

D'avance merci

**fatsora** · 25/08/2009, 14h03

Il y a une aide ici

http://jaouad.developpez.com/sqlldr/#LV-N

**ldiaz** · 25/08/2009, 15h12

Salut
je sus pas sur que ca reponde au probleme...La tu propose de creer une table externe qui pointe vers un csv...Ce que je voudrais c'est que la structure de la table soit crée de façon automatique en fonction des champs qui se trouvent dans le fichier.
Exemple
si le CSV est:

ch1;ch2;ch3;ch4

le create table sera:

Code :

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

1
2
3
4
5
6
create table Ma_table(
ch1 varchar(n),
ch2 varchar(n),
ch3 varchar(n),
ch4 varchar(n)
)

et si le csv est:

toto1;toto2

le create table sera:

Code :

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

1
2
3
4
create table ma_table(
toto1 varchar(n),
toto2 varchar(n)
)

mais automatique...tu vois ?

**c.langlet** · 25/08/2009, 15h30

bonjour,
tu n'as pas d'autre choix que d'analyser la premiere ligne
(une boucle avec du instr et du substr).
pour identifier la liste des champs séparer par ';' (par contre pour savoir la largeur maxi des varchar ?)
ensuite regarde du coté du sql dynamique pour faire le create table.
Tu auras besoin de la même methode a chaque ligne pour recupérer les données et faire le insert en dynamique aussi.

Bon courage a toi

**ldiaz** · 25/08/2009, 15h31

Salut
ok je vais essayer...on s'approche je le sens !!

**ldiaz** · 25/08/2009, 15h46

J'ai trouvé ca, page 80....ca ressemble mais je comprend rien au code pl sql...bref.

http://www.alydan.com/Oracle_Tips_fr...Real_World.pdf

**GoLDoZ** · 25/08/2009, 16h13

Effectivement, je pensais ensuite que vous annalyseriez le code pour créer vous-même la requête. Ce qui n'est pas bien difficile en PL/SQL.

Avez-vous le nom des colonnes dans votre fichier csv?

**ldiaz** · 25/08/2009, 16h19

Bonjour,
je sais je dois aller en cours de PL...
Le fichier ressemble a ca:

CODI ESTAT NALUMNE EXTRN EDICIO PRIORITAT N_RESP COMP_ALUMNE COMP_RESP

mais des fois il ressemble a ca
CODI ESTAT NALUMNE EXTRN EDICIO PRIORITAT N_RESP

Le resultat final je voudrais que ce soit ceci:

Code :

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

1
2
3
4
5
6
7
8
9
create TABLE ma_table(
CODI	ESTAT varchar2(20), --ce sont tous des varchar2(20)
NALUMNE,
EXTRN,
EDICIO,
PRIORITAT,
N_RESP,
COMP_ALUMNE,
COMP_RESP)

les champs sont separés par des tab dans tous les cas.

D'avance merci

**GoLDoZ** · 25/08/2009, 17h02

Un minimum de connaissances s'imposent en effet, mais c'est un bon exercice de logique.
Les fonctions à utiliser: SUBSTR et INSTR.

Ca donnera une boucle du style:

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
 DECLARE
   ls_dir VARCHAR2(100)  := '/mon répertoire/';
   ls_fic VARCHAR2(20)  := 'mon_fichier.csv' ;
   ls_mod VARCHAR2(1)  := 'r' ;
   lf_file utl_file.file_type ;
   ls_ligne VARCHAR2(1000):= ' ';
   ln_cpt NUMBER := 0;
 
BEGIN
   lf_file  := UTL_FILE.FOPEN(ls_dir, ls_fic, ls_mod) ;
 
   LOOP
      UTL_FILE.GET_LINE(lf_file, ls_ligne);
      IF ln_cpt = 0 THEN
         -- création de la table
         ln_cpt := 1;         
      ELSE
         -- insertion de la ligne
      END IF;
   END LOOP;
 
   UTL_FILE.FCLOSE(lf_file);
 
EXCEPTION
   WHEN OTHERS THEN
     UTL_FILE.FCLOSE(lf_file);
END;
/

**ldiaz** · 25/08/2009, 17h26

Salut

alors je vais tenter de comprendre ce code, car a premiere vue il manque le create table n'est ce pas?

dans le declare ok tu declare les variables:

ls_dir VARCHAR2(100) := 'c:\monRep'; -- le path
ls_fic VARCHAR2(20) := 'fichier.csv' ; --le nom du fichier
ls_mod VARCHAR2(1) := 'r' ; -- le mode
lf_file UTL_FILE.FILE_TYPE ; --la je vois pas ce que c'est...ca detecte si le fichier est de type ascii ou qqu chose comme ca?

ls_ligne VARCHAR2(1000):= ' '; --comme un curseur sur les lignes ?
ln_cpt NUMBER := 0; -- un compteur

Ensuite ceci, je supose que c'est la variable equivalente a fopen() en c.. un genre de pointeur non?
lf_file := UTL_FILE.FOPEN(ls_dir, lf_fic, ls_mod) ;

Ca prend la path nom de fichier et mode en argument...ok

Ensuite
LOOP
UTL_FILE.GET_LINE(lf_file, ls_ligne);

la on parcour le fichier? c'est bien ca?

alors voici mon premier doute, si j'ai besoin que de la premiere ligne (la ou sont les nom de champs dont j'ai besoin) pas la peine de parciourir tout n'est ce pas??

juste en lisant la premiere ligne ca sufirait.

et alors la je comprend plus, tu utilise le conpteur?
s'il est a 0 tu l'incremente de 1

IF ln_cpt = 0 THEN
ln_cpt := 1;

haaa ok ca veut dire que si l'on se trouve sur la premiere ligne c'est ca?

donc ok si l'on se trouve sur la premiere ligne on fait le create table.

Sans rien connaitre j'ai ajouté ca:
-- création de la table
DBMS_OUTPUT.PUT_LINE('create table TEMP('||lf_file ||' varchar2(20)');

je sais pas si c'est le correcte...si le create table se trouve dans la boucle il va se repeter ?

Oulalala
et les fonctions substr et instr a quel moment il faut les utiliser?
Pardon de poser toutes ces questions

**GoLDoZ** · 25/08/2009, 17h32

Il va falloir lire les fonctions PL/QL et le package UTL_FILE...

lf_file est une variable de type fichier, vu que tu vas lire un fichier.

Code :

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

lf_file  := UTL_FILE.FOPEN(ls_dir, ls_fic, ls_mod) ;

A ma variable fichier, j'associe en l'ouvrant le fichier réel situé dans le répertoire ls_dir en mode lecture ls_mod.

Code :

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

UTL_FILE.GET_LINE(lf_file, ls_ligne);

Je lis la ligne suivante dans mon fichier et la mets dans la variable ls_ligne.
Donc c'est ls_ligne que tu dois traiter pour en extraire les noms des colonnes et les données.

Quand le compteur (ln_cpt) vaut 0, c'est qu'on lit la première ligne, donc les noms des colonnes --> on crée la table et on mets le compteur à 1.
Les autres fois, on insère les données (toujours en traitant ls_ligne).

Dans mon code, il manque uniquement les traitements de création et d'insertion (là où il y a les commentaires correspondants).

**ldiaz** · 26/08/2009, 09h19

Bonjour

alors voila, j'ai ce code (le serveroutput est a on):

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
SQL> DECLARE
  2    ls_dir VARCHAR2(100)  := 'c:\monPath\';
  3    ls_fic VARCHAR2(20)  := 'monFile.csv' ;
  4    ls_mod VARCHAR2(1)  := 'r' ;
  5    lf_file UTL_FILE.FILE_TYPE ;
  6    ls_ligne VARCHAR2(1000):= ' ';
  7    ln_cpt NUMBER := 0;
  8  BEGIN
  9    lf_file  := UTL_FILE.FOPEN(ls_dir, ls_fic, ls_mod) ;
 10      DBMS_OUTPUT.PUT_LINE(ln_cpt); -- j'ai ajouté ca pour voir la valeur
 11    LOOP
 12       UTL_FILE.GET_LINE(lf_file, ls_ligne);
 13       IF ln_cpt = 0 THEN
 14          ln_cpt := 1;
 15          -- création de la table
 16             DBMS_OUTPUT.PUT_LINE('create table TEMP('||ls_ligne||'  varchar2(20)');
 17       ELSE
 18          -- insertion de la ligne
 19             DBMS_OUTPUT.PUT_LINE('insert statment');
 20       END IF;
 21    END LOOP;
 22    UTL_FILE.FCLOSE(lf_file);
 23  EXCEPTION
 24    WHEN OTHERS THEN
 25      UTL_FILE.FCLOSE(lf_file);
 26  END;
 27  /

Procedimiento PL/SQL terminado correctamente.

SQL>

Mais comme tu peux voir le DBMS_OUTPUT ne sort rien....etrange ou pas?
D'avance merci

**GoLDoZ** · 26/08/2009, 10h58

J'ai mis 'c:\' pour le répertoire, mais il faut que le répertoire soit visible par le serveur.

Rajoutez 'RAISE;' dans le bloc exception pour voir les erreurs générées.

**ldiaz** · 26/08/2009, 11h37

Bonjour,
ok avec RAISE ca ecrit: invalid directory path, donc il faut que le directory soit cree aussi dans dba_directories...
ok je vais essayer.
merci encore

**GoLDoZ** · 26/08/2009, 16h14

Une fois résolu l'accès au fichier, le reste n'est qu'un traitement logique d'une chaîne de caractères. Je vous donnerai un exemple.

**ldiaz** · 26/08/2009, 16h19

Bonjour
ok j'ai demandé de placer le fichier dans le repertoire qui est defini sur cette base. J'ai pas acces donc je dois attendre.
J'espere avoir resolu ca aujourd'hui avec les collegues system.

Merci

**GoLDoZ** · 27/08/2009, 15h09

Alors, qu'est-ce que ça donne?

**ldiaz** · 27/08/2009, 15h12

Bonjour,
toujours pas de reponse de la part de SYSTEM....j'attend.
Je suis en train de m'installer une base 9i sur le PC local, comme ca je pourrais tester sans attendre.
Dé que j'ai des news je ferais las MAJ de cette discussion.

Encore merci pour demander.
Ciao

creation de table dynamique

PL/SQL Oracle

Discussions similaires

Partager

Partager