埋め込みの説明
@1@ : SOURCEまたはSUM.
例題
[P2481.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2481. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD REPFILE 000010 REPORT IS REP1. 000011 WORKING-STORAGE SECTION. 000012 01 . 000013 02 WSO1 PIC X(10) OCCURS 10. 000014 REPORT SECTION. 000015 RD REP1 PAGE 66. 000016 01 TYPE DE. 000017 02 LINE 12. 000018 03 COLUMN 10 PIC X(10) SOURCE WSO1(). 000019 PROCEDURE DIVISION. 000020 LB. 000021 END PROGRAM P2481.
P2481.cob 18: JMN2481I-S 有効な語がSOURCE句の一意名の添字または部分参照子に指定されていません.添字または部分参照子に1が指定されたものとみなします.