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 |
Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat files (I have GDG base: FDWS01.TEST.RESTORE) in one shot. Can we do that in one shot using a JCL. May be by using IEBGENER. It's a bit urgent. So anyone's fast rely would be appreciated.. Thanks in advance.. 10 flat files ----------------------------------- FDWS01.SUB.RESTORE1 FDWS01.SUB.RESTORE2 FDWS01.SUB.RESTORE3 ; ; FDWS01.SUB.RESTORE10 TO GDG versions ----------------------- FDWS01.TEST.RESTORE.G0001V00 FDWS01.TEST.RESTORE.G0002V00 FDWS01.TEST.RESTORE.G0003V00 ; ; FDWS01.TEST.RESTORE.G0010V00
What is the use of disp parameter?
what is JCLLIB and PROCLIB in jcl and their syntax
One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.
How to run cobol program using jcl?
Min no of member?s (PDS) in one directory block?
Which is the most widely used batch performance monitor for DB2?
What do you understand by the terms: joblib and steplib?
Step 1 RC 4 Step 2 Step 3 I want to know the COND parameter which can be coded in step 2 or 3. Step 2 should be executed based on Step 1 RC and Step 3 should not be executed based on step 1's RC
which parameter is use to declare the name of dataset in dd statement?
What is timing concept in mainframe?
wht do u mean by internal reader in jcl ? wht is the use of internal reader ?