| 12
 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
 
 |  
    v_open_mode	:=	C_APPEND_MODE;
    file_return	:=	UTL_FILE.FOPEN	(location	=>	t_location
			,filename  	=>	t_filename
			,open_mode 	=>	C_APPEND_MODE
			);
 
 
   UTL_FILE.PUT_LINE (file	=>	file_return
		,buffer		=> 	t_text
		  );
  insert into tab_trace values ('1','4','2'||length(t_text));
  commit;				  
  UTL_FILE.FFLUSH			(file_return);
  insert into tab_trace values ('1','4','3');
  commit;
  UTL_FILE.FCLOSE ( file_return );
  insert into tab_trace values ('1','4','4');
  commit;
 
EXCEPTION
WHEN	UTL_FILE.INVALID_PATH	THEN
	insert into tab_trace values ('1','4','ERR1');
	COMMIT;
WHEN	UTL_FILE.INVALID_MODE	THEN
	insert into tab_trace values ('1','4','ERR2');
	COMMIT;
WHEN	UTL_FILE.INVALID_OPERATION	THEN
	insert into tab_trace values ('1','4','ERR3');
	COMMIT;
WHEN	UTL_FILE.WRITE_ERROR		THEN
	insert into tab_trace values ('1','4','ERR4');
	COMMIT;
WHEN	UTL_FILE.INVALID_FILEHANDLE	THEN
	insert into tab_trace values ('1','4','ERR5');
	COMMIT;
WHEN	UTL_FILE.READ_ERROR			THEN
	insert into tab_trace values ('1','4','ERR6');
	COMMIT;
WHEN	NO_DATA_FOUND		THEN
	insert into tab_trace values ('1','4','ERR7');
	COMMIT;
WHEN	VALUE_ERROR			THEN
	insert into tab_trace values ('1','4','ERR8');
	COMMIT;
WHEN	OTHERS				THEN
	insert into tab_trace values ('1','4','ERR9');
	COMMIT;
END; |