埋め込みの説明
@1@ : 報告書名
例題
[C3271.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3271. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT LP1FILE ASSIGN TO DA-S-SYS006. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD LP1FILE LABEL RECORD STANDARD 000010 REPORT IS RE-1. 000011 REPORT SECTION. 000012 RD RE-1 000013 CONTROL IS FINAL 000014 PAGE LIMITS 66 LINES 000015 HEADING 3 000016 FIRST DETAIL 10 000017 LAST DETAIL 50. 000018 01 TYPE PAGE HEADING LINE 5. 000019 02 COLUMN 25 PIC X(8) 000020 VALUE "HEADER-1". 000021 PROCEDURE DIVISION. 000022 P-START. 000023 OPEN OUTPUT LP1FILE. 000024 INITIATE RE-1. 000025 GENERATE RE-1. 000026 TERMINATE RE-1. 000027 CLOSE LP1FILE. 000028 STOP RUN.
C3271.cob 25: JMN3271I-S GENERATE文に報告書名'RE-1'を指定するときは,その報告書記述項に本体集団の記述が一つ以上なければいけません.