The  Retrieve Device  Display  command  retrieves information  about  a
display device such as the type, model, port, and switch settings.

A typical command would be:

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

The QDCRDEVD API is used to access the information.

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

   DEV           The display 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).

   LOCADR        The  local address of the device.   An optional return
                 variable that if specified  must be declared as  *CHAR
                 LEN(10).

   SWTSET        The  switch  setting  of  the  device.    An  optional
                 return  variable that  if  specified must  be declared
                 as *CHAR LEN(1).

   PORT          The  port  on  which  the  device  is  attached.    An
                 optional return  variable  that if  specified must  be
                 declared as *CHAR LEN(5).

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

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

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

   RMTNETID      The  remote network  ID of  the device.   An  optional
                 return  variable that  if  specified must  be declared
                 as *CHAR LEN(10).

   PRTDEV        The  print  device  assigned  to  the  display.     An
                 optional return  variable  that if  specified must  be
                 declared as *CHAR LEN(10).

   OUTQ          The  output   queue  assigned  to  the   device.    An
                 optional  return  variable that  if specified  must be
                 declared as *CHAR LEN(10).

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

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

   MSGQLIB       The  library of  the  message  queue assigned  to  the
                 device.     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.    An optional  return variable  that
                 if specified must be declared as *CHAR LEN(10).

   PASSTHRU      Whether the  current job is in a  passthru session for
                 the  device.    An optional  return  variable  that if
                 specified must be declared as *CHAR LEN(1).

                      '0' = Not a passthru job.
                      '1' = 5250 Emulator type display
                      '2' = Virtual using API (not Telnet)
                      '3' = Virtual (Telnet)
                      '4' = Passthru device (STRPASTHR used)

   AUTOCFG       Whether the  device is  auto configured.   The  values
                 returned  are YES,  NO, or  blanks 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).

   IPADDR        The  IP (Internet protocol) address  in dotted decimal
                 form.  An optional  return variable that if  specified
                 must be declared as *CHAR LEN(15).

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

Because the command  returns variables, RTVDEVDSP  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
   ------        ----    ---------      ----------    ----------

   RTVDEVDSP     *CMD                   TAADEVD       QATTCMD
   TAADEVDC      *PGM       CLP         TAADEVDC      QATTCL