MVSFORUMS.com :: View topic - How to trigger savers screen in rexx

through

[^/[Print]\]

MVSFORUMS.com -> TSO and ISPF

#1: How to trigger savers screen in rexx Author: Dhanu60,

Posted: Tue Sep 08, 2015 4:49 am
—
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."

#2: Author: Nic Clouston, Location: At Home

Posted: Tue Sep 08, 2015 4:57 am
—
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.

#3: Author: Dhanu60,

Posted: Tue Sep 08, 2015 4:59 am
—
Thank you

Can you please provide me the link.

#4: Author: Nic Clouston, Location: At Home

Posted: Tue Sep 08, 2015 9:21 am
—
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.

#5: Author: kolusu, Location: San Jose

Posted: Tue Sep 08, 2015 10:53 am
—
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

#6: Author: Dhanu60,

Posted: Thu Jan 21, 2016 10:27 pm
—
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.

#7: Author: kolusu, Location: San Jose

Posted: Fri Jan 22, 2016 11:02 am
—

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

MVSFORUMS.com -> TSO and ISPF

output generated using printer-friendly topic mod. All times are GMT - 5 Hours

Page 1 of 1