例題
[P2026.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2026. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD SQFILE1. 000010 01 SQF1REC. 000011 02 PIC X(80) VALUE SPACE. 000012 LINKAGE SECTION. 000013 01 LK1 PIC X(2) VALUE SPACE. 000014 PROCEDURE DIVISION USING LK1. 000015 END PROGRAM P2026.
P2026.cob 11: JMN2026I-W VALUE句は,ファイル節または連絡節中のデータ記述項に指定できません.VALUE句は,無効になります.
P2026.cob 13: JMN2026I-W VALUE句は,ファイル節または連絡節中のデータ記述項に指定できません.VALUE句は,無効になります.
詳細な説明
VALUE句はデータ項目に初期値を与えるための句です.ファイル節のデータ記述項はレコードのデータ構造を定義するための宣言です.また,連絡節のデータ記述項は,呼ぶプログラムと呼ばれるプログラムで参照するデータの構造を定義するための宣言です.これらは初期値を持つことはできません.