埋め込みの説明
@1@ : MOVE, INITIALIZE, STRING，UNSTRING
例題
[C3372.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3372. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 RCV PIC 9(5). 000007 01 DATA-A PIC X(20) VALUE "ABC". 000008 PROCEDURE DIVISION. 000009 MOVE FUNCTION LENGTH(DATA-A) TO RCV *> ERROR 000010 COMPUTE RCV = FUNCTION LENGTH(DATA-A) *> OK 000011 END PROGRAM C3372.
C3372.cob 9: JMN3372I-S MOVE文の送出し側として，整数関数および数字関数は指定できません．
詳細な説明
整数関数および数字関数は，算術式中にだけ記述することができます．
整数関数および数字関数の値を変数に設定する場合は，COMPUTE文を使用してください．
