例題
[C1579.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1579. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT AFILE ASSIGN TO DISK 000007 ORGANIZATION IS SEQUENTIAL 000008 LOCK MODE IS MANUAL WITH LOCK ON MULTIPLE RECORDS. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD AFILE. 000012 01 A-REC PIC X(10). 000013 END PROGRAM C1579.
C1579.cob 8: JMN1579I-S LOCK MODE句のMANUALは，相対ファイルまたは索引ファイルにのみ指定できます．
