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

2.3.292 JMN1522I-S

@1@句はレベル番号01の報告集団記述項以外に指定できません.

埋め込みの説明

@1@ : TYPE,NEXT GROUP

例題

[C1522.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1522.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IN-F ASSIGN INFILE.
000007 DATA            DIVISION.
000008 FILE            SECTION.
000009 FD  IN-F REPORT RPT-F.
000010 REPORT          SECTION.
000011 RD  RPT-F PAGE 15 HEADING 2 FIRST DETAIL 5 LAST DETAIL 8 FOOTING 10.
000012 01              TYPE RH.
000013   02            TYPE RH
000014                 LINE 2
000015                 COLUMN 3
000016                 PIC X(15)
000017                 VALUE "*COBOL SAMPLE*".
000018 END PROGRAM     C1522.

C1522.cob 13: JMN1522I-S TYPE句はレベル番号01の報告集団記述項以外に指定できません.