Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!uwm.edu!spool.mu.edu!sdd.hp.com!usc!apple!agate!ucbvax!CUNYVM.CUNY.EDU!ZPRM%AACC
From: ZPRM%AACC@CUNYVM.CUNY.EDU (ZPRM000)
Newsgroups: comp.lang.asm370
Subject: getting real device info for virt. disk using DIAG
Message-ID: <9104251235.AA06782@ucbvax.Berkeley.EDU>
Date: 24 Apr 91 21:41:09 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: IBM 370 Assembly Programming Discussion List
              <ASM370@OHSTVMA.BITNET>
Distribution: inet
Organization: The Internet
Lines: 7

You can use a DIAG x'08' (virtual console function) to give commands
and get the buffer with the results back to your program. Its documented
in my rel 6 System Facilities for Programming manual page 8. If
you still need a real live example I might be able to find you one.
I cant find it at the moment.

                                  Paul Myers