MVSFORUMS.com

[yadav2005]

Hi All,

I have a list of datasets which I have saved in 3.4 by SAVE LIST command.What I need is to find out all empty datasets from that list and store in a seperate dataset.I did try by using PRINT IDS COUNT(1) but it only checks for the first dataset.I did try using :

[dbzTHEdinosauer]

you have to have a separate ddname for each data set.
you concatenated the datasets (with means, treat all these as one)
and printed 1.
even if DS1 and DS2 were empty and DS3 had 1, you would have the same result as your test.

you have to have
//DAT1 DD dsn=DATASET 1 NAME
//DAT2 DD dsn=DATASET 2 NAME
//DAT3 DD dsn=DATASET 3 NAME
//DAT4 DD dsn=DATASET 4 NAME
//DAT5 DD dsn=DATASET 5 NAME
//DAT6 DD dsn=DATASET 6 NAME

and then REPRO commands for each.

but if you have only 1 sysout, then you need to parse the output.
_________________
Dick Brenholtz
American living in Varel, Germany

[semigeezer]

Quick and dirty solution as a Rexx exec running in TSO:

[yadav2005]

Thanks Dick and Semigeezer,

My saved list is in dataset TEST.LIST.DATASETS. A small clarification , in the Rexx code , the way I have included the name after DA , is it correct.Now what my understanding is after I execute the REXX code , will the list of empty datasets get stored in TEST.NAMES.DSNAMES assuming TEST is my TSO ID.

[John_Deal]

Why don't you use the %used column on 3.4 to see which ones are empty? Seems lots easier to me...

P.S. You'll have to 'recall' any migrated datasets (but you'll have to do that with any other method as well)...

8)
_________________
Life is a journey; enjoy the trip!

[kolusu]

[yadav2005]

Thanks Kolusu and John , that works much better solution.