例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2832.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO GS-SYS001
000007 SYMBOLIC DESTINATION IS "DSP".
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD SQFILE1.
000011 01 SQF1REC.
000012 02 PIC X(32768).
000013 WORKING-STORAGE SECTION.
000014 01 WFS1 PIC X(2).
000015 PROCEDURE DIVISION.
000016 END PROGRAM P2832.
P2832.cob (10) : JMN2832I-S 表示ファイル,図表ファイルまたはFORMAT句指定の印刷ファイルのレコード長は,32767バイト以下でなければなりません.レコード長を32767バイトとみなします.
詳細な説明
COBOL処理系の定量制限です.