埋め込みの説明
@1@ : CONNECT，DISCONNECT，ERASE，ENTRY，FIND，FINISH，GET，IF DB-EXCEPTION，MODIFY，READY，STOREまたはUSE FOR DB-EXCEPTION．
例題
[C5508.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5508. 000003 IDENTIFICATION DIVISION. 000004 OBJECT. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 PROCEDURE DIVISION. 000008 IDENTIFICATION DIVISION. 000009 METHOD-ID. M5508. 000010 ENVIRONMENT DIVISION. 000011 DATA DIVISION. 000012 LINKAGE SECTION. 000013 01 LK1 PIC X. 000014 PROCEDURE DIVISION. 000015 READY. 000016 END METHOD M5508. 000017 END OBJECT. 000018 END CLASS C5508.
C5508.cob 15: JMN5508I-S READY文は，プログラム定義以外に記述できません．
