埋め込みの説明
@1@ : エラーの原因となった手続き名.
例題
[C2669.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C2669. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 P1 PIC X(4). 000007 PROCEDURE DIVISION. 000008 CALL "SUB2669" USING P1. 000009 P1. 000010 EXIT PROGRAM. 000011 END PROGRAM C2669.
C2669.cob 8: JMN2669I-E CALL文のUSING指定に手続き名'P1'の指定があります.このシステムでは、結果は保証されません.
詳細な説明
主な原因として以下の2点が考えられます.
CALL文のUSINGに手続き名が指定されています.“COBOL文法書”を参照のうえ,正しい書き方に修正してください.
CALL文のUSINGに手続き名と同じ名前の一意名が指定されています.手続き名または一意名を異なる名前に修正してください.