埋め込みの説明
@1@ : ARGUMENT-NUMBER
@2@ : データ項目,定数
例題
[C3348.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3348. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 ARGUMENT-NUMBER IS A-N. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 AG1 PIC S9(8) BINARY. 000010 PROCEDURE DIVISION. 000011 ACCEPT AG1 FROM A-N. 000012 END PROGRAM C3348.
C3348.cob 11: JMN3348I-S 呼び名が機能名ARGUMENT-NUMBERに対応づけられているとき,'AG1'は符号なし整数項目または符号なし整数でなければなりません.