The Retrieve Data Area  Description command allows you to  retrieve the
attributes of a data area (not the value).

A typical command would be:

         DCL           &TYPE *CHAR LEN(10)
         DCL           &LENGTH *DEC LEN(5 0)
          .
         RTVDTAARA     DTAARA(xxx) TYPE(&TYPE) LENGTH(&LENGTH)

The system API QWCRDTAA is used to access the information.

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

   DTAARA        The  qualified name  of the  data  area.   The library
                 value   defaults  to  *LIBL.    *CURLIB  may  also  be
                 specified.

   RTNLIB        The library where the  data area exists.  This  may be
                 useful  if a  special value  is used  for  the library
                 qualifier.   This is  a return variable  which must be
                 declared as *CHAR LEN(10).

   TYPE          The type  of data  area.   This is  a return  variable
                 which  must be  declared as  *CHAR LEN(10).   It  will
                 contain a value of *LGL, *CHAR, or *DEC.

   LENGTH        The  length  of  the data  area.    This  is a  return
                 variable which  must be  declared  as *DEC  LEN(5  0).
                 This  is   the  value   specified  on  the   CRTDTAARA
                 command.

   DECPOS        The  number of decimal  positions.   This is  a return
                 variable  which  must be  declared  as *DEC  LEN(2 0).
                 This  is   the  value   specified  on  the   CRTDTAARA
                 command.   Because  the return  variable is  specified
                 as  decimal, the value returned will  be 0 for *LGL or
                 *CHAR data areas.

   TEXT          The text  description.    This is  a  return  variable
                 which must be declared as *CHAR LEN(50).

   OWNER         The owner.   This is a  return variable which  must be
                 declared as *CHAR LEN(10).

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

Because  the command  returns variables, it  may only  be used in  a CL
Program.

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

The following TAA Tools must be on your system:

           SNDESCMSG     Send escape message

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

None, the tool is ready to use.

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

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

   RTVDTAARAD    *CMD                   TAAARAD       QATTCMD
   TAAARADC      *PGM       CLP         TAAARADC      QATTCL