如下代码运行到 if (pc.run() != true) 行时程序好象进入了死循环的状态,想看查看
com.ibm.as400.access.ProgramCall类的源代码.(目前包里面只有CLASS文件)
ProgramCall pc = new ProgramCall(as400);
ProgramParameter[] plist = new ProgramParameter[2]; AS400Text text1 = new AS400Text(22);
byte[] sForm1 = text1.toBytes(this.commonInfo.getUserName());
plist[0] = new ProgramParameter(sForm1);
AS400Text text2 = new AS400Text(6);
byte[] sForm2 = text2.toBytes(this.commonInfo.getUserID());
plist[1] = new ProgramParameter(sForm2); CommandCall cmd = new CommandCall(as400);
cmd.run("ADDLIBLE " + getPgmObject()); QSYSObjectPathName pName = new QSYSObjectPathName(getPgmObject(), "SBTD110UC", "PGM");
pc.setProgram(pName.getPath(), plist);
if (pc.run() != true) {
AS400Message[] msgList = pc.getMessageList();
System.out.println("The program did not run. MESSAGE");
for (int i=0; i<msgList.length; i++) {
System.out.println(msgList[i].getText());
}
}
com.ibm.as400.access.ProgramCall类的源代码.(目前包里面只有CLASS文件)
ProgramCall pc = new ProgramCall(as400);
ProgramParameter[] plist = new ProgramParameter[2]; AS400Text text1 = new AS400Text(22);
byte[] sForm1 = text1.toBytes(this.commonInfo.getUserName());
plist[0] = new ProgramParameter(sForm1);
AS400Text text2 = new AS400Text(6);
byte[] sForm2 = text2.toBytes(this.commonInfo.getUserID());
plist[1] = new ProgramParameter(sForm2); CommandCall cmd = new CommandCall(as400);
cmd.run("ADDLIBLE " + getPgmObject()); QSYSObjectPathName pName = new QSYSObjectPathName(getPgmObject(), "SBTD110UC", "PGM");
pc.setProgram(pName.getPath(), plist);
if (pc.run() != true) {
AS400Message[] msgList = pc.getMessageList();
System.out.println("The program did not run. MESSAGE");
for (int i=0; i<msgList.length; i++) {
System.out.println(msgList[i].getText());
}
}
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货