The Create  Generic Objects command  allows you to  create a number  of
generic  objects with  consecutive names  like  ABC002, ABC003,  etc of
any  object type.   The  first object must  exist in  the library where
the duplicates will be created.

A typical command would be:

             CRTGENOBJ  OBJ(LIB1/FILE001) OBJTYPE(*FILE)
                           NBRDIGITS(3) NBROBJS(10)

The NBRDIGITS  parameter describes  the number  of digits  in the  name
that will  be used to create new  names.  Ten objects  would be created
using  FILE001 as the  object to be  duplicated.  The  new object names
would be FILE002, FILE003, ...  FILE011.

Special cases
-------------

The  CRTDUPOBJ command  does  not  support  all  of  the  object  types
supported by CRTGENOBJ.   The following are special cased  in the code.

  **   *LIB.  RTVLIBD and CRTLIB are used.

  **   *DTAQ.  RTVDTAQD and CRTDTAQ are used.

CRTGENOBJ escape messages you can monitor for
---------------------------------------------

None.  Escape messages from based on functions will be re-sent.

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

   STROBJ        The  qualified name  of the object  that will  be used
                 as a base for  the creation of  generic objects.   The
                 object   must  exist   in   the  library   where   the
                 duplicates will be created.

                 While  a typical  solution would  be  to start  with a
                 name  such as  ABC001, any name  may be  used that has
                 enough trailing  digits to allow  for the creation  of
                 new  generic names.    For example,  if you  initially
                 used  CRTGENOBJ to create  10 objects  ABC002 - ABC011
                 and you  need  10  more  objects, use  ABC011  as  the
                 object name.

                 The  library value  defaults  to  *LIBL.   A  specific
                 library  or *CURLIB  may also  be  used.   The library
                 where  the  object  exists   will  be  used  for   the
                 duplicated objects.

   OBJTYPE       The object type of  the object to be duplicated.   Use
                 the prompter for the supported values.

   NBRDIGITS     The  number of  trailing  digits in  the  object name.
                 For  example,  if  the  object  name  is  ABC001,  the
                 number of trailing digits is 3.

   NBROBJS       The number of  objects to be  duplicated.  The  number
                 cannot  exceed the  number  that may  be generated  by
                 the  NBRDIGITS value.   For  example, if you  want 100
                 duplicates, the NBRDIGITS  value must  be at least  3.


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

The object  named must exist in  the library where the  duplicates will
be created.

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

The following TAA Tools must be on your system:

     CHKOBJ3         Check object 3
     EDTVAR          Edit variable
     RSNLSTMSG       Resend last message
     RTVNXTNAM       Retrieve next name
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   CRTGENOBJ     *CMD                   TAAOBMW       QATTCMD
   TAAOBMWC      *PGM       CLP         TAAOBMWC      QATTCL