例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2334.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD SQFILE1 IS EXTERNAL
000010 LINAGE 0.
000011 01 SQF1REC.
000012 02 PIC X(80).
000013 WORKING-STORAGE SECTION.
000014 PROCEDURE DIVISION.
000015 END PROGRAM P2334.
P2334.cob (10) : JMN2334I-S 論理ページの大きさ(語LINAGEに続く最初の整数の値)は,正でなければなりません.1とみなします.
詳細な説明
ページの大きさは行数で示します.値は正の数でなければなりません.