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

2.4.37 JMN3051I-S

CORRESPONDING指定のある@1@文に指定された@2@は,集団項目でなければなりません.

引数の説明

@1@:

MOVE文,ADD文,またはSUBTRACT文

@2@:

一意名

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3051.
      000003 ENVIRONMENT  DIVISION.
      000004 INPUT-OUTPUT SECTION.
      000005 DATA  DIVISION.
      000006 WORKING-STORAGE SECTION.
      000007 01  AA.
      000008     02 CC-1      PIC 9(4).
      000009     02 CC-2      PIC 9(8).
      000010 01  BB.
      000011     02 CC-3      PIC 9(4).
      000012     02 CC-4      PIC 9(8).
      000013 PROCEDURE  DIVISION.
      000014 P-START.
      000015     ADD CORR CC-2 TO BB.
      000016     STOP RUN.
    

C3051.cob (15) : JMN3051I-S CORRESPONDING指定のあるADD文に指定された'CC-2'は,集団項目でなければなりません.