ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.8.113 JMN9916I-E

(@1@)OSIVシステムでは,行順ファイルはサポートしていません.

埋め込みの説明

@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システムでは,行順ファイルはサポートしていません.