Discussion :

[StringBuilder]

Bonjour,

Je suis en train d'écrire un PL.
Je pense que mon erreur est grossière, mais je n'arrive absolument pas à comprendre ce qu'il se passe.

Visiblement, ça plante sur le UTL_FILE.FOPEN

Mais je ne comprends pas du tout pourquoi !

Code sql :

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
58
59
60
61
62
63
64
65
66
67
68
 
set serveroutput on size 1000000;
spool &1.log;
 
declare
 
	-- Paramètres :
        P_Codsoc	number(3) := &2;
 
	-- Pointeurs fichiers :
        Spoint  UTL_FILE.FILE_TYPE;
 
begin
	dbms_output.put_line('Création du fichier');
 
	-- Création du fichier
	Spoint := UTL_FILE.FOPEN('/gnxdevcan/out/fm/cedilac','test.sd','W');
 
	dbms_output.put_line('Fichier créé');
 
	-- Lecture de la base
	dbms_output.put_line('Lecture de la base');
	begin
		for curCrit in
		(
			select lpad(decode(tbl.codtbl, 
        			'047', '9', 
        			'050', '5', 
        			'051', '11', 
        			'052', '8', 
        			'053', '3', 
        			'059', '6', 
        			'060', '16', 
        			'061', '10', 
        			'209', '15', 
        			'uni', '2'
        			), 2, '0') numcrit, tbl.cletbl, decode(ttu.cletbl, '052', tbl.lib1, tbl.lir) libtbl, ttu.lir nomcrit
			from tbl ttu
			inner join tbl on tbl.codsoc = ttu.codsoc and tbl.codtbl = lower(ttu.cletbl)
			where ttu.codsoc = P_Codsoc
			and ttu.codtbl in ('tbl', 'ttu')
			and ttu.cletbl in ('047', '050', '051', '052', '053', '059', '060', '061', '209', 'UNI')
			union all
			select '04', codefam, lirfam, 'Fam Prod'
			from fam
			where codsoc = P_Codsoc
			and typtie = 'PRO'
		)
		loop
			-- Insertion de la ligne dans le fichier
			dbms_output.put_line('On écrit une ligne...');
                	UTL_FILE.PUTF(Spoint, '%s;"%s";"%s";"%s"\n', curCrit.numcrit, curCrit.cletbl, curCrit.libtbl, curCrit.nomcrit);
		end loop;
 
		dbms_output.put_line('Fin de lecture de la base');
 
       	exception
       		when NO_DATA_FOUND then
       			dbms_output.put_line('Aucune donnée trouvée');
       		when OTHERS then
       			dbms_output.put_line(sqlerrm);
       	end;
 
	-- Fermeture du fichier
	dbms_output.put_line('Fermeture du fichier');
	UTL_FILE.FCLOSE(Spoint);
end;     
/

Je lance comme suit :

Code :

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

sqlplus xxx/xxx @sql/q_fm_crit "q_fm_crit" 100

Et l'erreur :

old 4: P_Codsoc number(3) := &2;
new 4: P_Codsoc number(3) := 100;
UTL_FILE.FOPEN('/gnxdevcan/out/fm/cedilac','test.sd','W');
Création du fichier
declare
*
ERROR at line 1:
ORA-29283: invalid file operation
ORA-06512: at "SYS.UTL_FILE", line 536
ORA-29283: invalid file operation
ORA-06512: at line 14

[StringBuilder]

Alors là, je pige rien...
Si je remplace le chemin par "." alors ça marche.

Pourtant le dossier est valide !

[Waldar]

Ça pourrait être un problème de droits au niveau de l'OS sur ce dossier.

[Bluedeep]

Tu es sur que l'utilisateur du process du DBMS (ou ce qui en tient lieu sur ton système - Linux, Unix, autre ??) a le droit d'accès sur le répertoire spécifié ?

[mnitu]

Le processus d’Oracle doit avoir les droits d’écriture au niveau OS sur le sous-répertoire en question.

Supprimez ce morceau de code stupide:

Code :

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

1
2
3
4
5
6
7
 
...
exception
           when NO_DATA_FOUND then
             dbms_output.put_line('Aucune donnée trouvée');
           when OTHERS then
             dbms_output.put_line(sqlerrm);