在AS400上进行Java开发(转)
在AS400上使用RPG开发,操作数据的效率当然会快很多,但是RPG处理数据逻辑毕竟是非常麻烦。其实在AS400 v5r4以上的版本都是可以支持java开发,下面是一个用Java开发删除某一用户下所有Spool File的功能。
1、创建Java工作目录:MD DIR(JavaPgm)
2、编写Java代码
1)创建源文件:CRTSRCPF FILE(LIBNAME/FILENAME) IGCDTA(*YES)
2)进入创建的文件:[WRKOBJPDM LIB(ZTEST) OBJ(QJAVASRC) 然后输入 12]
3)在当前画面按下F6毽进入创建源代码界面:
4)编写Java代码
String systemString="MACHINE NAME";
3、将源代码复制成Stream File
javapgm: directory. it can be created by below command。
Create Directory (CRTDIR)
CPYTOSTMF FROMMBR('/qsys.lib/ztest.lib/qjavasrc.file/testaa.mbr') TOSTMF('javapgm/testaa.java' )
STMFOPT(*REPLACE) STMFCODPAG(*PCASCII)
5、设置Java的ClassPath
1)输入命令:WRKENVVAR,如果之前已经设置过变量“CLASSPATH",可在此变量前输入”2“进入修改,否则需要新增”CLASSPATH”变量,注意:如果有多个路径中间使用“:”分隔,这点与Windows上不同
4、 编译Java源代码
1)输入QSH命令
2)在QSH命令模式中输入:Javac JavaPgm/testaa.java
5、运行Java程序
1)退出QSH
2)输入命令:JAVA CLASS(testaa) OUTPUT(*PRINT)
我们这里是不想出现运行窗口,如果想立即出现显示结果可以不用output参数
运行完成后:之前的所有SPOOL File全部删除,只有我们当前运行Java产生的一个SPOOL File
输入“5”查看Spool File 内容