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

2.6.39 JMN5134I-S

@1@句のデータ名@2@は,ANY LENGTH句が指定された項目であってはなりません.

埋め込みの説明

@1@ : 入出力節およびデータ部の句
@2@ : @1@句に指定したデータ名

例題

[C5134.cob]
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID.      C5134.
000003 ENVIRONMENT    DIVISION.
000004 CONFIGURATION   SECTION.
000005 REPOSITORY.
000006 IDENTIFICATION DIVISION.
000007 OBJECT.
000008 ENVIRONMENT    DIVISION.
000009 DATA           DIVISION.
000010 WORKING-STORAGE SECTION.
000011 PROCEDURE      DIVISION.
000012 IDENTIFICATION DIVISION.
000013 METHOD-ID.     M5134.
000014 ENVIRONMENT    DIVISION.
000015 INPUT-OUTPUT    SECTION.
000016 FILE-CONTROL.
000017     SELECT SQFILE ASSIGN TO SYS001
000018       FILE STATUS IS LK1.
000019 DATA           DIVISION.
000020 FILE            SECTION.
000021 FD SQFILE.
000022 01 SQREC       PIC X(80).
000023 LINKAGE         SECTION.
000024 01 LK1         PIC X ANY LENGTH.
000025 PROCEDURE      DIVISION
000026                      USING LK1.
000027 END METHOD     M5134.
000028 END OBJECT.
000029 END CLASS    C5134.

C5134.cob 18: JMN5134I-S FILE STATUS句のデータ名LK1は,ANY LENGTH句が指定された項目であってはなりません.