CBLDCDMB('CRAT')

PROCEDURE DIVISIONの指定

CALL 'CBLDCDMB' USING 一意名1 一意名2

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(8) VALUE 'DCDAMINT'.
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(1).
   02 データ名C  PIC X(63).
   02 FILLER    PIC X(3).
   02 データ名D  PIC S9(9) COMP.
   02 データ名E  PIC S9(9) COMP.
   02 データ名G  PIC S9(9) COMP.
   02 データ名H  PIC S9(9) COMP.
01 一意名2.
   02 データ名F  PIC X(4) VALUE 'CRAT'.
   02 データ名I  PIC X(1).
   02 データ名J  PIC X(1).
   02 データ名K  PIC X(1).
   02 FILLER    PIC X(1).
   02 データ名Z  PIC S9(9) COMP VALUE ZERO.

●データ名A

DAMファイルとのインタフェースコードを「VALUE 'DCDAMINT'」と設定します。

●データ名C

作成する物理ファイル名を（スペシャルファイル名＋14文字）以内のパス名で設定します。63文字に満たない場合は，後ろを空白で埋めてください。

●データ名D

OpenTP1ファイルシステム上に割り当てるブロックのブロック長を設定します。

32760を超えないセクタ長×n−8（nは正の整数）を満たす値を設定してください。

セクタ長は次のとおりです。

• キャラクタ型スペシャルファイルの場合：filmkfsコマンドの-sオプション指定値

• 通常ファイルの場合：512バイト

●データ名G

OpenTP1ファイルシステム上に割り当てるブロック数を設定します。

設定できる範囲は1〜2147483647です。

●データ名H

入出力の単位となる，一括処理するブロック数を設定します。

設定できる範囲は0〜2147483647です。0を指定した場合は，10になります。

●データ名F

物理ファイルの割り当てを示す要求コードを「VALUE 'CRAT'」と設定します。

●データ名I

ファイル所有者のアクセス権を設定します。

VALUE 'N'…アクセス権なし

VALUE 'R'…読み出し権だけあり

VALUE 'W'…書き込み権だけあり

VALUE 'B'…読み出し権と書き込み権の両方あり

●データ名J

ファイル所有者グループのアクセス権を設定します。

VALUE 'N'…アクセス権なし

VALUE 'R'…読み出し権だけあり

VALUE 'W'…書き込み権だけあり

VALUE 'B'…読み出し権と書き込み権の両方あり

●データ名K

ファイル所有者以外のアクセス権を設定します。

VALUE 'N'…アクセス権なし

VALUE 'R'…読み出し権だけあり

VALUE 'W'…書き込み権だけあり

VALUE 'B'…読み出し権と書き込み権の両方あり

●データ名Z

0を設定します。

●データ名B

ステータスコードが，5けたの数字で返されます。

●データ名E

ファイル記述子が返されます。