在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)

image

2)进入创建的文件:[WRKOBJPDM LIB(ZTEST) OBJ(QJAVASRC) 然后输入 12]

3)在当前画面按下F6毽进入创建源代码界面:

image

4)编写Java代码
String systemString="MACHINE NAME";

image

image

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)

 

image

5、设置Java的ClassPath

1)输入命令:WRKENVVAR,如果之前已经设置过变量“CLASSPATH",可在此变量前输入”2“进入修改,否则需要新增”CLASSPATH”变量,注意:如果有多个路径中间使用“:”分隔,这点与Windows上不同

image

image

4、 编译Java源代码

1)输入QSH命令

2)在QSH命令模式中输入:Javac JavaPgm/testaa.java

image

5、运行Java程序

1)退出QSH

2)输入命令:JAVA CLASS(testaa) OUTPUT(*PRINT)

我们这里是不想出现运行窗口,如果想立即出现显示结果可以不用output参数

运行完成后:之前的所有SPOOL File全部删除,只有我们当前运行Java产生的一个SPOOL File

image

输入“5”查看Spool File 内容

image

posted on 2020-07-13 09:19  itman020  阅读(366)  评论(0编辑  收藏  举报

导航