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

2.5.156 JMN5580I-S

@1@文はプログラム定義だけに使用できます.
@1@文は無効とします.

引数の説明

@1@:

ALTER,ENTER,ENTRY,GENERATE,GO TO MORE-LABELS,INITIATE,TERMINATE,SEEK,SUPPRESS,GOBACK,SERVICE-LAVEL,TRANSACTIONまたはUSE LABEL.

      000001 IDENTIFICATION DIVISION.
      000002 CLASS-ID.      C5580.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 REPOSITORY.
      000006 IDENTIFICATION DIVISION.
      000007 OBJECT.
      000008 DATA           DIVISION.
      000009 WORKING-STORAGE SECTION.
      000010 PROCEDURE      DIVISION.
      000011 IDENTIFICATION DIVISION.
      000012 METHOD-ID.     M5580.
      000013 ENVIRONMENT    DIVISION.
      000014 DATA           DIVISION.
      000015 LINKAGE         SECTION.
      000016 PROCEDURE      DIVISION.
      000017     DISPLAY "M5580".
      000018     GOBACK.
      000019 END METHOD     M5580.
      000020 END OBJECT.
      000021 END CLASS      C5580.
    

C5580.cob (18) : JMN5580I-S GOBACK文はプログラム定義だけに使用できます.GOBACK文は無効とします.