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

2.4.532 JMN2907I-S

SUM句は,外部10進項目,英数字項目,数字編集項目,英数字編集項目および外部浮動小数点項目以外には,指定できません.

例題

[P2907.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2907.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT SQFILE1 ASSIGN TO SYS001.
000007 I-O-CONTROL.
000008 DATA           DIVISION.
000009 FILE            SECTION.
000010 FD SQFILE1
000011       REPORT IS REP1.
000012 WORKING-STORAGE SECTION.
000013 01 CTLD         PIC 9(2).
000014 01 .
000015   02 WITM       PIC 9(2) OCCURS 10.
000016 REPORT          SECTION.
000017 RD REP1 PAGE 66
000018       CONTROL CTLD.
000019 01 TYPE CF CTLD.
000020   02 WSC1      PIC N(4) SUM WITM(2).
000021 PROCEDURE      DIVISION.
000022 END PROGRAM    P2907.

P2907.cob 20: JMN2907I-S SUM句は,外部10進項目,英数字項目,数字編集項目,英数字編集項目および外部浮動小数点項目以外には,指定できません.

詳細な説明

SUM句は合計カウンタを設定します.合計カウンタは,コンパイラが生成する演算符号付きの数字データ項目です.