The Convert  System Level command  takes the system  level in the  form
VnnRnnMnn  (e.g.   as  returned by  RTVOBJD) and  allows  return values
such as V2R2M0.

A typical set of commands would be:

            DCL         &SYSLVL *CHAR LEN(9)
            DCL         &RELID2 *CHAR LEN(6)
             .
            RTVOBJD     OBJ(xxx) SYSLVL(&SYSLVL)
            CVTSYSLVL   SYSLVL(&SYSLVL) RELID2(&RELID2)

If  the system level was V03R01M00,  the &RELID2 value would be V3R1M0.

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

   SYSLVL        The system level  to be converted.   This must be a  9
                 character value in the form VnnRnnMnn.

   RELID2        A  return  value  which  must  be  declared  as  *CHAR
                 LEN(6).  The value would appear as VnRnMn.

   RELID3        A  return  value  which  must  be  declared  as  *CHAR
                 LEN(6).  The value would appear as VnRn.n.

   RELID4        A  return  value  which  must  be  declared  as  *CHAR
                 LEN(6).   The value  would appear as  VnRn if  the Mod
                 level  is 00  or VnRn.n  if the  Mod level  is greater
                 than 00.

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

Because the command  returns variables, it  can only be  executed 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
   ------        ----    ---------      ----------    ----------

   CVTSYSLVL     *CMD                   TAACLPV       QATTCMD
   TAACLPVC      *PGM       CLP         TAACLPVC      QATTCL