Here is a snippet of a program that issues MSCRE.
I can send you the entire program if you want it.

         NOPR   0
         MODESET KEY=ZERO,MODE=SUP
*****
         CLI  PARMSW,X'00'
          BE    PROCSYIN
         MVC   $CMD,INAREA             MOVE COMMAND TO BUFFER
         SR    R0,R0
         LA    R2,COMMAND              POINT TO COMMAND AREA
         MGCRE MF=(E,LAREA),TEXT=(2),CONSID=X00 CMDFLAG=(NOHCPY)
         B     EOFP                    END

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Beaver
Sent: Friday, April 28, 2017 10:02 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VARY command in a batch job

Do you have a PGM that does a MGCRE command?


Steve

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of william janulin
Sent: Friday, April 28, 2017 7:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VARY command in a batch job

To list;
  Is there a way to issue a VARY cuu,offline command in a batch job. I need to 
do some full volume copies, including the volser,  and then vary the receiving 
offline.

Thank you in advance, Bill J.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

________________________________

This e-mail, including any attachments, may be confidential, privileged or 
otherwise legally protected. It is intended only for the addressee. If you 
received this e-mail in error or from someone who was not authorized to send it 
to you, do not disseminate, copy or otherwise use this e-mail or its 
attachments. Please notify the sender immediately by reply e-mail and delete 
the e-mail from your system.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to