引数の説明
エラーの原因となったデータ名. |
例
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5708. 000003* 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 PROCEDURE DIVISION. 000007 IDENTIFICATION DIVISION. 000008 METHOD-ID. M5708. 000009 ENVIRONMENT DIVISION. 000010 DATA DIVISION. 000011 LINKAGE SECTION. 000012 01 LK1 PIC X(10). 000013 PROCEDURE DIVISION USING BY VALUE LK1. 000014 END METHOD M5708. 000015 END OBJECT. 000016 END CLASS C5708.
C5708.cob (13) : JMN5708I-S 手続き部見出しのBY VALUEに指定されたデータ項目LK1の属性に誤りがあります.
詳細な説明
メソッドの手続き部見出しのBY VALUE指定は対象となる仮パラメタを値渡しでうけとることを指定します.値渡しの場合,メソッド内の手続きで対象となるデータ項目が変更されても,その変更が呼出し元のデータ項目に反映されることはありません.しかし,COBOLではBY VALUE指定は数字型の項目かオブジェクト参照項目にしか指定できません.
英数字項目,日本語項目などを受け取り,メソッド内での操作の結果を呼出し元のデータ項目に反映したくない場合は,メソッドを呼び出す側で実引数に対してBY CONTENT指定をしてください.