埋め込みの説明
@1@ : 転記の送出し側
@2@ : 転記の受取り側
例題
[C3450.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3450. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 GRP. 000006 02 A-GRP. 000007 03 A-AREA PIC X(4). 000008 03 FILLER PIC X(1). 000009 02 B-GRP REDEFINES A-GRP. 000010 03 FILLER PIC X(1). 000011 03 B-AREA PIC X(4). 000012 PROCEDURE DIVISION. 000013 MOVE A-AREA TO B-AREA. 000014 END PROGRAM C3450.
C3450.cob 13: JMN3450I-W 送出し側項目'A-AREA'の領域と受取り側項目'B-AREA'の領域が重なっているため,転記の結果は規定されません.
詳細な説明
明に書いたMOVE文または暗黙のMOVE文において,送出し側と受取り側の領域が一部でも重なっている場合,その転記の結果は重なりの度合いや領域長などの条件によって変わり,一定の規則に則った結果は得られません.