在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代码
3、将源代码复制成Stream File
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 内容
