埋め込みの説明
@1@ : CHARACTER TYPEまたはPRINTING POSITION.
例題
[P2902.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2902. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SRTFILE1 ASSIGN TO SYS001. 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 SD SRTFILE1. 000011 01 SRTF1REC CHARACTER TYPE MODE-1. 000012 02 PIC N(80). 000013 WORKING-STORAGE SECTION. 000014 01 WFS1 PIC X(2). 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2902.
P2902.cob 11: JMN2902I-S CHARACTER TYPE句は,整列併合用ファイルのレコード記述項に指定できません.
詳細な説明
整列併合用ファイルは内部的に生成されるファイルです.整列併合用ファイル記述項(レベル指示語SDの項目)の後に,少なくとも1つのレコード記述項を書かなければなりませんが,整列併合用ファイルに対して,入出力文を実行することはできません.
CHARACTER TYPE句,PRINTING POSITION句はレコードの印字のための情報を指定する句です.これらは,整列併合用ファイルのレコード記述項に指定できません.