|
View previous topic :: View next topic
|
| Author |
Message |
Auryn
New User
Joined: 11 Jan 2006
Posts: 83
Location: Lower Saxony (DE)
|
|
|
|
Hi there,
maybe there are better categories in this forum i.e. »CLIST & REXX« or »TSO/ISPF« to place my question.
But well, I post it here in this category:
In ISPF 3.2 (or 3.4 with line command »I«) you can check the attributes and properties of a dataset.
| Code: |
Data Set Information
Command ===>
Data Set Name . . . : SYS1.PROCLIB
General Data Current Allocation
Volume serial . . . : LPSYSO Allocated cylinders : 10
Device type . . . . : 3390 Allocated extents . : 1
Organization . . . : PO Maximum dir. blocks : 100
Record format . . . : FB
Record length . . . : 80
Block size . . . . : 27920 Current Utilization
1st extent cylinders: 10 Used cylinders . . : 6
Secondary cylinders : 0 Used extents . . . : 1
Used dir. blocks . : 29
Number of members . : 178
Dates
Creation date . . . : 2004/08/13
Referenced date . . : 2018/07/17
Expiration date . . : ***None*** |
'Cause we processing a number of datasets (sequential and PDS(-E)) and member via batch jobs we'd like to analyse these information (including that ones about the directory blocks) in advance.
Does anybody of you know a tool or tso command to retrieve the information the mentioned ISPF panel provides of several datasets in a list via a batch job?
If there is no command or system utility that can be used in a jcl directly maybe there is a module that retrieves these information and can be integrated in a COBOL main module?
Thank you for your assistance.
Auryn |
|
| Back to top |
|
 |
steve-myers
Active Member
Joined: 30 Nov 2013
Posts: 917
Location: The Universe
|
|
|
|
Look at the utilities on the CBT "tape." I'm pretty certain you will find something of use. By the rules of the web site I cannot insert the address of the CBT tape page here, but Google is your friend.
Mass reading of PDS directories fell by the way side with the advent of effective data security tools like RACF, Top Secret and ACF2. None of them provided a tool to permit an unauthorized program to pre test if the program can open a data set without getting an S913 ABEND.
Your idea about a tool that would integrate with Cobol is good, but how the tool would present data set information to the Cobol program presents difficulties I do not think anyone was interested in developing. I'm not aware of any such tool. |
|
| Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008
Posts: 1935
Location: USA
|
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
Should be easy enough to do this in batch ISPF using DSINFO
I might even have some code somewhere too |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 701
Location: Denmark
|
|
|
|
| I would consider writing a small REXX pgm around the REXX LISTDSI function. |
|
| Back to top |
|
|
Pete Wilson
Active Member
Joined: 31 Dec 2009
Posts: 564
Location: London
|
|
|
|
| Probaly a bit late now but FDREPORT, Catalog Recovery Plus, T-Rex and probably Naviquest to name a few can all provide this info in Batch |
|
| Back to top |
|
|
vasanthz
Global Moderator
Joined: 28 Aug 2007
Posts: 1737
Location: Tirupur, India
|
|
|
|
IDCAMS with DCOLLECT to get D type records.
And then feed the DCOLLECT file to a MXG program or to ISMF(NaviQuest) reporter |
|
| Back to top |
|
|
|
|
