xcall GETDEV, devstr
xcall GETDEV, unit, dev
GETDEV.SBR retrieves the current device information in one of two formats, as shown above.
Parameters
MAP1 Devstr,S,6 ! (e.g. "DSK1")
MAP1 Unit,B,2 ! (logical unit #)
MAP1 Dev,S,3 ! (e.g. "DSK")