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

2.5.24 JMN5129I-S

@1@句のデータ名は,オブジェクト参照データ項目またはこれを含む集団項目であってはなりません.
データ名は無効になります.

引数の説明

@1@:

APPLY SAVED-AREA, CONTROL, SOURCE, DESTINATION CONTROL, TRACK-AREA, ACTUAL KEY, NOMINAL KEY, KEY IS, APPLY REORG-CRITERIA

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P5129.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 REPOSITORY.
      000006     CLASS SYSOBJ AS "System.Object".
      000007 INPUT-OUTPUT   SECTION.
      000008 FILE-CONTROL.
      000009     SELECT PRFILE ASSIGN TO GS-SYS001
      000010     SYMBOLIC DESTINATION IS "PRT"
      000011     DESTINATION-1 IS DIST.
      000012 I-O-CONTROL.
      000013     APPLY SAVED-AREA TO ASV1  ASV2 .
      000014 DATA           DIVISION.
      000015 FILE SECTION.
      000016 FD PRFILE.
      000017 01 PRREC  PIC X(50).
      000018 WORKING-STORAGE SECTION.
      000019 01 DIST        PIC X(8).
      000020 01 ASV1        PIC X(10).
      000021 01 ASV2        USAGE OBJECT REFERENCE SYSOBJ.
      000022 PROCEDURE      DIVISION.
      000023     OPEN I-O PRFILE
      000024     MOVE "NMSVR20" TO  DIST
      000025     WRITE  PRREC
      000026     READ   PRFILE
      000027     CLOSE  PRFILE
      000028 END PROGRAM    P5129.
    

P5129.cob (13) : JMN5129I-S APPLY SAVED-AREA句のデータ名は,オブジェクト参照データ項目またはこれを含む集団項目であってはなりません.データ名は無効になります.