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

2.5.169 JMN3271I-S

GENERATE文に報告書名@1@を指定するときは,その報告書記述項に本体集団の記述が一つ以上なければいけません.

埋め込みの説明

@1@ : 報告書名

例題

[C3271.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.  C3271.
000003 ENVIRONMENT  DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT LP1FILE ASSIGN TO DA-S-SYS006.
000007 DATA  DIVISION.
000008 FILE SECTION.
000009  FD LP1FILE LABEL RECORD STANDARD
000010     REPORT IS RE-1.
000011 REPORT SECTION.
000012  RD RE-1
000013     CONTROL IS FINAL
000014     PAGE LIMITS 66 LINES
000015     HEADING 3
000016     FIRST DETAIL 10
000017     LAST  DETAIL 50.
000018   01      TYPE PAGE HEADING LINE 5.
000019     02 COLUMN 25 PIC X(8)
000020        VALUE "HEADER-1".
000021 PROCEDURE  DIVISION.
000022 P-START.
000023     OPEN OUTPUT LP1FILE.
000024     INITIATE RE-1.
000025     GENERATE RE-1.
000026     TERMINATE RE-1.
000027     CLOSE LP1FILE.
000028     STOP RUN.

C3271.cob 25: JMN3271I-S GENERATE文に報告書名'RE-1'を指定するときは,その報告書記述項に本体集団の記述が一つ以上なければいけません.