TAA Tools
CHKMBR2         CHECK MEMBER NBR 2                     TAAOBJQ

The  Check Member  Nbr  2  command is  similar  to the  system  command
CHKOBJ except  that CHKMBR2 sends  an escape message if  the member 'is
found'.   The intent  of the command  is to simplify  coding when it is
considered an  error  if the  member  exists.   A similar  function  to
check for an object in existence is done by the CHKOBJ2 tool.

CHKMBR2 sends  message ID  TAA9891 as an  escape message if  the member
exists.  If the member does not exist, no message is sent.

CHKMBR2  internally  issues  the  CHKOBJ  command.    All other  escape
messages from CHKOBJ are resent.

A typical solution would be:

            CHKMBR2      FILE(FILEA) MBR(MBR1)
            MONMSG       MSGID(TAA9891) EXEC(DO) /* Member exists */
                         /*                                       */
                         /*   Your coding for the member exists   */
                         /*                                       */
            ENDDO        /* Member exists */

Using CHKOBJ, the coding would be as follows:

            MONMSG       MSGID(CPF9815) EXEC(DO) /* No member */
            RCVMSG       MSGTYPE(*EXCP) /* Remove the escape */
            GOTO         ENDCHK
            ENDDO        /* No member */
                         /*                                      */
                         /*   Your coding for the member exists  */
                         /*                                      */
 ENDCHK:                 /* Member exists */

Note that  with the  CHKOBJ solution,  you have  to  branch around  the
code that  the application  considers an  error.   The GOTO with  label
solution  operates  correctly,  but  can  also  be  a cause  of  coding
errors.  CHKMBR2 allows you to code the condition more normally.

Command parameters                                    *CMD

   FILE          The qualified file name.   The library value  defaults
                 to *LIBL.  *CURLIB may also be specified.

   MBR           The member  name.   The  special value  *FIRST may  be




The following TAA Tools must be on your system:

     SNDESCMSG       Send escape message


None, the tool is ready to use.

Objects used by the tool

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

   CHKMBR2       *CMD                   TAAOBJQ       QATTCMD
   TAAOBJQC      *PGM       CLP         TAAOBJQC      QATTCL

Added to TAA Productivity tools May 1, 1996

Home Page Up to Top