I believe the TSO CLIST function LISTDSI will return the required
info... Use IKJEFT01 in batch.
If you check under the covers, I believe ISRUAIPO will end up invoking
LISTDSI.

HTH,

<snip>
ISRUAIPO                     Data Set Information
Command ===>

Data Set Name  . . . : XXXXXXXX.TSO.LOAD

General Data                          Current Allocation
 Volume serial . . . : GRV32E          Allocated blocks  . : 600
 Device type . . . . : 3390            Allocated extents . : 12
 Organization  . . . : PO              Maximum dir. blocks : 6
 Record format . . . : U
 Record length . . . : 0
 Block size  . . . . : 6144           Current Utilization
 1st extent blocks . : 72              Used blocks . . . . : 138
 Secondary blocks  . : 45              Used extents  . . . : 3
...SNIPPAGE....
Someone know, IF is possible get this information under a batch JOB ?
May be, CBTTAPE have some program ?
</snip>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to