埋め込みの説明
@1@ : 符号系名
例題
[C1360.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1360. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 ALPHABET ALP1 IS 1 THROUGH -1. 000007 END PROGRAM C1360.
C1360.cob 6: JMN1360I-S ALPHABET句のTHROUGH指定またはALSO指定には,符号なし整数,文字定数または表意定数を指定しなければなりません.符号系名'ALP1'は,無効になります.