You might want to yse the rexx sdsf interface
/* REXX - SDSF/REXX CONSOLE COMMAND */
ARG COMMAND
COMMAND = 'v xxx,online'
IF ISFCALLS('ON') <> 0 THEN EXIT 99
ADDRESS SDSF "ISFEXEC '/"COMMAND"' (WAIT"
DO I=1 TO ISFULOG.0
SAY ISFULOG.I
END
CALL ISFCALLS 'OFF'
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of
John Dawes
Sent: Wednesday, February 22, 2012 12:23 PM
To: [email protected]
Subject: VARY ON/ VARY OFF COMMAND IN BATCH
G'Day,
I have several hundred volumes to put online/offline and I thought I could try
it in batch mode. I dug up an old JCL which I tried but the job failed because
of the following:
READY
CONSOLE SYSCMD(V (AA50),ONLINE) IKJ55303I THE CONSOLE COMMAND HAS TERMINATED.+
IKJ55303I AN ERROR OCCURRED DURING CONSOLE INITIALIZATION. THE MCSOPER RETURN
CODE WAS X'00000004' AND THE REASON CODE WAS X'000000 00'. READY
END
Here is the job which I executed. :
//*
//STEP01 EXEC PGM=IKJEFT01,DYNAMNBR=999 //SYSPRINT DD SYSOUT=* //SYSTSPRT
DD SYSOUT=* //SYSTSIN DD *
CONSOLE SYSCMD(V (AA50),ONLINE)
Could someone please correct my mistake?
Thanks in advance.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
