The Retrieve  Device Tape  command retrieves  information about a  tape
device such as the type, model, and resource name.

A typical command would be:

             DCL          &TYPE *CHAR LEN(10)
              .
             RTVDEVTAP    DEV(xxx) TYPE(&TYPE)

The QDCRDEVD API is used to access the information.

Command parameters                                    *CMD
------------------

   DEV           The tape device name.

   TYPE          The  type  of device.    An  optional return  variable
                 that  if specified must be  declared as *CHAR LEN(10).

   MODEL         The model of  the type.   An optional return  variable
                 that if  specified must be declared  as *CHAR LEN(10).

   RESOURCE      The  resource name of the device.   An optional return
                 variable that if specified  must be declared as  *CHAR
                 LEN(10).

   MSGQ          The   message  queue   assigned   to  receive   device
                 messages.     An  optional  return  variable  that  if
                 specified must be declared as *CHAR LEN(10).

   MSGQLIB       The library of the  message queue assigned to  receive
                 device messages.    An optional  return variable  that
                 if specified must be declared as *CHAR LEN(10).

   CTL           The controller  which the device is attached  to if it
                 is  non-switched.   Not all  devices have controllers.
                 An optional  return  variable that  if specified  must
                 be declared as *CHAR LEN(10).

   ONLINE        A *YES/*NO  value for whether the device  is placed on
                 line  at IPL.    An optional  return variable  that if
                 specified must be declared as *CHAR LEN(10).

   UNLOAD        A *YES/*NO  value  for whether  the  device is  to  be
                 unloaded at  vary off.   An  optional return  variable
                 that if  specified must be declared  as *CHAR LEN(10).

   VRTDEV        Whether the device is a  virtual tape device.  A  *YES
                 or *NO will be  returned.  This is an  optional return
                 variable that  if specified must be  declared as *CHAR
                 LEN(4).

   MAXBLKSIZ     The  maximum block  size supported  by the  device.  A
                 value such  as 262144 will  be returned.   This is  an
                 optional  return variable  that if  specified must  be
                 declared as *DEC LEN(9 0).

   OPTBLKSIZ     The  optimum  block  size  supported  by  the  device.
                 This is the  value used when  a SAV command  specifies
                 USEOPTBLK(*YES).   A  value  such  as 262144  will  be
                 returned.   This is  an optional  return variable that
                 if specified must be declared as *DEC LEN(9 0).

   CLASS         The class  of the  tape  device.   One of  the  values
                 '1/2 reel',  '1/2 cart',  '1/4 cart',  or '8 mm'  will
                 be  returned.   This  is an  optional  return variable
                 that  if specified must be  declared as *CHAR LEN(10).

   OVRWRT        Whether the device  has overwrite capability.   A *YES
                 or  *NO will  normally be  returned.   Blanks  will be
                 returned  if  a  media  library  device is  requested.
                 This  is   an  optional   return  variable   that   if
                 specified must be declared as *CHAR LEN(4).

   RDBCKWARD     Whether the  device has read  backward capability.   A
                 *YES  or *NO will  normally be returned.   Blanks will
                 be returned if  a media library  device is  requested.
                 This  is   an   optional  return   variable  that   if
                 specified must be declared as *CHAR LEN(4).

   HDWCPR        Whether the  device has hardware compression.   A *YES
                 or  *NO  will normally  be returned.   Blanks  will be
                 returned  if a  media  library  device  is  requested.
                 This   is  an   optional  return   variable  that   if
                 specified must be declared as *CHAR LEN(4).

Restrictions
------------

Because  the command returns  variables, RTVDEVTAP may only  be used in
a CL program.

Prerequisites
-------------

None.

Implementation
--------------

None, the tool is ready to use.

Objects used by the tool
------------------------

   Object        Type    Attribute      Src member    Src file
   ------        ----    ---------      ----------    ----------

   RTVDEVTAP     *CMD                   TAADEVB       QATTCMD
   TAADEVBC      *PGM       CLP         TAADEVBC      QATTCL