引数の説明
RELATIVE KEY. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2163.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT RLFILE1 ASSIGN TO R-SYS001
000007 RELATIVE KEY IS RKEY.
000008 I-O-CONTROL.
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD RLFILE1.
000012 01 RLF1REC.
000013 02 PIC X(80).
000014 WORKING-STORAGE SECTION.
000015 01 RKEY PIC X(8).
000016 PROCEDURE DIVISION.
000017 END PROGRAM P2163.
P2163.cob (7) : JMN2163I-W RELATIVE KEY句のデータ名は,8けたの2進項目でなければなりません.8けたの2進項目が指定されたものとみなします.
詳細な説明
ACCESS MODE句のRELATIVE KEYで指定したデータ項目は,プログラムと入出力管理システムの間で相対レコード番号を連絡するために使用されるので,所定の属性である必要があります.