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 

Need to find out the REC-CNT of JESMSGLG !!

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


Joined: 24 Oct 2005
Posts: 109
Topics: 36
Location: India

PostPosted: Wed Dec 07, 2005 9:15 pm    Post subject: Need to find out the REC-CNT of JESMSGLG !! Reply with quote

Hi, I have to capture the REC-CNT of only JESMSGLG of 15 jobs in an output queue of SDSF. So I read in the forum I can use SDSF in foreground or background and print the entire job to my data set and read only the number of lines in JESMSGLG. But I was just wondering what ISFIN parameter I can give so that my output data set would just have the REC-CNT of JESMSGLG of all the jobs(say which are filtered by me giving PREFIX *CICI* in ISFIN Input).

Kindly suggest.

Regards,
- Amit.
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
amit4u79
Beginner


Joined: 24 Oct 2005
Posts: 109
Topics: 36
Location: India

PostPosted: Thu Dec 08, 2005 11:13 pm    Post subject: Reply with quote

Hi Techgurus,
My requirement is to code a REXX which may find out in the output, the record count of JESMSGLG part of 3-4 active CICS region. So is there any REXX which I can take as an example which uses JES control blocks to find out REC-CNT of a particular JESMSGLG of CICS region.

Kindly give me pointers or some system rexx if available for reference.

Thanks,
- Amit.
_________________
I did not fail; I have found 10,000 ways that would not work - Albert Einstein.
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
Ravi
Beginner


Joined: 27 Jun 2005
Posts: 88
Topics: 2

PostPosted: Fri Dec 09, 2005 3:47 pm    Post subject: Reply with quote

am not sure of your REXX solution, but here is the code thru SDSF
Code:

//DD1      DD DSN=USERID.JOB.OUTPUT,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(CYL,(1,1),RLSE),
//            DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)
//*
//STEP020 EXEC PGM=SDSF
//ISFOUT  DD DUMMY
//ISFIN   DD *
OWNER **
PREFIX CICS*
ST
FIND CICSB
++?
FIND JESMSGLG
++S
PRINT ODSN 'USERID.JOB.OUTPUT'
PRINT
PRINT CLOSE
END


Hope this helps
Back to top
View user's profile Send private message
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