2.2.221 JMN1396I-S

記号定数'@1@'は@2@句に指定できません．

引数の説明

@1@:

記号定数の名標

@2@:

記号定数の指定できる各句

例

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.     C1396.
      000003 ENVIRONMENT     DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 SPECIAL-NAMES.
      000006     SYMBOLIC CONSTANT
      000007       CON1 IS "MAX".
      000008 DATA            DIVISION.
      000009 WORKING-STORAGE SECTION.
      000010 01  WK-TBL.
      000011   02  ITEM1 PIC X OCCURS CON1.
      000012 END PROGRAM     C1396.

C1396.cob (11) : JMN1396I-S 記号定数'CON1'はOCCURS句に指定できません．