|
|
| Author |
Message |
relur197
New User
Joined: 31 Jul 2008
Posts: 18
Location: Massachusetts
|
|
|
|
Hi Folks,
Today I have been stumped by the issue of figuring out a way to expand an included member within JCL with similiar functions as "cedit" and "cbrowse". The JCL is below is an example.
//TEST423 JOB (92592,888),'TEST 14'
//*MAIN CLASS=TEST1,SYSTEM=T590
//JCLLIB JCLLIB ORDER=M888.P2020B.RRH.JCLPROC
//*
// SET REG='14',ENV='YT'
//COMSET INCLUDE MEMBER=YTSETCOM
Now for those people that don't know what cedit / cbrowse is, it is a tool that you can assign to your PF keys that will allow you to expand a dsn that is within JCL( by having your cursor over the dsn and pushing the PF key), but currently with cedit and cbrowse it needs the fully quailifed dsn and member if applicable to work.
I know what I am asking is a little crazy because in all reality you could just do a cbrowse on the jcllib statement and select the member that lives within it that is referenced in the jcl. I just wanted to know if anyone knows of a "easy" soultion that I am missing or am I going to have to write a CLIST script to perform this function.
That leads me onto another topic. Would anyone know "how" to program this within CLIST, I know a little of CLIST but nothing complex. |
|
| Back to top |
|
 |
References
|
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 3744
Location: Brussels once more ...
|
|
|
|
I would use REXX in preference to CLIST - Far easier to code and understand.
cedit & cbrowse I would guess are site specific tools.
As for the question, if you only give a member name how will the REXX / CLIST know in which PDS to search ? |
|
| Back to top |
|
|
enrico-sorichetti
Global Moderator
Joined: 14 Mar 2007
Posts: 3279
Location: italy
|
|
|
|
what do You mean by easy ????
cursor edit/view/browse might be considered easy by somebody ,
not so from a beginners point of view...
also why use clist and not REXX
while You might find some help for rexx coding issues
it will not be the same for clist
| Quote: |
| Would anyone know "how" to program this within CLIST, I know a little of CLIST but nothing complex. |
even if somebody knew from the stone age how to code CLISTS ( me for example )
that somebody would give You a bad service by doing so 
easy/not easy... that is the question
the flow is easy
inside The edit macro for the action
extract the member name
find the line with the jcllib statement,
parse it to get the dsnames ( there could be more than one )
and now the thingy becomes tricky ...
if You have only one dataset You can go for a plain dataset edit
| Code: |
| ispexec edit dataset(.....) member(....) |
if the datasets are more then You should go for the DATAID
| Code: |
| ispexec edit dataid(....) member(...) |
et voila' les jeux sont fait
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ISPREF03/2.9?SHELF=ISPBKM08&DT=19990722084851 |
|
| Back to top |
|
|
relur197
New User
Joined: 31 Jul 2008
Posts: 18
Location: Massachusetts
|
|
|
|
I only mentioned CLIST as a route because of a co-worker mentioning the process could be done within it. I know REXX quite well and have heavy programming experience within most languages, so I would expect myself to be able to understand something a little complex.
Thank you for your assistance with the psuedo-code and have a nice day. |
|
| Back to top |
|
|
 Moved: Wed Oct 29, 2008 7:07 pm by superk From JCL to TSO/ISPF |
|
|
