| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| SEQ SEQ | OPEN I/O | 3/5 | 0/5 | 0/5 |
| READ NEXT | -/- | 1/0 | 1/0 | |
| SEQ SEQ | OPEN I/O REVERSED | なし | 0/0 | 0/5 |
| READ NEXT | -/- | 1/0 | 1/0 | |
| REL SEQ | OPEN I/O | 3/5 | 0/5 | 0/5 |
| READ NEXT | -/- | 1/0 | 1/0 | |
| REL SEQ | OPEN I/O | 3/5 | 0/5 | 0/5 |
| START RRN=20 | -/- | 2/3 | 2/3 | |
| REL SEQ | OPEN I/O | 3/5 | 0/0 | 3/5 |
| START RRN=0 | -/- | 2/3 | -/- | |
| IDX SEQ | OPEN INPUT | 0/0 | 3/5 | 0/0 |
| READ NEXT | 1/0 | -/- | 1/0 | |
| IDX SEQ | OPEN I/O | 0/0 | 0/5 | 0/0 |
| START KEY < VALUE | なし | 2/3 | 2/3 |
Micro Focus COBOL が I/O REVERSED 処理のため順編成データ セットを開こうとし、そのデータ セットが存在しない場合、ステータス コード 3/5 が返されます。データ セットが存在しても空の場合は、オープン要求に対してステータス コード 0/0 が返されます。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX SEQ | OPEN OUTPUT | 0/0 | 0/0 | 0/0 |
| WRITE (RECORD W/DUPLICATE ALT KEY) | 0/2 | 0/2 | 0/0 | |
| IDX SEQ | OPEN EXTEND | 0/0 | 0/0 | 0/0 |
| WRITE (RECORD W/DUPLICATE ALT KEY) | 0/2 | 0/2 | 0/0 |
CICS サーバーでは、この書き込み操作の結果として、代替索引に同じキー値を持つレコードが複数含まれることになるかどうかを判別できません。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX SEQ | OPEN I/O | 0/0 | 0/0 | 0/0 |
| START ALT KEY GTEQ LOW-VALUES | 0/0 | 0/2 | 0/0 | |
| DELETE | 0/0 | 0/0 | 1/0 |
CICS サーバーでは、ファイル内に代替索引のキーが同じ別のレコードがある場合、代替索引によるレコードの削除は許可されません。ステータス コード 4/3 が返されます。現在のレコード位置は、失敗した要求の影響を受けません。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX RAN | OPEN I/O | 0/0 | 0/0 | 0/0 |
| WRITE (RECORD W/DUPLICATE ALT KEY) | 0/2 | 0/2 | 0/0 |
CICS サーバーでは、この書き込み操作の結果として、代替索引に同じキー値を持つレコードが複数含まれることになるかどうかを判別できません。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX SEQ | OPEN INPUT | 0/0 | 0/0 | 0/0 |
| START KEY GTEQ HIGH-VALUES | 2/3 | 2/3 | 0/0 | |
| READ NEXT | -/- | -/- | 1/0 |
VSAM はこれを「ファイル末尾への現行レコード ポインターの位置指定」として扱います。これにより、以降の READ PREVIOUS 要求では、ファイル内の最後のレコードが返されます。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX DYN | OPEN INPUT | 0/0 | 0/0 | 0/0 |
| START KEY GTEQ HIGH-VALUES | 2/3 | 2/3 | 0/0 | |
| READ NEXT | -/- | -/- | 1/0 |
VSAM はこれを「ファイル末尾への現行レコード ポインターの位置指定」として扱います。これにより、以降の READ PREVIOUS 要求では、ファイル内の最後のレコードが返されます。
| ファイル編成 (ACC) | 入出力文 | MVS バッチ
COBOL II |
OS/2
MF/COBOL |
CICS サーバー |
|---|---|---|---|---|
| IDX DYN | OPEN I/O | 0/0 | 0/0 | 0/0 |
| START ALT KEY GTEQ LOW-VALUES | 0/0 | 0/0 | 0/0 | |
| READ NEXT (DUPLICATE KEY) | 0/2 | 0/2 | 0/2 | |
| READ NEXT (LAST OF DUPLICATE KEY) | 0/0 | 0/0 | 0/0 | |
| DELETE (LAST OF DUPLICATE KEY) | 0/0 | 0/0 | 4/3 |
CICS サーバーでは、ファイル内に代替索引のキーが同じ別のレコードがある場合、代替索引によるレコードの削除は許可されません。ステータス コード 4/3 が返されます。現在のレコード位置は、失敗した要求の影響を受けません。