ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.4.237 JMN2440I-S

ページ脚書き報告集団にNEXT GROUP句を指定する場合,NEXT PAGEは指定できません.

例題

[P2440.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2440.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT REPFILE ASSIGN TO SYS001.
000007 DATA           DIVISION.
000008 FILE            SECTION.
000009 FD REPFILE
000010       REPORT IS REP1.
000011 WORKING-STORAGE SECTION.
000012 01 WSO1        PIC X(10).
000013 01 WSO2        PIC X(10).
000014 REPORT          SECTION.
000015 RD REP1 PAGE 66
000016         HEADING 2
000017         LAST DETAIL 60.
000018 01 TYPE PF NEXT GROUP NEXT PAGE.
000019   02 LINE 61.
000020     03 COLUMN 10 PIC X(10) SOURCE WSO1.
000021 PROCEDURE      DIVISION.
000022 END PROGRAM    P2440.

P2440.cob 18: JMN2440I-S ページ脚書き報告集団にNEXT GROUP句を指定する場合,NEXT PAGEは指定できません.