例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2245.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 I-O-CONTROL.
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD SQFILE1.
000011 01 SQF1REC.
000012 02 PIC X(32767).
000013 WORKING-STORAGE SECTION.
000014 01 WFS1 PIC X(2).
000015 PROCEDURE DIVISION.
000016 END PROGRAM P2245.
P2245.cob (10) : JMN2245I-S 順ファイル(編成VSまたはAS),相対ファイル,索引ファイル,または固定長形式のファイルのレコード長は,32760バイト以下でなければなりません.レコード長を32760バイトとみなします.
詳細な説明
COBOL処理系の定量制限です.