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

2.3.319 JMN1540I-S

PASSWORD句は順ファイル(編成ASまたはVS),相対ファイルまたは索引ファイル以外に指定できません.

例題

[C1540.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1540.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IN-F ASSIGN TO INFILE
000007     ORGANIZATION IS SEQUENTIAL
000008     PASSWORD     IS PSWD1.
000009 DATA            DIVISION.
000010 FILE            SECTION.
000011 FD  IN-F.
000012 01  IN-R  PIC X(80).
000013 WORKING-STORAGE SECTION.
000014 01  PSWD1       PIC X(8) VALUE "COMP1234".
000015 END PROGRAM C1540.

C1540.cob 8: JMN1540I-S PASSWORD句は順ファイル(編成ASまたはVS),相対ファイルまたは索引ファイル以外に指定できません.

C1540.cob 8: JMN1477I-I このシステムでは,'PASSWORD'は注釈扱いです.