POS キーワードは、自由形式サブフィールド定義で使用されて、 データ構造内のサブフィールドの開始位置を指定します。
開始位置パラメーターは、1 からデータ構造の長さまでの範囲内の値でなければなりません。
パラメーターにはリテラルまたは名前付き定数を指定できます。名前付き定数である場合、定義ステートメントの前にその定数が定義されている必要があります。
DCL-DS indds LEN(99);
exit IND POS(3);
refresh IND POS(5);
cancel IND pos(12);
sflclr IND pos(55);
sfldsp IND pos(56);
END-DS;
DCL-DS Qwc JOBI0100_t QUALIFIED;
Job_Type CHAR(1) POS(61);
Job_Subtype CHAR(1) POS(62);
Default_Wait INT(10) POS(73);
END-DS;
