Focal Point
[CLOSED] Execute a JDE job on iSeries

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/5197048626

December 04, 2012, 06:01 PM
Shirley
[CLOSED] Execute a JDE job on iSeries
I saw this post about using Maintain to execute a job on iSeries , I'm wondering if webfocus can achieve this as well?

Does anybody know if webfocus can issue a command to run JDE job on iSeries? Or use iSM to issue a command to run JDE job on iSeries? Both of our webfocus server and iSM are installed on window platform.

This message has been edited. Last edited by: Kerry,


Shirley Huang
WF 7.7.04M MRE BID DevStudio
WIN2003, SQL Server 2000/DB2
HTML/PDF/EXL2k/AHTML
iSM 6.16
December 05, 2012, 08:33 AM
trob
I'm doing the following to run an iSeries command to see if a file has been updated since my program last ran. IWAY762 is my reporting server running on the iSeries. This code is in the middle of my fex.

 
REMOTE DEST = IWAY762
-REMOTE BEGIN
! DSPFD FILE(PRODLIB/PD200F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *REPLACE)
! DSPFD FILE(PRODLIB/PD205F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD210F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD215F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD216F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD220F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD300F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD305F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD310F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(PRODLIB/PD320F) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
! DSPFD FILE(TPRDDTA/F4111) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(PRODLIB/PRODINFO) OUTMBR(*FIRST *ADD)
-REMOTE END
END
-RUN



------------------------------------------
DevStudio 8.2.03
WFS 8.2.03
December 05, 2012, 10:33 AM
drbrown
You can use the DB2 SQL interface to call iSeries programs and stored procedures:
ENGINE DB2 SET DEFAULT_CONNECTION iSeriesConnection
SQL DB2
CALL LIBRARY.PGM(&PARMS)
END


You can pass parms if you need. You can have the program do a SBMJOB if needed or call the program directly. You can also call iSeries stored procedures with this method (iSeries stored procedures can also be defined as synonyms in WF - we return result sets this way for many of our RPG business processes).


WF 7.7.02
iSeries/Windows