The  Check Holiday  command allows  you  to check  a  list of  specific
holidays against  the current system date  or any date so  that some CL
code  may be  bypassed or executed.   For example,  if a  backup is not
needed on Christmas,  you can check  and bypass the  save.  TAA9892  is
sent as  an escape message if the  current date is one  of the holidays
you specified.

A typical series of commands would be:

             CHKHOLIDAY    HOLIDAYS(*NEWYEARS *CHRISTMAS ...)
             MONMSG        MSGID(TAA9892) EXEC(DO) /* Matching date */
                           /*                                    */
                           /*  Your code for the matching date   */
                           /*                                    */
             ENDDO         /* Matching date */

Note that the system date is checked and not the job date.

CHKHOLIDAY escape messages you can monitor for
----------------------------------------------

      TAA9892    The current date matches a specified holiday

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

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

   HOLIDAY       A  list   of  up  to  30  holidays  such  as  *ASHWED,
                 *CHRISTMAS, etc.    Use the  command prompter  to  see
                 the complete list.

   DATE          The date  to check against.   *CURRENT is  the default
                 for today's  date.  A specific date  may be entered in
                 job format.  Only  a date in the  21st century may  be
                 entered and must  be between Jan  1, 2000 and  Dec 31,
                 2039.

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

None.

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

The following TAA Tools must be on your system:

     ADDDAT2         Add date 2
     EXTLST          Extract list
     RTVDAT          Retrieve date
     RTVHOLIDAY      Retrieve holiday
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   CHKHOLIDAY    *CMD                   TAADAUG       QATTCMD
   TAADAUGC      *PGM       CLP         TAADAUGC      QATTCL