This is not new stuff. From 99 Xephon Archives on SHARE: <---quote---> Automated DASD/tape diagram generator INTRODUCTION For many years, I have been looking for sources of information that would consolidate information on hardware configurations. A few years ago, IBM added some extensions to the MVS DEVSERV command to display detailed information for DASD as well as tape devices. This is done with the QD and QT options on the DEVSERV command, respectively. By issuing these DEVSERV commands, trapping their output via REXX EXECs, and formatting it into a report, a useful set of configuration reports can be generated. The exact syntax of the DEVSERV commands are: • for DASD devices DS QD,TYPE=ALL,DEFINED • for tape devices DS QT,TYPE=ALL,DEFINED In order to use the CONSOLE and CONSPROF commands required by the REXX EXEC in either a batch TMP step or directly in TSO, the user must have RACF (or equivalent) authority to the CONSOLE resource, or the installation must code the TSO/E CONSOLE and CONSPROF exits (IKJCNXAC and IKJCNXCI, respectively), or code the log-on pre-prompt exit (IKJEFLD or IKJEFLD1) to grant CONSOLE command authority. Each REXX EXEC directs its report into separate members of the same PDS; the PDS should be created with a record format of FBA and a logical record length of 133. I have created two REXX EXECs, called DASDGRID and TAPEGRID, that generate some useful reports on DASD and tape configurations. The EXECs generate DASD and tape diagrams in the 16 device-across orientation, requiring the reports to be printed in landscape mode. The blocks of 16 addresses across correspond to address 0 through F of a string of 16 devices. If a device is not defined, the corresponding block is left entirely blank. <---end quote---> Batch JCL and REXX Execs provided in article. Think I just did 'DEVSERV from REXX' as search string. Haven't tried to run them in several years. In a message dated 8/19/2015 11:49:31 A.M. Central Daylight Time, [email protected] writes:
As others said, use UCBSCAN. Or REXX issuing D U command plus filtering out undesired device types like cartridge drives. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
