CobolNational Java クラスを使用すると、UTF-16 文字列を生成して、COBOL の PIC N(...) usage is national フィールドに渡すことができます。
たとえば、次の COBOL プログラム (hellonat) は文字列 "Hello From Java" を受け取り、PIC N(40) USAGE IS NATIONAL として定義したデータ項目に格納します。
$set unicode(portable) working-storage section. linkage section. 01 lnk-natstring pic n(40) usage is national. procedure division using lnk-natstring. display "Java said to COBOL [" lnk-natstring "]" move "Hello From Java" to lnk-natstring exit program returning 0.
文字列 "Hello From Java" を COBOL プログラム hellonat に渡す Java コードは次のとおりです。
CobolNational cobnat = new CobolNational("Hello From Java", 40); RuntimeSystem.cobcall("hellonat", new ParameterList().add(cobnat)); System.out.println(cobnat.toString());