オブジェクト指向 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