TAA Tools

The Retrieve  Audit  Model File  command retrieves  the  model file  in
QSYS  based on  an entry  type for  a journal  entry.   Only  the entry
types  associated with  the T journal  code (for Journal  type = Audit)
are supported.

A typical series of commands would be:

            DCL            &FILE *CHAR LEN(2)
            RTVAUDMDLF     ENTTYP(xx) FILE(&FILE)

For entry type 'AF' the model file QASYAFJ5 would be returned.

RTVAUDMDLF escape messages you can monitor for

      TAA9891    The Entry Type is not known
      TAA9892    No model file for the entry type

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

Command parameters                                    *CMD

   ENTTYP        The journal  entry  type  for  the T  Journal  Code  =
                 Audit  entry.   A 2  character value  must  be entered
                 that matches one of the valid entry types.

   MODELFILE     The  model file  in QSYS  that is associated  with the
                 entry type.   This  is a  required  return value  that
                 must be declared as *CHAR LEN(10).


Because the  command returns  a variable, RTVAUDMDLF  may only  be used
in a CL program.


The following TAA Tools must be on your system:

     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message


None, the tool is ready to use.

Objects used by the tool

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

   RTVAUDMDLF    *CMD                   TAAJROK       QATTCMD
   TAAJROKC      *PGM       CLP         TAAJROKC      QATTCL

Added to TAA Productivity tools September 15, 2006

Home Page Up to Top