RPG での String オブジェクトの作成
String オブジェクトを Java™ メソッドに渡す必要がある場合は、次のようにして String オブジェクトを作成することができます。
D newString PR O EXTPROC(*JAVA
D : 'java.lang.String'
D : *CONSTRUCTOR)
D value 65535A CONST VARYING
D string S like(jstring)
/free
string = newString ('abcde');
…
/end-free
ストリングを、UCS-2
データまたはグラフィック・データとして指定して作成したい場合は、以下のコーディングを使用します。
D newStringC PR O EXTPROC(*JAVA
D : 'java.lang.String'
D : *CONSTRUCTOR)
D value 16383C CONST VARYING
D string S like(jstring)
D graphicData S 15G
D ucs2Data S 100C
/free
string = newStringC (%UCS2(graphicData));
…
string = newStringC (ucs2Data);
/end-free