The Check Object Type  command checks an 'Object Type' value  to see if
it  is  valid.   Any  object type  that  can be  checked  by CHKOBJ  is
considered  valid.  TAA9896 is sent as  an escape message if the object
type is not valid.

A typical series of commands would be:

               DCL         &OBJTYPE *CHAR LEN(7)
                .
               CHKOBJTYP   OBJTYPE(&OBJTYPE)
               MONMSG      MSGID(TAA9896) EXEC(DO) /* Invalid type */
                           /*                                      */
                           /*    Your handling of an invalid type  */
                           /*                                      */
               ENDDO       /* Invalid type */

CHKOBJTYP escape messages you can monitor for
---------------------------------------------

      TAA9896    The object type is not valid.

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

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

   OBJTYPE       One  of the  object  types  that  can  be  checked  by
                 CHKOBJ.   If the  type is not  valid, TAA9896  is sent
                 as an escape message.

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

None.

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
   ------        ----    ---------      ----------    ----------

   CHKOBJTYP     *CMD                   TAAOBKN       QATTCMD
   TAAOBKNC      *PGM       CLP         TAAOBKNC      QATTCL