埋め込みの説明
@1@ : RECORD KEY,ALTERNATE RECORD KEY,NOMINAL KEY,PROCESSING CONTROLまたはMESSAGE CODE.
@2@ : 句に指定可能なデータ項目長の上限.
例題
[P2159.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2159. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT PRFILE1 ASSIGN TO GS-SYS001 000007 SYMBOLIC DESTINATION IS "DSP" 000008 PROCESSING CONTROL WPCT. 000009 I-O-CONTROL. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD PRFILE1. 000013 01 PRF1REC. 000014 02 PIC X(80). 000015 WORKING-STORAGE SECTION. 000016 01 WPCT PIC X(129). 000017 PROCEDURE DIVISION. 000018 END PROGRAM P2159.
P2159.cob 8: JMN2159I-S PROCESSING CONTROL句のデータ名の項目長は,128バイトを超えてはなりません.