JP1 Version 8 JP1/Script(UNIX(R)用)

[目次][用語][索引][前へ][次へ]

TextOpen(テキストファイルをオープンする)

機能

テキスト形式ファイルをオープンします。JP1/Script07-51以降では,ラージファイルが使用できます。

形式

TextOpen ( FilePath 〔, Mode〕 )

指定項目

FilePath

テキスト形式ファイル名のフルパスを文字列,または値を格納した変数名で指定します。

Mode

ファイルオープン時の動作を次の値で指定します。

意味
Create ファイルを無条件に作成する。
ReadOnly ファイルを読み込みモードでオープンする。
WriteOnly ファイルを書き込みモードでオープンする。
ReadWrite ファイルを読み書きモードでオープンする。

ModeにReadOnlyを指定した場合は共用モードで,Cretate,WriteOnly,およびReadWriteを指定した場合は排他モードでオープンします。ただし,HP-UX,Solaris,Linuxの場合は,スクリプト内で使用するファイルだけ排他になります。

この値は省略できます。省略した場合,Createを仮定します。

説明

指定したテキスト形式ファイルをオープンします。コマンドが正常に実行された場合はファイル識別子を,エラーが発生した場合は0を,コマンドの実行結果として返します。

またコマンドが正常に実行された場合は,現在の読み書き開始位置は先頭の0になります。

' _BIN_+ABC.TXTファイルをオープンし,正常なら1レコード入力する。
Dim  file1
file1 = TextOpen ( _BIN_+"ABC.TXT" ,ReadOnly )
If  file1 = 0  Then
  Message( Target_DispOn, "実行結果", _BIN_+"ABC.TXTのオープンに失敗" )
Else
  Dim  buff1
  If  TextRead ( file1 ,buff )  Then
    Message( Target_DispOn, "実行結果", buff )
  End
  TextClose ( file1 )
End