埋め込みの説明
@1@ : GSS,GSW
例題
[P9916.cob] 000001 @OPTIONS FLAGSW(GSS) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9916. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT SQFILE1 ASSIGN TO SYS001 000008 ORGANIZATION IS LINE SEQUENTIAL. 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 P9916.
P9916.cob 11: JMN9916I-E (GSS)OSIVシステムでは,行順ファイルはサポートしていません.