引数の説明
CHARACTER TYPEまたはPRINTING POSITION. |
例
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句は注釈とみなされます.