NetCOBOL V11.0 メッセージ集

2.6.40 JMN5135I-S

ファイル名'@1@'のASSIGN句のデータ名は，ANY LENGTH句を指定した項目，オブジェクト参照項目を含む集団項目，または強く型付けされた項目であってはなりません．

埋め込みの説明

@1@ : エラーの原因となったASSIGN句が指定されたファイル名

例題

[C5135.cob]
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID.      C5135.
000003 ENVIRONMENT    DIVISION.
000004 CONFIGURATION   SECTION.
000005 REPOSITORY.
000006 OBJECT.
000007 DATA           DIVISION.
000008 WORKING-STORAGE SECTION.
000009 PROCEDURE      DIVISION.
000010 METHOD-ID.     M5135.
000011 ENVIRONMENT    DIVISION.
000012 INPUT-OUTPUT    SECTION.
000013 FILE-CONTROL.
000014     SELECT SQFILE ASSIGN TO LK1
000015       FILE STATUS IS WFS1.
000016     SELECT SQFILE2 ASSIGN TO WK1.
000017 DATA           DIVISION.
000018 FILE            SECTION.
000019 FD SQFILE.
000020 01 SQREC       PIC X(80).
000021 FD SQFILE2.
000022 01 SQREC2      PIC X(80).
000023 WORKING-STORAGE SECTION.
000024 01 WFS1        PIC X(2).
000025 01 WK1   TYPE  TYP1.
000026 01 TYP1  TYPEDEF.
000027  02  DATA1 PIC 9(4).
000028  02  DATA2 PIC X(8).
000029 LINKAGE         SECTION.
000030 01 LK1         PIC X ANY LENGTH.
000031 PROCEDURE      DIVISION
000032                      USING LK1.
000033 END METHOD     M5135.
000034 END OBJECT.
000035 END CLASS      C5135.

C5135.cob 19: JMN5135I-S ファイル名'SQFILE'のASSIGN句のデータ名は，ANY LENGTH句を指定した項目，オブジェクト参照項目を含む集団項目，または強く型付けされた項目であってはなりません．