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

2.5.105 JMN3149I-S

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

埋め込みの説明

@1@ : 一意名

例題

[C3149.cob]
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'は,整数項目でなければなりません.