|
View previous topic :: View next topic
|
| Author |
Message |
kokido
New User
Joined: 20 Jun 2024
Posts: 13
Location: Netherlands
|
|
|
|
I would like to free unused space from a multivolume PS dataset in a batch job.
In TSO 3.4 F works fine.
| Code: |
ADRDSSU RELEASE INCLUDE(......)
|
This only frees the 1th volume.
Is there a way to do it?
kind regards,
Kokido |
|
| Back to top |
|
 |
dneufarth
Active User
Joined: 27 Apr 2005
Posts: 421
Location: Inside the SPEW (Southwest Ohio, USA)
|
|
|
|
Perhaps something like this
| Code: |
//RELEASE EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
RELEASE -
DSNAME(YOUR.MULTIVOLUME.PS.DATASET) -
LOGDYNAM(*) -
SELECTMULTI
/* |
|
|
| Back to top |
|
|
kokido
New User
Joined: 20 Jun 2024
Posts: 13
Location: Netherlands
|
|
|
|
Looks nice, thank you, but unfortunately:
| Code: |
ADR129E (001)-RI01 (01), KEYWORD 'DSNAME ' IS IMPROPER
|
kind regards |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1445
Location: Bamberg, Germany
|
|
|
|
Try something like this, See also MINTRKS and MINSEC to adjust what's being released. For empty datasets you need a different approach, if not handled by DFSMS/DFHSM already. ADMIN may be useful, but is not a must if you have operations attribute.
| Code: |
REL INC(<dsn>) -
STORGRP(<sgrp>) -
SPHERE -
SELM(ANY) -
MINTRKS(0) -
MINSEC(0) -
ADMIN -
WAIT(0,0) |
|
|
| Back to top |
|
|
kokido
New User
Joined: 20 Jun 2024
Posts: 13
Location: Netherlands
|
|
|
|
Thank you. I decided to do a iebgener with release on the target and delete the original dataset. As we are talking about a GDG I did not like the gap created in the GDG sequence, but OK.
Thanks anyway, problem solved as far as I am concerned. |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 778
Location: Denmark
|
|
|
|
| Program PDS86 from cbttape.org file 182, which no installation should be without, has a FIX RELEASE command, which also works on sequential datasets. |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1445
Location: Bamberg, Germany
|
|
|
|
| kokido wrote: |
Thank you. I decided to do a iebgener with release on the target and delete the original dataset. As we are talking about a GDG I did not like the gap created in the GDG sequence, but OK.
Thanks anyway, problem solved as far as I am concerned. |
If you use my proposal, the advantage would also be to be able to use relative generation numbers. Means your generation numbers will remain the same. |
|
| Back to top |
|
|
|
|
