Can we find specific member without knowing the name of PDS
or can we search a member to which PDS it belongs to? if so how?
Answer Posted / shekar
If the member is in one of the allocated datasets, then the
following REXX would help you:
/* REXX COMMAND TO search the member in the allocated
dataset */
arg
mem
mem = strip
(mem)
say ' '
if (mem = '' | mem = ' ')
then
do
say 'please give the member to be searched as
argument'
exit
end
/*trace
I*/
call on
error
ADDRESS ISPEXEC "CONTROL ERRORS
RETURN"
call
outtrap "LINE."
ADDRESS
TSO "LISTALC"
call
outtrap "OFF"
say mem
N = line.0
a = 0
ADDRESS TSOEXEC
do I = 1 to N
dataset = line.i
fullds = "'"dataset"("MEM")'"
foundmem = SYSDSN(fullds)
if foundmem = 'OK' then
do
a = a + 1
say '"'MEM'" is found in "'dataset'"'
end
end
if a = 0
then
say '"'MEM'" is not found in list of allocated
datasets'
exit
error:
zerrsm = "Return code"
rc
zerrlm = "Return code from command is"
rc
zerralrm
= "YES"
zerrhm
= "*"
address ispexec "SETMSG MSG
(ISRZ002)"
return
| Is This Answer Correct ? | 0 Yes | 2 No |
Post New Answer View All Answers
by using cond parameter maximum 8 cond can be coded in single cond means ?explain
Explain about LMFREE�free data set from its association with data ID
what disp parameter we mention for creation of temporary dataset so that we can use it in later steps?
What is the purpose of dd dummy statement?
what is the JCL statement consists of?
Explain the hierarchy levels in jcl?
Many jcl statements contain specific values designed to direct and control the execution of the statement. What are these fields called?
For what purpose steplib and joblib are used ?
What is the purpose of dd?
What is the function of the steplib dd statement?
What is the difference between the positional and keyword parameters? Give examples.
Is automatic restart possible in jcl? If yes, how?
I have a COBOL program that ACCEPTs some input data. How do you code the JCL statement for this?
What is the function of the dd avgrec keyword in sms datasets?
how JCL works?