引数の説明
入出力節またはデータ部の句. |
エラーの原因となったデータ名. |
USAGE BINARY-CHAR. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C5260.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT RLFILE1 ASSIGN TO SYS001
000007 ORGANIZATION IS RELATIVE
000008 RELATIVE KEY IS WRKY
000009 FILE STATUS IS WFS1.
000010 I-O-CONTROL.
000011 DATA DIVISION.
000012 FILE SECTION.
000013 FD RLFILE1.
000014 01 RLF1REC.
000015 02 PIC X(80).
000016 WORKING-STORAGE SECTION.
000017 01 WFS1 PIC X(2).
000018 01 WRKY BINARY-CHAR UNSIGNED.
000019 PROCEDURE DIVISION.
000020 END PROGRAM C5260.
C5260.cob (8) : JMN5260I-S RELATIVE KEY句のデータ名WRKYはUSAGE BINARY-CHAR句を指定した項目であってはなりません.