Trigger and rollback on oracle 9i

Question

hi,
i work on oracle 9i.
in my database i import csv file in en temporary table and make a trigger to update 2 table after insert.
i want to make a csv file wich contain each not good row.
i search a way to cancel the first update if the second update is not good
i try to use a autonomous transaction but there is an error...maybe you can help me and give me a solution to my probleme.
my trigger's code
declare
gache NUMBER;lieu NUMBER;reference NUMBER;test UTL_FILE.FILE_TYPE; erreur NUMBER;
v_file UTL_FILE.FILE_TYPE;
PRAGMA AUTONOMOUS_TRANSACTION;
begin
commit;
SELECT id_lieu INTO lieu
FROM TBL_LIEU
WHERE est_xgs_lieu=1;
IF :NEW.dateImpr IS NOT NULL THEN
IF :NEW.preImpcode1 IS NOT NULL AND :NEW.preImpQt1>0 THEN
SELECT id_reference,POURCENTAGE_GACHE_REFERENCE INTO reference,gache
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.preImpcode1
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)     
VALUES(:NEW.dateMsp, ROUND(:NEW.preImpQt1*((gache/100)+1)), 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - ROUND(:NEW.preImpQt1*((gache/100)+1))
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
     END IF;
IF :NEW.preImpcode2 IS NOT NULL AND :NEW.preImpQt2>0 THEN
SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.preImpcode2
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
          VALUES(:NEW.dateMsp, ROUND(:NEW.preImpQt2*((gache/100)+1)), 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - ROUND(:NEW.preImpQt2*((gache/100)+1))
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
     END IF;
IF :NEW.preImpcode3 IS NOT NULL AND :NEW.preImpQt3>0 THEN
SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.preImpcode3
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
          VALUES(:NEW.dateMsp, ROUND(:NEW.preImpQt3*((gache/100)+1)), 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - ROUND(:NEW.preImpQt3*((gache/100)+1))
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
END IF;
IF :NEW.preImpcode4 IS NOT NULL AND :NEW.preImpQt4>0 THEN
SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.preImpcode4
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
          VALUES(:NEW.dateMsp,ROUND(:NEW.preImpQt4*((gache/100)+1)), 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - ROUND(:NEW.preImpQt4*((gache/100)+1))
WHERE fk_lieu=lieu
     AND fk_reference=reference;
END IF;
END IF;
IF :NEW.preImpcode5 IS NOT NULL AND :NEW.preImpQt5>0 THEN
SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.preImpcode5
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
          VALUES(:NEW.dateMsp, ROUND(:NEW.preImpQt5*((gache/100)+1)), 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - ROUND(:NEW.preImpQt5*((gache/100)+1))
WHERE fk_lieu=lieu
     AND fk_reference=reference;
END IF;
IF reference IS NULL THEN
     erreur:=1;
     end if;
END IF;
END IF;
IF :NEW.dateMsp IS NOT NULL THEN
IF :NEW.encartCode1 IS NOT NULL AND :NEW.encartQt1>0 THEN
     SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE
WHERE code_reference_xgs=:NEW.encartCode1;
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
     VALUES(:NEW.dateExp,:NEW.encartQt1,'Impression',lieu,reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.encartQt1
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
IF :NEW.encartCode2 IS NOT NULL AND :NEW.encartQt2>0 THEN
SELECT id_reference, pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE
WHERE code_reference_xgs=:NEW.encartCode2;
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)     
     VALUES(:NEW.dateExp, :NEW.encartQt2, 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.encartQt2
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
IF :NEW.encartCode3 IS NOT NULL AND :NEW.encartQt3>0 THEN
     SELECT id_reference , pourcentage_gache_reference INTO reference, gache
FROM TBL_REFERENCE
WHERE code_reference_xgs=:NEW.encartCode3;
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
     VALUES(:NEW.dateExp, :NEW.encartQt3, 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.encartQt3
WHERE fk_lieu=lieu
     AND fk_reference=reference;
END IF;
IF :NEW.encartCode4 IS NOT NULL AND :NEW.encartQt4>0 THEN
     SELECT id_reference , pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE
WHERE code_reference_xgs=:NEW.encartCode4;
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
     VALUES(:NEW.dateExp,:NEW.encartQt4, 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.encartQt4
WHERE fk_lieu=lieu
     AND fk_reference=reference;
END IF;
IF :NEW.encartCode5 IS NOT NULL AND :NEW.encartQt5>0 THEN
     SELECT id_reference,pourcentage_gache_reference INTO reference,gache
FROM TBL_REFERENCE
WHERE code_reference_xgs=:NEW.encartCode5;
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
          VALUES(:NEW.dateExp,:NEW.encartQt5, 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.encartQt5
WHERE fk_lieu=lieu
     AND fk_reference=reference;
     END IF;
IF :NEW.codeEnv IS NOT NULL and :NEW.nbPlis>0 THEN
     SELECT id_reference INTO reference
FROM TBL_REFERENCE,TBL_STOCK
WHERE code_reference_xgs=:NEW.codeEnv
AND id_reference=fk_reference
and fk_lieu=lieu;
IF reference IS NOT NULL THEN
     INSERT INTO TBL_SORTIE(date_sortie, quantite_volume_sortie, transporteur_sortie, fk_lieu, fk_reference)
     VALUES(:NEW.dateMsp, :NEW.nbPlis, 'Impression', lieu, reference);
     UPDATE TBL_STOCK
     SET nombre_volume_stock= nombre_volume_stock - :NEW.nbPlis
WHERE fk_lieu=lieu
     AND fk_reference=reference;
END IF;
END IF;
END IF;
EXCEPTION
when NO_DATA_FOUND then
v_file:= UTL_FILE.FOPEN ('DOSSIER_EXP','rejet_stock'||to_char(sysdate,'DD-MM-YYYY-hh24-mi-ss')||'.csv','A',32767);
UTL_FILE.PUT_LINE(v_file,:new.FLUXIDCLIENT||';'||:new.FLUXDATECREATION||';'||:new.NOMCLIENT||';'||:new.APPLILABEL||';'
||:new.LOTID||';'||:new.NUMEROBATCHSOUSLOT||';'||:new.FILIERE||';'||:new.DATEIMPR||';'||:new.DATEMSP||';'
||:new.DATEEXP||';'||:new.NBPAGES||';'||:new.NBPLIS||';'||:new.ISTEMPOST||';'||:new.SSLOTSTATUT||';'
||:new.NOMIMPRIMANTE||';'||:new.MODEIMPRESSION||';'||:new.ENCARTCODE1||';'||:new.ENCARTCODE2||';'||:new.ENCARTCODE3||';'
||:new.ENCARTCODE4||';'||:new.ENCARTCODE5||';'||:new.ENCARTQT1||';'||:new.ENCARTQT2||';'||:new.ENCARTQT3||';'
||:new.ENCARTQT4||';'||:new.ENCARTQT5||';'||:new.PREIMPCODE1||';'||:new.PREIMPCODE2||';'||:new.PREIMPCODE3||';'
||:new.PREIMPCODE4||';'||:new.PREIMPCODE5||';'||:new.PREIMPQT1||';'||:new.PREIMPQT2||';'||:new.PREIMPQT3||';'
||:new.PREIMPQT4||';'||:new.PREIMPQT5||';'||:new.CODEENV||';');
UTL_FILE.FFLUSH (v_file);
UTL_FILE.FCLOSE(v_file);
erreur:=1;
ROLLBACK;
end;

Answer 1

You can't use SAVEPOINT / ROLLBACK TO SAVEPOINT statements in the database trigger:
ORA-04092: cannot SET SAVEPOINT in a trigger
ORA-04092: cannot ROLLBACK in a trigger
I am not sure what you need exactly, but you can try this:
Simulating ROLLBACK TO SAVEPOINT Behavior in a Database Trigger
http://www.quest-pipelines.com/pipelines/plsql/tips02.htm#JUNE
Regards,
Zlatko Sirotic