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 

Pulling Job run information from $AVERS

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


Joined: 19 Jan 2003
Posts: 7
Topics: 4
Location: Hyderabad

PostPosted: Sun Sep 26, 2004 1:49 am    Post subject: Pulling Job run information from $AVERS Reply with quote

Everybody,

Need some hints from you.. I know TSO STATUS (jobname) works if the job output is available in spool..

However in my case the job run information is available in $AVERS. Is there a command which can find if the job has run if the output is stored in $AVERS.

Let me give you the background.. 4 jobs run on our mainframe after a modem transmission completes.. These transmissions come from a different company. Some people here have to manually check $AVERS after some intervals to check if these 4 jobs have run.. I was trying to automate this via REXX.

Please reply back if someone has got any ideas to achieve this.

I will be glad if you can point any online help available for $AVERS.

Thanks,
Anand
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


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

PostPosted: Sun Sep 26, 2004 9:25 am    Post subject: Reply with quote

Anand,
$AVRS comes with an interactive panel where you can print, browse ,delete the sysout of jobs. The screen will look like it is shown on the 2nd page of this link

http://www.seasoft.com/$AVRS_Brochure.pdf

Btw their Help screens (PF1) are quite descriptive.

Alternatively you can run a batch job shown below to capture the output of your jobs
Code:


//STEP0100 EXEC PGM=$AVRSELR,REGION=2000M                         
//SYSUDUMP DD SYSOUT=*                                           
//SYSPRINT DD SYSOUT=*                                           
//$AVRLOCK DD DSN=SAVRS.LOCK,
//            DISP=SHR             
//SYSUT1   DD DSN=SAVRS.DATABASE.ARCHIVE,
//            DISP=SHR
//SYSUT2   DD DSN=YOUR JOB OUTPUT LISTING,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(CYL,(2,2),RLSE)
//SYSIN    DD *
 TYPE=JN,SD=2004267,ST=1654,NA=YOUR JOBNAME
/*


Here

SD = Start date in (CCYYDDD format) i.e julian date format
ST = Start time in miliatary format ex: 1654 is 04:54 PM
NA = Your Jobname

If your shop is a registered user of $avrs then , you can reuqest the user manuals from here

http://www.seasoft.com/sea-customer-registration.asp

Quote:

Some people here have to manually check $AVERS after some intervals to check if these 4 jobs have run..


You can add a step at the end of all the 4 jobs to notify the users that the jobs are completed.

Code:

//LASTSTEP EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD *
 SE 'JOB COMPLETED' U(ID1, ID2, ...)
/*

You can also add a step to send out an email at the end of all the 4 jobs to notify the users that the jobs are completed. Check this link for sending an email

http://www.mvsforums.com/helpboards/viewtopic.php?t=439&highlight=email

Hope this helps...

Cheers

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


Joined: 19 Jan 2003
Posts: 7
Topics: 4
Location: Hyderabad

PostPosted: Tue Sep 28, 2004 1:12 pm    Post subject: $AVERS output Reply with quote

Thanks Kolusu,

The links you gave were really helpful..
Back to top
View user's profile Send private message
Prasam
Beginner


Joined: 20 May 2004
Posts: 26
Topics: 7
Location: Illinois,USA

PostPosted: Tue Dec 07, 2004 8:32 am    Post subject: Reply with quote

Hi Kolusu,

I just came across this thru searching and i found it would be useful to me.

On doubt in your code.Could you please explain $AVRLOCK and SYSUT1 steps
datasets.Are the datasets SAVRS.LOCK,SAVRS.DATABASE.ARCHIVE installation defined datasets?

I couldn't find these datasets on my system.

Could you please provide with any info about the purpose of these datasets?

Thanks,
Prasanth.
_________________
The struggle alone pleases us, not the victory. -Pascal,Blaise- 1623-1662, French Scientist
Back to top
View user's profile Send private message Yahoo Messenger
kolusu
Site Admin
Site Admin


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

PostPosted: Tue Dec 07, 2004 8:52 am    Post subject: Reply with quote

Prasam,

The $AVRLOCK DD is allocated to lock the file which you are trying to restore. The sysut1 dataset is where your shop archives the JOb log of every job run on the system. I just gave generic name for the dataset. The name varies from shop to shop. So you need to talk to your systems programmer and find out the naming convention of your shop for savrs.

Hope this helps...

Cheers

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


Joined: 20 May 2004
Posts: 26
Topics: 7
Location: Illinois,USA

PostPosted: Mon Dec 20, 2004 2:41 am    Post subject: Reply with quote

Hi kolusu,

Thanks for your clarification.One more information which would be helpful is how can give the return code of a job in sysin for $avrselr.What will be the parameter for return code?

Thanks a lot,
Prasanth.
_________________
The struggle alone pleases us, not the victory. -Pascal,Blaise- 1623-1662, French Scientist
Back to top
View user's profile Send private message Yahoo Messenger
kolusu
Site Admin
Site Admin


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

PostPosted: Mon Dec 20, 2004 6:14 am    Post subject: Reply with quote

Prasam,

Specify a 1 to 8 character entry or mask to limit selection of work to specific completion or return codes. The field entered is matched against the $AVRS CCODE and/or the RETURN CODE field for each potential job.

For example, to select work with a RETURN CODE of 4, one may enter any of the following: 4, 04, 0004, RC=0004, or HC=0004. Note: only the return code is evaluated when numerics, HC=, or RC= values are entered. The completion code (CCODE) is ignored.

The Return Code specification is valid for all selection types except SYSLOG (SL), Status Reports (ST), Fiche History (FH), and Fiche Index (FI).
Any position may have its significance replaced by using the character "*". When no additional significant characters are needed to compose a mask, a "-" may be used in lieu of filling the remaining positions with asterisks. Following are some
examples of masks:
Code:
               
                                                     
          *C=***4    IEF***I   S0C*    SCAN-   S*37-


You may also get all completion codes of a numeric value regardless of prefix by just entering the code. For example, a value of 0004 would select RC=0004, TX=0004, HC=0004, etc...

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
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