SAK 図書館
SAK 図書館
Oracle PL/SQL utl_file.fopen、get_line、put、new_line、put_line、putf、fflush
Oracle9i - 9.0.1 で機能拡張あり
■FOPEN テキストファイルオープン
fno := utl_file.fopen('g:\tmp', 'test.txt', 'R', 4002);
| | | | |_ レコード長
| | | | (in binary_integer)
| | | | 改行も含むバイト長
| | | | 1 ～ 32767
| | | | 古い Oracle では
| | | | 指定するとエラー
| | | | 省略値は 1023
| | | |_ 入出力モード(in varchar2)
| | | R read (入力)
| | | W write (出力)
| | | A append(追加出力)
| | |_ ファイル名(in varchar2)
| |_ パス(in varchar2)
|_ 戻り値(file_type)
ファイルハンドル
■FOPEN_NCHAR テキストファイル UNICODE オープン
fno := utl_file.fopen_nchar('g:\tmp', 'test.txt', 'R', 4002);
| | | | |_ レコード長
| | | | (in binary_integer)
| | | | 改行も含む文字数
| | | | 1 ～ 32767
| | | | 古い Oracle では
| | | | 指定するとエラー
| | | | 省略値は 1023
| | | |_ 入出力モード
| | | (in varchar2)
| | | R read (入力)
| | | W write (出力)
| | | A append(追加出力)
| | |_ ファイル名(in varchar2)
| |_ パス(in varchar2)
|_ 戻り値(file_type)
ファイルハンドル
■IS_OPEN ファイルハンドル調査
rcd := utl_file.is_open(fno);
| |_ ファイルハンドル(file_type)
|_ 戻り値(boolean)
TRUE = 有効
FALSE = 無効
■FCLOSE テキストファイルクローズ
utl_file.fclose(fno);
|_ ファイルハンドル(in out file_type)
■FCLOSE_ALL 全テキストファイルクローズ
utl_file.fclose_all;
■GET_LINE 1 行リード
utl_file.get_line(fno, rec);
| |_ テキストレコード(out varchar2)
|_ ファイルハンドル(in file_type)
declare
fno utl_file.file_type; -- ファイルハンドル
rec varchar2(2000); -- 入力バッファ
begin
-- ファイルオープン
fno := utl_file.fopen('g:\tmp', 'test.txt', 'R', 2002);
-- リードループ
begin
loop
utl_file.get_line(fno, rec);
dbms_output.put_line(rec);
end loop;
exception
when NO_DATA_FOUND then -- レコード AT END
dbms_output.put_line('正常終了');
when OTHERS then
dbms_output.put_line('** リードエラー');
end;
-- ファイルクローズ
utl_file.fclose(fno);
end;
/
■GET_LINE_NCHAR 1 行 UNICODE リード
utl_file.get_line_nchar(fno, rec);
| |_ テキストレコード(out nvarchar2)
|_ ファイルハンドル(in file_type)
■PUT 文字列ライト
utl_file.put(fno, rec);
| |_ テキストレコード(in varchar2)
|_ ファイルハンドル(in file_type)
■PUT_NCHAR 文字列 UNICODE ライト
utl_file.put_nchar(fno, rec);
| |_ テキストレコード(in nvarchar2)
|_ ファイルハンドル(in file_type)
■NEW_LINE 改行コードライト
utl_file.new_line(fno, 1);
| |_ 改行コード個数(in natural)
| 省略値は 1
|_ ファイルハンドル(in file_type)
■PUT_LINE 1 行ライト
utl_file.put_line(fno, rec);
| |_ テキストレコード(in varchar2)
|_ ファイルハンドル(in file_type)
declare
fno utl_file.file_type; -- ファイルハンドル
rec varchar2(2000); -- 出力バッファ
begin
-- ファイルオープン
fno := utl_file.fopen('g:\tmp', 'test.txt', 'W', 2002);
-- ライト
begin
utl_file.put_line(fno, '書き込みテスト');
utl_file.put_line(fno, '0123456789');
rec := to_char(sysdate, 'yyyy.mm.dd hh24:mi:ss');
rec := 'abc ' || rec || ' def';
utl_file.put_line(fno, rec);
exception
when OTHERS then
dbms_output.put_line('** ライトエラー');
end;
-- ファイルクローズ
utl_file.fclose(fno);
end;
/
-- test.txt 出力結果 --
書き込みテスト
0123456789
abc 2002.07.01 17:07:45 def
■PUT_LINE_NCHAR 1 行 UNICODE ライト
utl_file.put_line_nchar(fno, rec);
| |_ テキストレコード(in nvarchar2)
|_ ファイルハンドル(in file_type)
■PUTF 書式埋め込みライト
utl_file.putf(fno, format, arg1, arg2...);
| | | |_ format の埋め込み引数の個数分指定
| | | 最大値 5 個
| | |_ format の埋め込み第一引数該当データ
| | (in varchar2) 省略値は NULL
| |_ 書式文字列(in varchar2)
| \n 改行コード
| %s 埋め込み引数
|_ ファイルハンドル(in file_type)
declare
fno utl_file.file_type; -- ファイルハンドル
rec varchar2(2000); -- 出力バッファ
begin
-- ファイルオープン
fno := utl_file.fopen('g:\tmp', 'test.txt', 'W', 2002);
-- ライト
begin
rec := to_char(sysdate, 'yyyy.mm.dd hh24:mi:ss');
utl_file.putf(fno, '書き込みテスト\n%s\nabc %s def\n',
'0123456789', rec);
exception
when OTHERS then
dbms_output.put_line('** ライトエラー');
end;
-- ファイルクローズ
utl_file.fclose(fno);
end;
/
-- test.txt 出力結果 --
書き込みテスト
0123456789
abc 2002.07.01 17:07:52 def
■PUTF_NCHAR 書式埋め込み UNICODE ライト
utl_file.putf_nchar(fno, format, arg1, arg2...);
| | | |_ format の埋め込み引数の個数分指定
| | | 最大値 5 個
| | |_ format の埋め込み第一引数該当データ
| | (in nvarchar2) 省略値は NULL
| |_ 書式文字列(in nvarchar2)
| \n 改行コード
| %s 埋め込み引数
|_ ファイルハンドル(in file_type)
■FFLUSH 書き込みバッファ即時出力
utl_file.fflush(fno);
|_ ファイルハンドル(in file_type)
** FFLUSH は、通常使用する必要なし。
■例外
INVALID_PATH パス、または、ファイル名が無効
INVALID_MODE オープンモードが無効
INVALID_FILEHANDLE ファイルハンドルが無効
INVALID_OPERATION ファイル操作が無効
INVALID_MAXLINESIZE 指定レコード長が大きすぎるか、小さすぎる
READ_ERROR ファイルリードエラー
WRITE_ERROR ファイルライトエラー
INTERNAL_ERROR PL/SQL 内部エラー
CHARSETMISMATCH fopen_nchar で、nchar でない操作を行った
VALUE_ERROR 読み込みレコード長がバッファより大きい
NO_DATA_FOUND リードデータなし
■Oracle PL/SQL 編資料
■SQL 基礎実地編資料
■SQL 基礎編資料
■SQL チューニング編資料
■PostgreSQL 編、JAVA Servlet、JSP 編資料
■MySQL 編資料
Copyright (C) 1999-2018 Y.SAK