埋め込みの説明
@1@ : CHARACTER TYPEまたはPRINTING POSITION.
例題
[P2312.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2312. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD SQFILE1 000011 LABEL RECORD LVREC. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 01 LVREC. 000015 02 PIC N(40) CHARACTER TYPE MODE-1. 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2312.
P2312.cob 15: JMN2312I-S CHARACTER TYPE句は,LABEL RECORD句に指定されたデータ項目,およびそれに従属するデータ項目に指定できません.
詳細な説明
LABEL RECORD句は廃要素です.このコンパイラでは,LABEL RECORD句は注釈とみなされます.