How to run Iseries command from an agent

HCL Domino Domino Forum
1

We are running domino 7.0.3 on our iseries. How can i execute an os400 command (CHGDTAARA) from an agent ?

2

Subject: How to run Iseries command from an agent

Use the shell LotusScript command. e.g. shell(“CHGDTAARA …”) And you need to ensure user profile QNOTES has proper authority to the data area.

3

Subject: RE: How to run Iseries command from an agent

This is the thing i tried to run.When i run it manually i get a message in notes “File not found”

I appreciate your help !

Sub Initialize

Dim session As New NotesSession

Dim db As NotesDatabase

Dim doc As NotesDocument

Dim dbug As NotesLog

Dim rtitem As Variant

Dim fileCount As Integer

Dim it As NotesItem





RetCod = Shell("QSYS\CHGDTAARA DTAARA(QGPL\IMES) VALUE('1')")

End Sub

4

Subject: RE: How to run Iseries command from an agent

Does user profile QNOTES, have the proper authority to the QGPL/IMES data area?

5

Subject: RE: How to run Iseries command from an agent

You’ve got the slashes incorrect. They should be backslashes /.

e.g. RetCod = Shell(“QSYS/CHGDTAARA DTAARA(QGPL/IMES) VALUE(‘1’)”)

Sometimes if you look in the job log of the AMGR job that is attempting to run the Shell command, there will be additional messages logged. That was the case here:

 String 'QSYS\CHGDT' contains a character that is not valid.

 String 'QGPL\IMES)' contains a character that is not valid.

 Error found on *N command.