2.7.1 JMN9001I-W

(@1@)@2@文は共通範囲外です．
処理を続行します．

引数の説明

@1@:

SIA，STD

@2@:

CANCEL，COMPUTE，CONNECT，COPY，DELETE，DISCONECT，ENTRY，ERASE，EVALUATE，EXAMINE，EXEC AQL，EXIT PERFORM，FIND，FINISH，GENERATE，GET，GOBACK，IF DB-EXCEPTION，INITIALIZE，INITIATE，MERGE，MODIFY，READY，RELEASE，REPLACE，RETURN，SEARCH，SEARCH ALL，SORT，START，STORE，STRING，TERMINATE，TRANSACTION，UNLOCK，UNSTRING，USE，USE FOR DB-EXCEPTION，USE FOR DBUGGING，USE FOR DEAD-LOCK

例

      000001 @OPTIONS FLAGSW(STDM)
      000002 IDENTIFICATION DIVISION.
      000003 PROGRAM-ID.  C9001.
      000004 ENVIRONMENT  DIVISION.
      000005 DATA         DIVISION.
      000006 WORKING-STORAGE SECTION.
      000007 01  REC01.
      000008     02  REC-1    PIC 9(4).
      000009     02  REC-2    PIC 9(4).
      000010     02  REC-3    PIC 9(4).
      000011 PROCEDURE    DIVISION.
      000012 P-START.
      000013     COMPUTE REC-3 = REC-1 + REC-2.
      000014     STOP RUN.

C9001.cob (13) : JMN9001I-W (STD)COMPUTE文は共通範囲外です．処理を続行します．