The Retrieve  Last QHST  command retrieves  information about the  last
(current)  QHST file  in QSYS.    The number  of QHST  files  and their
total size may also be retrieved.

The  *PUBLIC is *EXCLUDE to the QHST  files in QSYS, The program adopts
the authority  of  QSECOFR to  allow  the command  to be  available  to
*PUBLIC.

A typical series of commands would be:

             DCL           &LASTQHST *CHAR LEN(10)
              .
             RTVLSTQHST    LASTQHST(&LASTQHST)

The last (current) full name of the QHST file would be returned.

RTVLSTQHST escape messages you can monitor for
----------------------------------------------

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

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

   LASTQHST      The  object  name of  the  last  (current) QHST  file.
                 This  is an  optional return  value that if  used must
                 be specified as *CHAR LEN(10).

   LASTSIZE      The size of  the last  (current) QHST file.   This  is
                 an  optional  return  value   that  if  used  must  be
                 specified as *DEC LEN(15 0).

   STRDATE       The  start  date  of the  last  QHST  file in  CYYMMDD
                 format.   This is  an optional  return value  that  if
                 used must be specified as *CHAR LEN(7).

   STRTIME       The  start  time  of the  last  QHST  file  in  HHMMSS
                 format.   This  is an  optional  return value  that if
                 used must be specified as *CHAR LEN(6).

   ENDDATE       The  end  date  of  the  last  QHST  file  in  CYYMMDD
                 format.   This  is normally  the  last date  in  which
                 either  DSPLOG was used  or the  last time  the system
                 converted  the QHST  message queue  to the log.   This
                 is an  optional  return value  that  if used  must  be
                 specified as *CHAR LEN(7).

   ENDTIME       The end time  of the last QHST file  in HHMMSS format.
                 This  is an  optional return value  that if  used must
                 be specified as *CHAR LEN(6).

   NBRFILES      The number  of QHST  files  that exist.   This  is  an
                 optional return value  that if used must  be specified
                 as *DEC LEN(5 0).

   TOTSIZE       The  total  size  of  all  QHST  files.   This  is  an
                 optional  return value that if  used must be specified
                 as *DEC LEN(15 0).

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

None.

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

The following TAA Tools must be on your system:

     RTVOBJLST       Retrieve object list
     SNDESCINF       Send escape information

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

None, the tool is ready to use.

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

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

   RTVLSTQHST    *CMD                   TAAHSTG       QATTCMD
   TAAHSTGC      *PGM       CLP         TAAHSTGC      QATTCL