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

2.4.102 JMN3149I-S

GO TO DEPENDING ON文の一意名@1@は,整数項目でなければなりません.

引数の説明

@1@:

一意名

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID. C3149.
      000003 ENVIRONMENT  DIVISION.
      000004 DATA  DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006    77 DP-CTR PIC XX.
      000007    77 AA     PIC XX.
      000008 PROCEDURE  DIVISION.
      000009     GO TO L1 L2 DEPENDING ON DP-CTR.
      000010   L1. MOVE "AA" TO AA.
      000011       GO TO L3.
      000012   L2. MOVE "BB" TO AA.
      000013   L3. STOP RUN.
    

C3149.cob (9) : JMN3149I-S GO TO DEPENDING ON文の一意名'DP-CTR'は,整数項目でなければなりません.