Erreur de création de trigger avec UTL_FILE

Bonjour, j'utilise Oracle 19C sur un serveur Unix AIX 7, avec SQLDeveloper je veux créer un trigger sur un delete afin de copier l'enregistrement deleté dans un fichier texte.

j'ai donc écrit ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

create or replace trigger trg_del_APMFCQ before delete on APMFCQ for each row when ( CURRENT.CODDTQ = 'XVT')   declare ID_FILE UTL_FILE.FILE_TYPE; MODE_OPEN CHAR(1) := 'A'; begin ID_FILE := UTL_FILE.FOPEN('/tmp','trg_del_APMFCQ.log',MODE_OPEN); UTL_FILE.PUT_LINE(ID_FILE, old.CODDTQ || ' ' || old.DATCRE || ' ' || old.HEUCRE || ' ' || old.VARDTQ); UTL_FILE.FCLOSE(ID_FILE);   end ; /

---

à la compilation j'ai cette erreur :

Citation:

---

Rapport d'erreur -
ORA-00936: expression absente
00936. 00000 - "missing expression"
*Cause:
*Action:

---

si une âme charitable est sur ce forum et peut me donner un coup de main ??
Merci d'avance

Bonjour,

Ce serait bien d'avoir la ligne en erreur. Mais je vois plusieurs soucis:
- Dans la clause WHEN tu utilises CURRENT.CODDTQ, mais c'est plutôt OLD.CODDTQ non?

- Tu as oublié les 2-points pour les :old référencés dans utl_file.put_line. D'ailleurs tu peux simplement faire

Code:

---

UTL_FILE.PUT_LINE(ID_FILE, :old.CODDTQ || :old.DATCRE || :old.HEUCRE || :old.VARDTQ);

---

- Pour UTL_FILE.FOPEN, il faut préciser un directory Oracle, pas un chemin sur le serveur

Merci de bien vouloir m'aider,

pour les ":" et le CURRENT, j'avais fait des essais ...

le problème avec les old dans le PUT_LINE, c'est qu'il ne les reconnait pas :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

create or replace trigger trg_del_APMFCQ before delete on APMFCQ for each row when ( old.CODDTQ = 'XVT')   declare ID_FILE UTL_FILE.FILE_TYPE; MODE_OPEN CHAR(1) := 'A'; begin /*ID_FILE := UTL_FILE.FOPEN('/tmp','trg_del_APMFCQ.log',MODE_OPEN);*/ ID_FILE := ('/tmp','trg_del_APMFCQ.log',MODE_OPEN); UTL_FILE.PUT_LINE(ID_FILE, :old.CODDTQ || ' ' || :old.DATCRE || ' ' || :old.HEUCRE || ' ' || :old.VARDTQ); /*UTL_FILE.FCLOSE(ID_FILE);*/   end ; /

---

à la compilation il me demande d'entrer une valeur de liaison pour "old" .... et si je renseigne "old" comme s'est marqué par défaut, j'ai cette erreur :

Citation:

---

Erreur(5,1): PL/SQL: Statement ignored
Erreur(5,12): PLS-00382: expression du mauvais type

---

Je viens de faire un nouvel essai avec :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

create or replace trigger trg_del_APMFCQ before delete on APMFCQ for each row when ( old.CODDTQ = 'XVT')   declare ID_FILE UTL_FILE.FILE_TYPE; MODE_OPEN CHAR(1) := 'A'; begin ID_FILE := UTL_FILE.FOPEN('/tmp','trg_del_APMFCQ.log',MODE_OPEN); UTL_FILE.PUT_LINE(ID_FILE, :old.CODDTQ || ' ' || :old.DATCRE || ' ' || :old.HEUCRE || ' ' || :old.VARDTQ); UTL_FILE.FCLOSE(ID_FILE);   end ; /

---

et là la compilation est OK ;)

Question : quand tu dis que le répertoire ne doit pas être sur le serveur Unix ??? je ne comprends pas :(

Il faut créer un répertoire au sens Oracle:

Code:

---

1 2	create or replace directory TMP_DIR as '/tmp'; grant read,write on directory TMP_DIR to <user_qui_utilise_la_proc>;

---

Et après tu précises ce répertoire dans utl_file.fopen

Code:

---

UTL_FILE.FOPEN('TMP_DIR','trg_del_APMFCQ.log',MODE_OPEN);

---

J'étais arrivé à cette conclusion et j'ai créé le repertoire Oracle puis j'ai donné les permissions à partir de SYSDBA :

SQL> create or replace directory ora_log as '/tmp';

Directory created.

SQL> grant read,write on directory ora_log to FGE50P087;

Grant succeeded.

SQL> 

La compilation du trigger :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

create or replace trigger trg_del_APMFCQ before delete on APMFCQ for each row when ( old.CODDTQ = 'XVT')   declare ID_FILE UTL_FILE.FILE_TYPE; MODE_OPEN CHAR(1) := 'A'; begin ID_FILE := UTL_FILE.FOPEN('ora_log','trg_del_APMFCQ.log',MODE_OPEN); UTL_FILE.PUT_LINE(ID_FILE, :old.CODDTQ || ' ' || :old.DATCRE || ' ' || :old.HEUCRE || ' ' || :old.VARDTQ); UTL_FILE.FCLOSE(ID_FILE);   end ; /

---

j'ai l'erreur suivante :

Citation:

---

create or replace trigger trg_del_APMFCQ
before delete on APMFCQ
for each row
when ( old.CODDTQ = 'XVT')

declare
ID_FILE UTL_FILE.FILE_TYPE
Rapport d'erreur -
ORA-00990: privilège absent ou non valide
00990. 00000 - "missing or invalid privilege"
*Cause:
*Action:

---

Je vois bien le directory Oracle dans ALL_DIRECTORIES avec le owner = SYS ....
Si j'essai d'exécuter le package UTL_FILE à partir de mon user ... je n'ai pas les privilèges , pourtant j'ai fait un "GRANT ANY PROCEDURE TO user"

du coup je ne sais pas si mon user n'a pas les droits sur la création du fichier ou sur l'exécution du du FOPEN ...