埋め込みの説明
@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
例題
[C9001.cob] 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文は共通範囲外です．処理を続行します．
C9001.cob 13: JMN9123I-W (STD)二項演算子または単項演算子+は共通範囲外です．処理を続行します．
