AS400 integration may be done via:
PHP call RPG: as400_php
RPG call PHP script:
STRQSH QSH CMD('/usr/local/Zend/Core/bin/php-cli /www/zendsvr/htdocs/script1.php') PGM CD DIR('/www/zendcore/htdocs/TEST/') STRQSH CMD('/usr/local/zend/core/bin/php + script1.php') ENDPGM
RPG call java:
Java call RPG :
su iSeries V5R8
/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar
run a query:
DriverManager.registerDriver(new com.ibm.as400.access.AS400JDBCDriver()); conn = DriverManager.getConnection("jdbc:as400://host_IP;naming=system;libraries=lib_A,lib_B,lib_C") stmt = connection.createStatement(); rs = stmt.executeQuery("select * from file"); while (rs.next()) { String field1 = rs.getString(1); }
run a command with jt400.jar:
import java.beans.PropertyVetoException; import com.ibm.as400.access.AS400; import com.ibm.as400.access.AS400Message; import com.ibm.as400.access.CommandCall; AS400 as400 = new AS400("MySystem", "myUser", "myPassword"); try { as400.setGuiAvailable(false); } catch (PropertyVetoException e) { log(e); } CommandCall cc = new CommandCall(as400); try { boolean isSuccessful = cc.run("CRTLIB FRED"); outputPrintStream.println("Success? "+isSuccessful); // getMessageList returns an array of AS400Message objects for(AS400Message msg : cc.getMessageList()){ outputPrintStream.println(" msg: "+msg.getID() +": "+msg.getText()); } } catch (Exception e) { log(e); }
RUNRMTCMD CMD('ls; cat myfile; date') RMTLOCNAME(('9.5.1.94' *IP))