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?
Answers were Sorted based on User's Feedback
Answer / pavan
We can find the dataset which is having the perticular member.
But you have list out all the datasets using 3.4.
EX: Suppose if your ID is starting with UCS5..then give
UCS5.** in 3.4......You will get the list of the datasets.
Then use command like below. Here member is "MAIN"
Command ==> M MAIN
"M" is the command to find the member in the datasets.
| Is This Answer Correct ? | 9 Yes | 3 No |
Answer / guest
go to 3.4 option.
in the command line type the following.
command ==> MEMBER 'Member_name' (hit enter)
| Is This Answer Correct ? | 4 Yes | 1 No |
Answer / rajesh
hi,
As the pavan said is correct,
more information we can also give mem 'dname' in 3.4 panel.
dname = ps name you want to find.
Thanks & Rgd's
rajesh
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / muttaiah
@Jagan:
Work bench might be a tool in your project. Never divert
people in this way. because the same tool may or may not be
available in some projects..
Best way is to list all the datasets in 3.4 option.
Give M <member name> or Member <membername>
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / 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 |
Answer / jagan
For searching a particular member to which PDS it belongs we
can check it in the workbench option 23...
In TSO Prompt enter > wb;;23 and enter the member name which
helps you find the PDS to which the member belongs too...
| Is This Answer Correct ? | 0 Yes | 3 No |
what is the compile process of cobol program expalin with code
Can I share my data with other jobs? How?
Explain about LMCLOSE�close a data set
How to print the Output to SPOOL using MSGCLASS and SYSOUT ?
What is the error code SOC01 indicate ?
What is the maximum length of a single line of jcl?
Ques: How can we code COND parameter in a JCL so that only even steps (or only odd steps) get execute??
What is the difference b/w the CLASS,TIME,PRTY in jcl job card.
Why do you use a control card?
I have two input files i/p1 name id-key flag date i/p 2 name id-key date if id-key matches in the both the files then it should write the output file from i/p1 with flag 'Y'. It should be done thru JCL sort card ,Please provide the info on this. ---Note : output file should have all records from i/p1 with proper Flag.
What is the meaning of data definition name (ddname) and dataset name (dsname) in the DD statement?
How to find the number of duplicates in a file using Sort?