|
View previous topic :: View next topic
|
| Author |
Message |
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
Hi guys,
I wish to dump data set information from various catalogued datasets into another dataset for further processing (or using spool). I tried the TSO commands LISTCAT and LISTDS, but sadly enough, these do not provide all the information I'm looking for. :-(
What I really wanted to get was the information shown in the ISPF panel "Data Set Information", invoked with an "I" from the Data Set List (3.4.)
Is this possible to do from JCL? And if so - how? Or is there a better alternative to LISTDS/LISTCAT?
Thanks, Claes |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
the info in the 3.2 and the I command line from 3.4
is not from the catalog only, but also from the VTOC
look at the ismf options for dataset listings |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
| ismf options? I don't know that that is? Please explain how I can use that in my JCL... |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
| What I'm really asking is: Is this panel available from JCL? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
thats interactive storage management facility
ask Your storage support group how to invoke it from ispf,
it gives lots of reports, the only trick is that the reporting is hidden
in the enhanced acs management options..
| Code: |
Panel Help
——————————————————————————————————————————————————————————————————————————————
ISMF PRIMARY OPTION MENU - z/OS DFSMS
Enter Selection or Command ===>
Select one of the following options and press Enter:
0 ISMF Profile - Specify ISMF User Profile
1 Data Set - Perform Functions Against Data Sets
2 Volume - Perform Functions Against Volumes
3 Management Class - Specify Data Set Backup and Migration Criteria
4 Data Class - Specify Data Set Allocation Parameters
5 Storage Class - Specify Data Set Performance and Availability
6 Storage Group - Specify Volume Names and Free Space Thresholds
7 Automatic Class Selection - Specify ACS Routines and Test Criteria
8 Control Data Set - Specify System Names and Default Criteria
9 Aggregate Group - Specify Data Set Recovery Parameters
10 Library Management - Specify Library and Drive Configurations
11 Enhanced ACS Management - Perform Enhanced Test/Configuration Management
C Data Collection - Process Data Collection Function
L List - Perform Functions Against Saved ISMF Lists
P Copy Pool - Specify Pool Storage Groups for Copies
R Removable Media Manager - Perform Functions Against Removable Media
X Exit - Terminate ISMF
Use HELP Command for Help; Use END Command or X to Exit.
from option 11
Panel Help
——————————————————————————————————————————————————————————————————————————————
ENHANCED ACS MANAGEMENT - NaviQuest PRIMARY OPTION MENU
Enter Selection or Command ===>
Select one of the following options and press Enter:
1 Test Case Generation
2 ACS Test Listings Comparison
3 Enhanced ACS Test Listing
4 Test Case Update with Test Results
5 SMS Report Generation
6 Model Commands Generation
7 Batch Testing/Configuration Management
X Exit
<< snip snip
Use HELP Command for Help; Use END Command to Exit.
from option 5
Panel Help
——————————————————————————————————————————————————————————————————————————————
SMS REPORT GENERATION SELECTION MENU
Enter Selection or Command ===>
Select one of the following options and press Enter:
1 Data Set Report from Saved ISMF List
2 DASD Volume Report from Saved ISMF List
3 Tape Volume Report from Saved ISMF List
4 Data Set Report from DCOLLECT Data (D Records)
5 DASD Volume Report from DCOLLECT Data (V Records)
6 DFSMS Configuration Report from DCOLLECT Data (DC, SC,
MC, SG, BC, VL, AG, DR, LB, CN, or AI records)
<< snip snip
Use HELP Command for Help; Use END Command to Exit.
|
powerful, exhaustive, very good filtering capabilities
or even the option 1 will give lots more than a simple 3.4 from ispf
I did not chech all the columns, but the list has the same details as the 3.2 option from ispf
here is a list of the available columns
| Code: |
Panel Utilities Scroll Help
——————————————————————————————————————————————————————————————————————————————
DATA SET SORT ENTRY PANEL RIGHT NOT ACTIVE
Command ===> RIGHT
Specify one or more Attribute Numbers for Sort Sequence:
Major Field . . . 2 Minor Field 1 . . . Minor Field 2 . . .
Specify A for Ascending or D for Descending Sort Order:
Major Field . . . A Minor Field 1 . . . Minor Field 2 . . .
(1) Line Operator (6) Compressed Format
(2) Dataset Name (20) Creation Date
(3) Allocated Space (25) Data Class Name
(9) Allocation Unit (30) Data Set Name Type
(14) Block/CI Size (34) DDM Attributes
(16) Block Unused (19) Device Type
(35) CCSID Description (29) DS Environment
(39) CF CACHE Set Name (11) DS Organization
(38) CF CACHE Structure Name (32) Entry Type
(37) CF Monitor Status (21) Expiration Date
(36) CF Status Indicator (23) Last Backup Date
(24) Change Indicator (22) Last Ref Date
Use ENTER to Perform Sort; Use DOWN Command to View next Panel;
Use HELP Command for Help; Use END Command to Exit.
Panel Utilities Scroll Help
——————————————————————————————————————————————————————————————————————————————
DATA SET SORT ENTRY PANEL Page 2 of 2
Command ===>
Specify one or more Attribute Numbers for Sort Sequence:
Major Field . . . 2 Minor Field 1 . . . Minor Field 2 . . .
Specify A for Ascending or D for Descending Sort Order:
Major Field . . . A Minor Field 1 . . . Minor Field 2 . . .
(26) MGMNT Class Name (27) Storage Class Name
(18) Multi-vol Data Set (4) Used Space
(8) Number of Extents (17) Volume Serial Number
(31) Number of Stripes
(15) Opt Block Size
(28) Owner
(5) % Space not Used
(7) % User Data Reduction
(33) Reblockable Indicator
(12) Record Format
(13) Record Length
(10) Secondary Allocation
Use ENTER to Perform Sort; Use UP Command to View previous Panel;
Use HELP Command for Help; Use END Command to Exit.
|
|
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| but for pure batch I would go for processing the DCOLLCT data |
|
| Back to top |
|
|
Douglas Wilder
Active User
.jpg)
Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL
|
|
|
|
I am not sure what specifically you are looking for. Does LISTDSI give what you need?
X = LISTDSI(DSN DIRECTORY)
SYSDSNAME, SYSRECFM , SYSLRECL, SYSBLKSIZE, SYSDSORG, SYSALLOC , SYSUSED, SYSPRIMARY, SYSSECONDS, SYSADIRBLK, SYSUDIRBLK, SYSUNITS , SYSEXTENTS, SYSCREATE, SYSREFDATE, SYSEXDATEE, SYSTRKSCYL, SYSBLKSTRK, SYSUPDATED, SYSMEMBERS, SYSVOLUME, SYSUNIT, … |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
enrico-sorichetti: Thanks for your efforts, but unfortunately we do not have that option at my site. 
Douglas Wilder: Yes, I believe so! But I'd need REXX to invoke it, right? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| Quote: |
| we do not have that option at my site |
it' s a pity that many organizations choose to ignore tools that are included in the standard distribution of IBM products
to check better ...
from any ispf command line... TSO ISRDDN
again in the command line.... m DGTSMMD1 or m DGTSMMD2
or look in the allocated datasets list for libraries with the pattern SYS1.DGTxxx
and ask Your support to enable the feature |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
m DGTSMMD1 / m DGTSMMD2 both return "member not found".
We do have these:
SYS1.DGTCLIB
SYS1.DGTLLIB
SYS1.DGTMLIB
SYS1.DGTPLIB
SYS1.DGTSLIB
SYS1.DGTTLIB |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
the libraries are there,
the only thing to find is the way of getting to the menus
for batch processing You can start by looking at the samples in the library SYS1.SACBCNTL |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
to get there You could try ( if You have the option ) to go to option 7 ( dialog testing ) and from there
| Code: |
| Invoke program: |
| PGM . . . DGTFMD01 |
| PARM . . . |
| |
| MODE . . . (LINE, FSCR, or blank) |
| |
| Invoke request: (GUI mode only) |
| WSCMD . . |
| |
| |
| Options: |
| Enter "/" to select option |
| / NEWAPPL ID . . . DGT |
| NEWPOOL |
| PASSLIB |
|
|
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
There are 64 members in that library. Can you point me to one of them? I don't know what I'm looking for...
Tried that, got message DGTMD009..?
| Code: |
Invoke Dialog Function/Selection Panel Message DGTMD009
Command ===>
More: +
Invoke selection panel:
PANEL . .
OPT . . .
Invoke command:
CMD . . .
LANG . . . (APL, CREX, or blank)
MODE . . . (LINE, FSCR, or blank)
Invoke program:
PGM . . . DGTFMD01
PARM . . .
MODE . . . (LINE, FSCR, or blank) |
|
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
one might be SYS1.SACBCNTL(ACBJBAOU)
but to have an idea of what is there You can go to the member list and
type in the command line "S * V"
and You will view one after the other one all the members |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
Ok, I tried to execute this step:
| Code: |
//SAVELIST EXEC ACBJBAOB,
// PLIB1=SYS1.DGTPLIB,
// TABL2=userid.TEST.ISPTABL
//SYSTSIN DD *
DELETE DATASET.REPORT
PROFILE PREFIX(IBMUSER)
ISPSTART CMD(ACBQBAI2 SAVE DSNLIST +
VTOCDATA(Y) HSMDATA(Y) +
DSN('SYS1.SACBCNTL.**') NOTUSED%(LE 70)) +
NEWAPPL(DGT) BATSCRW(132) BATSCRD(27) BREDIMAX(3) BDISPMAX(99999999)
/* |
Where userid.TEST.ISPTABL was replaced with my actual userid, and the dataset preallocated using ICEGENER and this DCB: DCB=(RECFM=FB,LRECL=80,DSORG=PS) I'm not sure if that's the correct DCB?
Anyways, I get JCLERR because:
STEP1 SAVELIST ISPPLIB +001 - DATA SET NOT FOUND
Seems as DSN=ISP.SISPPENU (from PROC=ACBJBAOB) does not exsist on my site? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
it must be there, otherwise You would not be abe to run ISPF
maybe the name was changed,
check the interactive ISPPLIB allocation by using ISRDDN |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
Seems you are right:
| Code: |
TBF001 SHR,KEEP > ISPMLIB SYS3.ISPF.ISPMLIB
PRI079 SHR,KEEP > ISPPLIB T.POLI.ISP.PLIB
TBF001 SHR,KEEP > SYS3.ISPF.ISPPLIB
Y1RSX1 SHR,KEEP > SYS1.SISPPENU
Y1RSX1 SHR,KEEP > SYS1.SISPGENU
Y1RSX1 SHR,KEEP > SYS1.SISFPLIB
PRI132 SHR,KEEP > SYS3.SHR.ISPPLIB
PRI059 SHR,KEEP > ISPPROF EDBUCLN.ISPF.ISPPROF |
But how to alter that inside a PROC..? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| Just copy the proc inline and modify it as needed |
|
| Back to top |
|
|
Claes Norreen
Active User
Joined: 20 Dec 2005
Posts: 137
Location: Denmark
|
|
|
|
I've solve this using REXX/LISTDSI. Thanks for your help!  |
|
| Back to top |
|
|
|
|
