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

2.3.500 JMN2871I-S

@1@句のデータ名は,作業場所節,局所記憶節,連絡節または定数節に定義されていなければなりません.

引数の説明

@1@:

PASSWORD.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID. P2871.
      000003 ENVIRONMENT DIVISION.
      000004 INPUT-OUTPUT SECTION.
      000005 FILE-CONTROL.
      000006    SELECT IN-F ASSIGN INFILE
      000007    ORGANIZATION IS INDEXED
      000008    RECORD KEY IS K1 PASSWORD IS P1.
      000009 DATA DIVISION.
      000010 BASED-STORAGE SECTION.
      000011 01 P1 PIC X(4).
      000012 FILE SECTION.
      000013 FD IN-F.
      000014   01 REC1.
      000015   02 IN-R PIC X(80).
      000016   02 K1 PIC X(4).
      000017 END PROGRAM P2871.
   

P2871.cob (8) : JMN2871I-S PASSWORD句のデータ名は,作業場所節,局所記憶節,連絡節または定数節に定義されていなければなりません.

P2871.cob (8) : JMN1477I-I このシステムでは,'PASSWORD'は注釈扱いです. GIVING指定は,OSIV系システムの固有機能です.