バイナリモードの指定 (SAP ライブラリ - ABAP プログラミング (BC-ABA))

バイナリモードの指定

バイナリモードでファイルを処理するには、 OPEN DATASET 命令の IN BINARY MODE オプションを以下のように使用します。

構文

OPEN DATASET <dsn> IN BINARY MODE [FOR ....].

バイナリモードでオープンされているファイルに対してデータの読み込み、書き込みをする場合、データはバイト単位で転送されます。転送中にはファイルの内容は解釈されません。項目の内容をファイルに書き込む場合は、ソース項目のバイトがすべて転送されます。データをファイルから項目に読み込む場合は、転送されるバイト数は目標項目の長さによって決まります。読み込んだ後に、別の ABAP 命令で目標項目を参照すると、データ型にしたがって項目の内容が解釈されます。

DATA FNAME(60) VALUE 'myfile'.

DATA: NUM1 TYPE I,
NUM2 TYPE I,
TEXT1(4) TYPE C,
TEXT2(8) TYPE C,
HEX TYPE X.

OPEN DATASET FNAME FOR OUTPUT IN BINARY MODE.

NUM1 = 111.
TEXT1 = 'TEXT'.
TRANSFER NUM1 TO FNAME.
TRANSFER TEXT1 TO FNAME.

OPEN DATASET FNAME FOR INPUT IN BINARY MODE.

READ DATASET FNAME INTO TEXT2.
WRITE / TEXT2.

OPEN DATASET FNAME FOR INPUT IN BINARY MODE.

READ DATASET FNAME INTO NUM2.
WRITE / NUM2.

OPEN DATASET FNAME FOR INPUT IN BINARY MODE.

SKIP.
DO.
READ DATASET FNAME INTO HEX.
If SY-SUBRC <> 0.
EXIT.
ENDIF.
WRITE HEX.
ENDDO.

この例の出力は以下のようになります。

###oTEXT
111
00 00 00 6F 54 45 58 54

バイナリモードで書込ファイルの“ myfile ”を開くと、項目 NUM1 と TEXT1 の内容がファイルに書き込まれます（ TRANSFER 命令の詳細については、ファイルへのデータの書込を参照してください）。次に、このファイルを読込用にオープンして、内容のすべてを項目 TEXT2 に読み込んでいます（ READ DTASET 命令については、ファイルからのデータの読込を参照してください）。文字列 TEXT2 の最初の４桁は意味がありません。対応するバイトは整数の 111 を表しているからです（プラットフォームに依存します）。システムはすべてのバイトを文字として解釈しようとします。この解釈方法で正常に解釈されるのは最後の４バイトだけです。 OPEN 命令で位置付けをリセットした後で、ファイルの先頭４バイトを NUM2 に読み込んでいます。 NUM2 の値は、データ型が NUM1 と同じため、値は有効なものになります。最後に、ファイルの８バイトが項目 HEX に逐一読み込まれます。 HEX の画面出力を見れば、実際のファイル内容の 16 進数でどのように表わされるかが分かります。最後の４バイトは単語 TEXT に含まれる文字を ASCII コードで表現したものです。