例題
[P2136.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2136. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO VS-SYS001 000007 RESERVE NO AREA. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD SQFILE1. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2136.
P2136.cob 7: JMN2136I-W 順ファイル(編成VSまたはAS),相対ファイルまたは索引ファイルに対してRESERVE句を指定した場合,RESERVE整数指定でなければなりません.RESERVE句は,無効になります.
詳細な説明
RESERVE AREA句は,OSIV系システムの固有機能です.