RPGLE から Java メソッドを呼び出す必要があります。次のエラーが発生します。メソッドのプロトタイプを作成した方法が間違っていると思います。
Cause . . . . . : RPG procedure TESTJ in program TESTLIB/TESTJ received
Java exception "java.lang.NoSuchMethodError:
NumberToWord.strconvert([B)Ljava/lang/String;" when calling method
"strconvert" with signature "([B)Ljava.lang.String;" in class
"NumberToWord".
私のJavaコードは正常に動作します。コードは以下のようなものです、
public class NumberToWord
{
.....
.
.
public static String strconvert(String nms) {
.
.
.
return nms;
}
}
間違っているはずの私の RPGLE コードは次のとおりです。
/free
ctl-opt dftactgrp(*no) actgrp(*caller);
dcl-s String1 object(*java:'java.lang.String');
dcl-s String2 object(*java:'java.lang.String');
dcl-s str varchar(250);
dcl-s JAVA_String object( *JAVA :'java.lang.String' );
dcl-pr JAVA_toString like( JAVA_String )
extproc( *JAVA :
'java.lang.String' :
*constructor );
value varchar( 65535 ) const;
end-pr;
dcl-pr getNMTW static like( JAVA_String )
extproc( *JAVA :
'NumberToWord' :
'strconvert' );
value varchar(65535) const;
end-pr;
dcl-pr getBytes char(250) extproc(*java:'java.lang.String':'getBytes');
end-pr;
String1 = JAVA_toString('543'); //works fine
str = getBytes(String1); //works fine
String2 = getNMTW('12345'); //exception occurs at this point
str = getBytes(String2);
*INLR = *ON;
/END-FREE
JAVA_toString メソッドと getBytes メソッドは正常に動作しますが、デバッグ時に getNMTW 関数で例外が発生します。
CLASSPATH はすでに設定されています。NoClassFound エラーの代わりに NoSuchMethodError を取得しているので、問題ないと思います。