MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

How to trigger savers screen in rexx

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
Dhanu60
Beginner


Joined: 06 Sep 2015
Posts: 3
Topics: 1

PostPosted: Tue Sep 08, 2015 4:49 am    Post subject: How to trigger savers screen in rexx Reply with quote

Hi

I am new to rexx. I want to capture savers job details using rexx.

can anyone please give me one example for below. - Thanks

"Savers has the option of extracting information via batch mode. So in rexx dynamically build the JCL for savers and submit it and later on read that output."
Back to top
View user's profile Send private message
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Tue Sep 08, 2015 4:57 am    Post subject: Reply with quote

Presumably there is a command interpreter for sacers/rexx similar to sdsf/rexx for sdsf. There will be a manual, or manual section, describing how to use it along with examples. Get hold of that manual and read it. If you are unlucky what you require may only be available via the F1 key.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
Dhanu60
Beginner


Joined: 06 Sep 2015
Posts: 3
Topics: 1

PostPosted: Tue Sep 08, 2015 4:59 am    Post subject: Reply with quote

Thank you

Can you please provide me the link.
Back to top
View user's profile Send private message
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Tue Sep 08, 2015 9:21 am    Post subject: Reply with quote

What link? If your shop has paid the license fee for savers then you will have the manuals available to you so ask your colleagues/ savers administrator.

The manual may, or may not, be available online. Why should I do a google search for it instead of you? I might - if you pay me.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12358
Topics: 75
Location: San Jose

PostPosted: Tue Sep 08, 2015 10:53 am    Post subject: Reply with quote

Dhanu60,

Look at this topic and take the Batch sample and allocate the DDNames in your rexx exec and invoke the program $AVRSELR

http://www.mvsforums.com/helpboards/viewtopic.php?t=2959&highlight=$avrs
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Dhanu60
Beginner


Joined: 06 Sep 2015
Posts: 3
Topics: 1

PostPosted: Thu Jan 21, 2016 10:27 pm    Post subject: Reply with quote

Hi kolusu,

Let me give you the details about my question.. I want to create a Rexx tool to get all saverss details for the list of jobs in the file. As of now we are manually checking $AVERS.. I was trying to automate this via REXX.

Can you please give me some sample jcl to execute through rexx. Can you please help.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12358
Topics: 75
Location: San Jose

PostPosted: Fri Jan 22, 2016 11:02 am    Post subject: Reply with quote

Dhanu60 wrote:
Hi kolusu,

Let me give you the details about my question.. I want to create a Rexx tool to get all saverss details for the list of jobs in the file. As of now we are manually checking $AVERS.. I was trying to automate this via REXX.

Can you please give me some sample jcl to execute through rexx. Can you please help.


Dhanu60,

Do you have experience with coding in REXX? You say you want a JCL to execute thru rexx, are you planning to run rexx in batch mode or are you planning to compile the rexx into a load module and invoke that?

here is a link that shows how to run rexx in batch

http://www.mvsforums.com/helpboards/viewtopic.php?t=5276


In the above links you already have a batch job to get the results from $avrs Database

Did you atleast try to run that job? If so what are the results? If you have all the jobnames that you need to extract in a file then you can use REXX or any other utility to generate the Control cards that your $AVRSELR can understand.

Either way the JCL to invoke $AVRSELR via rexx is as follows (Untested)
Code:

/* REXX to call $AVRS */
  "FREE FI(SYSPRINT SYSUDUMP $AVRLOCK SYSUT1 SYSUT2 SYSIN)"
  "ALLOC FI(SYSPRINT) DA(*)"
  "ALLOC FI(SYSUDUMP) DA(*)"
  "ALLOC FI(SYSUT1)   DA('$SAVRS.DATABASE.ARCHIVE') REUSE"
  "ALLOC FI(SYSUT2)   DA('Your.Output.Dataset') SPACE(10,20) RECFM(F B),
                    REUSE CYLS RELEASE"                         
  "ALLOC FI(SYSIN)    DA('Your.$avrs.Job.select.control.cards') SHR REUSE"

  ADDRESS LINKMVS $AVRSELR

_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group