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

2.4.36 JMN3050I-W

CORRESPONDING指定のある@1@文で,対応の取れる項目が一つもありません.
この文は,無効になります.

引数の説明

@1@:

MOVE文,ADD文,またはSUBTRACT文

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3050.
      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 AA TO BB.
      000016     STOP RUN.
    

C3050.cob (15) : JMN3050I-W CORRESPONDING指定のあるADD文で,対応の取れる項目が一つもありません.この文は,無効になります.

詳細な説明

CORRESPONDING指定のある文では,送出し側と受取り側とで対応の取れる基本項目が一つもなければ,その文は意味を持ちません.このときの「対応の取れる基本項目」とは,単に基本項目同士の名前が一致していることを意味するわけではありません.「それぞれ直前までの修飾語の名前の系列が同じである」必要があることに注意してください.これはつまり修飾名(集団項目の階層を表した名前)「~ OF 基本項目名」における"~"の部分も一致している必要があることを示しています.