RTVAUDMDLF      RETRIEVE AUDIT MODEL FILE              TAAJROK

 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).

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

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

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

 The following TAA Tools must be on your system:

      SNDESCINF       Send escape information
      SNDESCMSG       Send escape message

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

 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

Powered by AS/400Powered by AS/400 Last modified on July 15, 2010 © 1995, 2010 - Jim Sloan, Inc.