引数の説明
送出し側一意名 |
受取り側一意名 |
例
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 代入時の適合”に示されていますので,そちらをご確認ください.