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

2.5.201 JMN5749I-S

@1@文に補助語である@2@だけが,指定されています.
@1@文を無効とします.

引数の説明

@1@:

INVOKEまたはCALL.

@2@:

BY.

      000001 IDENTIFICATION DIVISION.
      000002 CLASS-ID.      C5749.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION  SECTION.
      000005*
      000006 IDENTIFICATION DIVISION.
      000007 STATIC.
      000008 PROCEDURE      DIVISION.
      000009 METHOD-ID.     MAIN.
      000010 DATA DIVISION.
      000011 WORKING-STORAGE SECTION.
      000012 01 WOBR        OBJECT REFERENCE C5749.
      000013 01 P1          PIC S9(9) COMP-5.
      000014 01 P2          PIC X.
      000015 LINKAGE         SECTION.
      000016 PROCEDURE      DIVISION.
      000017     INVOKE WOBR "M5749" USING BY P1.
      000018 END METHOD     MAIN.
      000019 END STATIC.
      000020*
      000021 IDENTIFICATION DIVISION.
      000022 OBJECT.
      000023 PROCEDURE      DIVISION.
      000024 METHOD-ID.     M5749.
      000025 DATA           DIVISION.
      000026 LINKAGE         SECTION.
      000027 01 LK1         PIC S9(9) COMP-5.
      000028 PROCEDURE DIVISION USING LK1.
      000029     DISPLAY "HELLO!".
      000030 END METHOD     M5749.
      000031 END OBJECT.
      000032 END CLASS      C5749.
    

C5749.cob (17) : JMN5749I-S INVOKE文に補助語であるBYだけが,指定されています.INVOKE文を無効とします.