Hello Kenneth, Yes, I will advise what changes I make to correct the exec I published.
Secondly, although the CONSOLE command works for queries to both device address and volume serial, it does require the user to have security access to that interface. The exec requires no security interface. That is useful. Also, by modifying the exec STORAGE calls, this exec can be used to query device information captured in system dumps. The original exec actually reports NED information ( Node Element Descriptors ? ). i.e. device: 8000 SSCB at 00000000 : NED not found NED found#: 0 NED not found#: 112 device: 8100 SSCB at 00000000 : NED not found NED found#: 0 NED not found#: 112 device: 8200 SSCB at 12AF8308 : 0... 2105 xxx550000000xxxxx.. NED found#: 252 NED not found#: 4 device: 8400 SSCB at 12AF5C58 : 0... 2105 xxx550000000xxxxx.. NED found#: 210 NED not found#: 46 device: 8500 SSCB at 12AF5010 : 0... 2105 xxx550000000xxxxx.. NED found#: 120 NED not found#: 136 device: 8600 SSCB at 12AF6118 : 0... 2105 xxx550000000xxxxx.. NED found#: 112 NED not found#: 144 device: 8700 SSCB at 12AF6798 : 0... 2105 xxx550000000xxxxx.. NED found#: 112 NED not found#: 144 device: 8800 SSCB at 12AF6D00 : 0... 2105 xxx550000000xxxxx.. NED found#: 112 NED not found#: 144 device: 8900 SSCB at 12AF9028 : 0... 2105 xxx550000000xxxxx.. NED found#: 112 NED not found#: 144 Number of DASD UCBs processed: 17602 Number of DASD USBs in ULUT : 17602 Number of dasd Online : 4753 Number of dasd Offline : 12849 End of dasd UCB scan *** I have masked the NED entries. On Wed, 18 Jul 2007 18:34:48 -0500, Kenneth E Tomiak <[EMAIL PROTECTED]> wrote: >> >>Hi guys, >> >>update, the exec does work at z/OS 1.6 on our systems. >> >>Just tried on z/OS 1.7 and getting an error. >> >>I will debug and get back to you all with changes if required. >> >>Thanks >>Bruce Hewson > >And if no changes are required will you admit what you needed to fix to >remove the error? The ouput of a D U,,,ucb,1 command still shows message 3 >word 4 is the volser. I tried, but do not have RACF access to CONSPROF. > Regards Bruce Hewson ---------------------------------------------------------------------- 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
