NetCOBOL V11.1 メッセージ集

2.3.137 JMN1231I-S

RECORD句のデータレコードの最小文字数は，最大文字数より小さくなければなりません． 最小文字数を最大文字数とみなします．

例題

[C1231.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1231.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IN-F ASSIGN TO SYS006.
000007 DATA            DIVISION.
000008 FILE            SECTION.
000009 FD  IN-F RECORD 80 TO 10.
000010 01  IN-R  PIC X(80).
000011 END PROGRAM     C1231.

C1231.cob 9: JMN1231I-S RECORD句のデータレコードの最小文字数は，最大文字数より小さくなければなりません．最小文字数を最大文字数とみなします．