原创力文档- 1、本文档共18页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
AS400开发java技术调研
AS400上面开发java技术调查方案
做成者：段高辉
日期：2012-3-28
调查目的
在AS400上使用RPG开发，操作数据的效率当然会快很多，但是RPG处理数据逻辑毕竟是非常麻烦。其实在AS400 v5r4以上的版本都是可以支持java开发，下面是一个用Java开发CL命令：MD DIR (javaPgm)
查看java工作目录：
如图：输入CL命令：QSH ，进入上图，打 ls 命令，出现2.1创建的java工作目录（备注：删除该目录直接使用：RMDIR javaPgm
创建源文件
CRTSRCPFFILE(LIBNAME/FILENAME)?IGCDTA(*YES)
创建java文件：
WRKOBJPDM LIB(ZTEST) OBJ(QJAVASRC) 然后输入 12在当前画面按下F6毽进入创建源代码界面：
/**
*
* 方法名 : readData
* <p> 描述 : 读取数据库操作</p>
* @param sql
* @return
*
* <p> ADD BY DUAN GAOHUI AT TIME 2012-1-16 </P>
*/
public String readData(String sql){
Connection conn = null;
Statement stmt = null;
ResultSet rs = null;
String name = "";
conn = getConnection();
try {
stmt = conn.createStatement();
rs = stmt.executeQuery(sql);
while(rs.next()) {
name = rs.getString("NAME");
}
rs.close();
stmt.close();
} catch (SQLException e) {
System.out.println("ERROR: 读数据失败");
} finally {
closeConnection(conn);
}
return name;
}
配置环境变量
New value . . . . . . . . . . . 'JavaPgm:/qibm/ProdData/OS400/Java400/ojdbc1
4.jar:/javaPgm/*.class'
如果不存在jar包，请将jar文件放到指定路径下面
备注：如果之前已经设置过变量“CLASSPATH",可在此变量前输入”2“进入修改，否则需要新增”CLASSPATH”变量，注意：如果有多个路径中间使用“:”分隔将源代码复制成Stream File
CPYTOSTMF FROMMBR('/qsys.lib/studgh.lib/qjavasrc.file/DBConn.mbr') TOSTMF
('javaPgm/DBConn.java') STMFOPT(*REPLACE) STMFCODPAG(*PCASCII)
按F4进入下面画面：
执行确定。
编译java文件
用CL命令：QSH 进入
编译两个文件（两个文件的代码，见附录）
成功后开始编写RPG程序
开始编写RPG程序
执行结果：
辅助资料:
Examples of Prototyping Java Methods
This section presents some examples of prototyping Java methods.
Example 1
The Java Integer class contains a static method called toString, which accepts an int parameter, and returns a String object. It is declared in Java as follows:
static String Integer.toString(int)
This method would be prototyped as follows:
D tostring PR O EXTPROC(*JAVA:?
D
文档评论（0）