Discussion :

[djoule6]

Bonjour,

J'utilse Oracle 10g et j'ai besoin de faire une fonction PL/SQL qui écrit dans un fichier. Malheuresement j'obtiens l'erreur suivante des l'ouverture du fichier :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
ERREUR :ORA-20100: ORA-29283: opération non valide sur le fichier
ORA-06512: à "SYS.UTL_FILE", ligne 475
ORA-29283: opération non valide sur le fichier [FICHIERS_OUT] -> fic.txt
STATUS=-1 SQLERRM=ORA-20100: ORA-29283: opération non valide sur le fichier
ORA-06512: à "SYS.UTL_FILE", ligne 475
ORA-29283: opération non valide sur le fichier [FICHIERS_OUT] -> fic.txt 
STATUS = -1
SQLERRM = ORA-20100: ORA-29283: opération non valide sur le fichier
ORA-06512: à "SYS.UTL_FILE", ligne 475
ORA-29283: opération non valide sur le fichier [FICHIERS_OUT] -> fic.txt
PL/SQL procedure successfully completed

Avec le code :

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
	FUNCTION enregTrans
		(
		p_VAR VARCHAR2	
		)
	RETURN PARAMETERS_VALUES_ARRAY
	   AS
  	   	 v_data  PARAMETERS_VALUES_ARRAY := PARAMETERS_VALUES_ARRAY();
 
		 Fic_out  VARCHAR2(128) := 'fic.txt';
		 Dir_out  VARCHAR(30):= 'FICHIERS_OUT' ;
 
		 FicOUT	UTL_FILE.FILE_TYPE ;
 		  -- Tampon de travail --  
  		  Ligne	VARCHAR2(32767) ;  
  		  -- Message --
  		  Msg    VARCHAR2(256) ;
  		  -- Exception --
  		  Fin    EXCEPTION ;
 
	   BEGIN
	     DECLARE
 
        BEGIN
					inproc ('enregTrans(' ||  p_VAR  || ')' );
 
 
 
					BEGIN
    					  FicOUT := UTL_FILE.FOPEN(Dir_out,Fic_out,'W',32764) ;
  					EXCEPTION
    						WHEN OTHERS THEN
								Msg := SQLERRM || ' [' || Dir_out || '] -> ' || Fic_out;
								RAISE Fin ;
  					END ;	
 
 
  					EXCEPTION
   						 WHEN Fin THEN
     					 UTL_FILE.FCLOSE_ALL ;
    					 RAISE_APPLICATION_ERROR( -20100, Msg ) ;
					END ;
 
 
					set_Parameters_Values(v_data,'STATUS', '0');
					outproc (v_data) ;
          RETURN (v_data);
 
       EXCEPTION
		   -- exception section
          WHEN OTHERS THEN
							MyDebug ('ERREUR :' || SQLERRM);
							set_Parameters_Values(v_data,'STATUS', '-1');
							set_Parameters_Values(v_data,'SQLERRM', SQLERRM);
							outproc (v_data) ;
   	  	      RETURN (v_data);
 
     END;

En ayant auparavant fait :

Code :

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

1
2
3
 
CREATE DIRECTORY FICHIERS_OUT AS 'E:\documents' ;
GRANT READ, WRITE ON DIRECTORY FICHIERS_OUT TO PUBLIC ;

Merci pour votre aide ;-)

[plaineR]

Bonjour et bienvenu sur le forum

Merci de lire les règles et de corriger votre post en conséquence en précisant notamment votre numéro de version d'oracle et en utilisant les balises code pour plus de lisibilité.

[orafrance]

Merci de penser aux balises à l'avenir

Merci également de ne pas utiliser le forum à des seules fins de déboggage et enfin merci de mettre tout le code lorsque vous présentez un problème

[djoule6]

Oups désolé...voila je pense avoir modifier ce qu'il fallait ;-)

[plaineR]

Ton répertoire e:\documents est-il visible depuis le serveur de la base de données ? Oracle a-t-il les droits en écritures dessus (droits OS) ? Ton disque e: est-il un disque mappé ?

[djoule6]

Ah désolé d'avoir créer un topic pour cet erreur stupide ! Mais n'y oracle était en fait monté sur une machine distante d'ou le problème ! Merci pour votre aide !

Toujours concernant le package UTL_FILE, j'ai une autre question (peu-t etre bête elle aussi ms bon..) : Est-il possible d'utiliser la fonction FSEEK avec la 10g ? Car lorsque je la tape, elle ne se met pas en bleu et à l'éxécution cela me crée une erreur "ORA-29284: erreur de lecture du fichier" alors que les UTL_FILE.PUT fonctionnent bien eux.

Merci encore

[plaineR]

As-tu lu le tuto de SheikYerbouti :
http://sheikyerbouti.developpez.com/...?page=Chap8#L8

[djoule6]

Oui bien sur je l'ai lu et relu mais je ne trouve pas ou est mon erreur !

[orafrance]

que donne ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
DECLARE
 
       Fic_out  VARCHAR2(128) := 'fic.txt';
       Dir_out  VARCHAR(30):= 'FICHIERS_OUT' ;
 
  FicOUT   UTL_FILE.FILE_TYPE ; 
 
BEGIN
FicOUT := UTL_FILE.FOPEN('FICHIERS_OUT',  'fic.txt', 'w');
UTL_FILE.FCLOSE_ALL;
END;
/

[djoule6]

Merci mais en fait mon problème de repertoire est réglé ;-) (cf. ma réponse plus haut) et les 2 problèmes qu'il me reste sont :

* l'erreur d'execution engendré par le FSEEK (cf. mon précédent post)

* le fait que je n'arrive pas à écrire mes données à la suite dans le fichier , ie. à chaque fois que j'éxécute ma fonction, cela écrase mes données précédentes dans le fichier .txt alors que j'aimerais qu'elles s'écrivent à la suite les unes des autres... Ms je ne comprends pas bien les histores de pointeurs dans un fichier ...

[plaineR]

Pour le problème du fseek si tu ne mets pas ton code on risque d'avoir du mal à le deviner

Pour l'autre problème, remplace 'w' par 'a'.
'w' = écrit dans le fichier en l'écrasant
'a' = écrit dans le fichier à la suite de ce qui existe déjà

[djoule6]

Ok merci plaineR pour le 'A' ;-) !

Pour le FSEEk, mon code est le suivant (il est inséré dans le code de mon 1er post, après l'ouverture de mon fichier) :

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
 
 
BEGIN
 
							 UTL_FILE.PUT(FicOUT,'001');
							 UTL_FILE.PUT(FicOUT,TO_CHAR(SYSDATE,'YYYYMMDD'));
							 UTL_FILE.PUT(FicOUT,'170000');
							 UTL_FILE.PUT(FicOUT,'TOUT');
							 UTL_FILE.FSEEK(FicOUT,NULL,29); 
							 UTL_FILE.PUT(FicOUT,'TEST');
 
							 UTL_FILE.FCLOSE( FicOUT );
 
  					EXCEPTION
     						 WHEN NO_DATA_FOUND THEN
 
							 UTL_FILE.FCLOSE( FicOUT ) ;
  					END  ;

Et l'erreur renvoyé :

Code :

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

1
2
3
4
5
6
 
 
ERREUR :ORA-29284: erreur de lecture du fichier
STATUS=-1 SQLERRM=ORA-29284: erreur de lecture du fichier 
STATUS = -1
SQLERRM = ORA-29284: erreur de lecture du fichier

En fait je voudrais juste laisser 29 'blancs' dans mon fichier entre le 'TOUT' et le 'TEST' mais utiliser le FSEEK n'est peut-etre pas la bonne solution...

[plaineR]

Pourquoi ne pas faire :

Code :

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

1
2
3
v_ligne := '001' || TO_CHAR(SYSDATE,'YYYYMMDD') || '170000' || 
           'TOUT' || lpad (' ',27) || 'TEST';
UTL_FILE.PUT(FicOUT, v_ligne);

[djoule6]

Cool merci beaucoup !!! Je sais que pour vous ca doit etre des trucs faciles mais quand on ne s'y connait pas c'est dur !