例題
[P2838.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2838. 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 FORMATTED RECORD FREC. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2838.
P2838.cob 11: JMN2838I-S FORMATTED RECORD句を指定するファイルは,表示ファイル,図表ファイルまたはFORMAT句指定の印刷ファイルでなければなりません.
詳細な説明
FORMATTED RECORD句は,OSIV系システムの固有機能です.