在IBM i (OS/400)中使用CL程序调用Java代码

本示例演示了如何在IBM i (OS/400)中使用CL程序调用Java代码。需要安装Java 8及以上版本。该示例可以帮助开发人员在IBM i上使用Java的特性。

/*开发CL程序*/
PGM  
 DCL   VAR(&JAVA_CMD) TYPE(*CHAR) LEN(200) /*定义存储Java命令的变量*/ 
 DCL   VAR(&CLASS) TYPE(*CHAR) LEN(100) VALUE('com.example.Hello')/* 对应Java类名*/
 DCL   VAR(&PATH) TYPE(*CHAR) LEN(100) VALUE('/home/user/java_lib.jar') /*Jar包路径*/
 DCL   VAR(&PARAM) TYPE(*CHAR) LEN(200) VALUE('-Dfile.encoding=UTF8')/*Java命令的附加参数*/
 MONMSG MSGID(CPF0000) EXEC(NEXT)
 CHGVAR VAR(&JAVA_CMD) VALUE('QSH CMD(' *BCAT +
                           '/QOpenSys/usr/bin/java ' *BCAT +
                           '&PARAM &CLASS -cp &PATH )')
 QSH CMD(&JAVA_CMD)
ENDPGM

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com