TAA Tools
CHKHOLIDAY      CHECK HOLIDAY                          TAADAUG

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:

             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,




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


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

Added to TAA Productivity tools June 1, 2002

Home Page Up to Top