引数の説明
送出し側一意名 |
受取り側一意名 |
例
000001 CLASS-ID. C3411. 000002 ENVIRONMENT DIVISION. 000003 CONFIGURATION SECTION. 000004 REPOSITORY. 000005 CLASS SYS-INT32 AS "System.Int32". 000006* 000007 OBJECT. 000008 PROCEDURE DIVISION. 000009* 000010 METHOD-ID. M1. 000011 DATA DIVISION. 000012 WORKING-STORAGE SECTION. 000013 01 OBJ-INT32 OBJECT REFERENCE SYS-INT32. 000014 01 X-DATA PIC X(4). 000015 LINKAGE SECTION. 000016 PROCEDURE DIVISION. 000017 SET OBJ-INT32 TO X-DATA. 000018 END METHOD M1. 000019* 000020 END OBJECT. 000021 END CLASS C3411.
C3411.cob (17) : JMN3411I-S 'X-DATA'は'OBJ-INT32'に代入できません.
詳細な説明
明に書いたSET文,または暗黙のSET文において,送出し側と受取り側の組み合わせが規則として許されない場合に,このメッセージが出力されます.組み合わせの規則は,“COBOL 文法書”の“11.8.2.6.1 代入時の適合”に示されていますので,そちらをご確認ください.