NetCOBOL V11.1 メッセージ集

2.3.294 JMN1524I-S

VALUE句が指定された報告集団記述項に，BLANK WHEN ZERO句は指定できません．

例題

[C1524.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1524.
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            LINE 2
000014                 COLUMN 3
000015                 PIC S9(4)
000016                 VALUE 10
000017                 BLANK WHEN ZERO.
000018 END PROGRAM     C1524.

C1524.cob 13: JMN1524I-S VALUE句が指定された報告集団記述項に，BLANK WHEN ZERO句は指定できません．