Java 変数へのアクセス

オブジェクト指向 COBOL プロキシで「setname」メソッドと「getname」メソッドを呼び出すと、Java クラスのパブリック メンバーと静的変数にアクセスできます。Java では変数名の大文字、小文字が区別されるため、COBOL プログラム内に記述する変数名部分 (name) は、Java コード内での宣言に大文字、小文字の区別まで一致させる必要があります。

たとえば、次の Java クラスに含まれるパブリック変数 (classVal、instVal) にアクセスする場合を考えてみましょう。

public class x {
    static int classVal;
    int instVal;
};

次の COBOL コード例は、静的変数 classVal を設定し、続いてメンバー instVal の値を取得します。

$set ooctrl(-f+p)
repository.
     class x as "$Java$x"
     .

 working-storage section.
 copy "javatypes.cpy".
 01 anX                  object reference.
 01 anInt                jint.
 procedure division.
     invoke x "setclassVal" using by value 4
     invoke x "new" returning anX
     invoke anX "getinstVal" returning anInt