Author: kenshin
Subject: Invoking CA 7 commands through REXX
Posted: Fri Aug 12, 2016 9:33 pm (GMT 5.5)
Can anyone please help me in executing CA 7 commands through REXX
The code which I am using currently does not work and always ends with RC 8.
COMMAND = 'LQ,JOB='myjobname
RSLT = CAL2X2WA()
SAY RSLT
IF RSLT <> 'SUCCESS'
THEN EXIT_RC = 20
ELSE DO
ADDRESS CA7 COMMAND
EXITRC = RC
END
I get 'SUCCESS' message in RSLT but RC is always 8
![icon_sad.gif]()
[/b]
Subject: Invoking CA 7 commands through REXX
Posted: Fri Aug 12, 2016 9:33 pm (GMT 5.5)
Can anyone please help me in executing CA 7 commands through REXX
The code which I am using currently does not work and always ends with RC 8.
COMMAND = 'LQ,JOB='myjobname
RSLT = CAL2X2WA()
SAY RSLT
IF RSLT <> 'SUCCESS'
THEN EXIT_RC = 20
ELSE DO
ADDRESS CA7 COMMAND
EXITRC = RC
END
I get 'SUCCESS' message in RSLT but RC is always 8
[/b]