Is there a way to call a CLP and pass parameters from within a domino agent. Domino is running on Wintel server.
Subject: call iSeries CLP from domino agent
If you have a current version of iSeries Access installed on your Domino box (I’m running V5R3 w/ SI20055). You can use code like I’ve pasted below (Note, the command I’m running imports documects that I’ve FTPed to my 400 into Content Manager OnDemand)
It’s pretty well documented in the programmers tooklit.
Dim systemNames As Variant
Dim as400 As Variant
Dim cmd As Variant
Set systemNames = CreateObject("cwbx.systemNames")
Set as400 = CreateObject("cwbx.AS400System")
Set cmd = CreateObject("cwbx.Command")
as400.Define(systemNames.DefaultSystem)
as400.userid = "username"
as400.password = "password"
Call cmd.run(|qsh cmd(‘arsload -I “QUSROND” -a “appname” -g “goupname” -v /qibm/userdata/ondemand/qusrond/Domino/’)|)
Subject: RE: call iSeries CLP from domino agent
Thanks for the quick response, will try ASAP