TAA Tools
RTVJRNA         RETRIEVE JOURNAL ATTRIBUTES            TAAJRNR

The Retrieve Journal  Attributes command retrieves the attributes  of a
Journal  and such values  as the  name of  the attached receiver.   The
command may only be used in a CL program.

A typical command would be:

             DCL         &JRNRCV *CHAR LEN(10)
              .
             RTVJRNA     JRN(xxx) JRNRCV(&JRNRCV)

RTVJRNA  escape messages you can monitor for
--------------------------------------------

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

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

   JRN           The  qualified  name of  the  journal to  be retrieved
                 from.  The library  value defaults to *LIBL.   *CURLIB
                 may also be used.

   RTNLIB        The  library  containing  the  journal.   This  return
                 value  may  be  helpful  if  *LIBL  is  used  for  the
                 qualified journal  name.   If  specified,  the  return
                 variable must be declared as *CHAR LEN(10).

   ASP           The  Auxiliary Storage  pool  containing the  journal.
                 If  specified, the  return  variable must  be declared
                 as *DEC LEN(3 0).

   MSGQ          The Message  Queue  where messages  from  the  journal
                 are sent  such as if  the threshold has  been reached.
                 If  specified, the  return variable  must  be declared
                 as *CHAR LEN(10).

   MSGQLIB       The  Message  Queue  Library where  messages  from the
                 journal are  sent such  as if the  threshold has  been
                 reached.   If specified,  the return variable  must be
                 declared as *CHAR LEN(10).

   MNGRCV        The  Manage Receiver  option  as specified  on CRTJRN.
                 Either *USER or  *SYSTEM is  returned.  If  specified,
                 the  return   variable  must  be  declared   as  *CHAR
                 LEN(10).

   DLTRCV        The  Delete Receiver  option  as specified  on CRTJRN.
                 Either *NO or  *YES is  returned.   If specified,  the
                 return variable must be declared as *CHAR LEN(4).

   MNGRCVDLY     The time in  minutes to be  used to delay  the attempt
                 to  delete a  journal  receiver if  the  system cannot
                 allocate   it  and  DLTRCV(*YES)  is  specified.    If
                 specified, the  return variable  must  be declared  as
                 *DEC LEN(7 0).

   DLTRCVDLY     The  time in  minutes to  be  used to  delay the  next
                 attempt  to attach a  new journal  receiver for system
                 managed  receivers.      If  specified,   the   return
                 variable must be declared as *DEC LEN(7 0).

   JRNTYP        The type of  journal.  *LOCAL or  *REMOTE is returned.
                 If  specified, the  return  variable must  be declared
                 as *CHAR LEN(10).

   JRNSTS        The  status  of  the  journal.    *INACTIVE,  *ACTIVE,
                 *FAILED,  or   *INACTPEND  will   be  returned.     If
                 specified,  the return  variable must  be  declared as
                 *CHAR LEN(10).

   JRNDLVMODE    The  delivery  mode  of  the  journal.    *NA  will be
                 returned if it is  not applicable such as for  a local
                 journal.   *ASYNC,  *SYNC,  *ASYNCPEND, and  *SYNCPEND
                 may  also  be  returned.    If  specified, the  return
                 variable must be declared as *CHAR LEN(10).

   RCVSIZMFIX    The CRTJRN  RCVSIZOPT(*MINFIXLEN)  option.   Blank  is
                 returned  for  Remote  Journals.     *YES  or  *NO  is
                 returned   depending   on   whether   *MINFIXLEN   was
                 specified.   If specified,  the return  variable  must
                 be declared as *CHAR LEN(4).

   RCVSIZRMVI    The  CRTJRN RCVSIZOPT(*RMVINTENT)  option.   Blank  is
                 returned  for  Remote   Journals.    *YES  or  *NO  is
                 returned   depending   on   whether   *RMVINTENT   was
                 specified.   If specified,  the  return variable  must
                 be declared as *CHAR LEN(4).

   NBRRCV        The  number  of  receivers  currently attached.    The
                 system    no    longer   supports    dual   receivers.
                 Consequently, the  value  returned is  always 1.    If
                 specified,  the return  variable must  be declared  as
                 *DEC LEN(5 0).

   JRNRCV        The name  of the first attached  journal receiver.  If
                 specified, the  return variable  must be  declared  as
                 *CHAR LEN(10).

   JRNRCVLIB     The  name  of  the  library   of  the  first  attached
                 journal receiver.   If specified,  the return variable
                 must be declared as *CHAR LEN(10).

   JRNRCV2       The  name of the dual  attached journal receiver.  The
                 system  no longer  supports  dual  journal  receivers.
                 Consequently,  the  value  returned is  always  blank.
                 If  specified, the  return  variable must  be declared
                 as *CHAR LEN(10).

   JRNRCV2LIB    The name of the library  of the dual attached  journal
                 receiver.     The  system  no  longer   supports  dual
                 journal  receivers.  Consequently,  the value returned
                 is always blank.   If specified,  the return  variable
                 must be declared as *CHAR LEN(10).

   JRNCACHE      Whether  journal   entries  will   be  cached   before
                 writing  to disk.   A  *YES or  *NO will  be returned.
                 If  specified,  the return  variable must  be declared
                 as *CHAR LEN(4).

   RMTJRNTYP     The  type of  Remote  Journal.    *LOCAL,  *TYPE1,  or
                 *TYPE2  will be  returned.   If specified,  the return
                 variable must be declared as *CHAR LEN(10).

   JRNOBJ        The  total number of  objects being  journaled to this
                 journal.  If  specified, the  return variable must  be
                 declared as *DEC LEN(15 0).

   JRNOBJLMT     The maximum  number of  objects that may  be journaled
                 to  this journal.   If specified,  the return variable
                 must be declared as *DEC LEN(15 0).

   MINJRNENTD    Whether  journal  entries  to   data  areas  will   be
                 minimized in  size.  For  a description of  the codes,
                 see   the  API   QjoRetrieveJournalInformation.     If
                 specified,  the  return variable  must be  declared as
                 *CHAR LEN(1).

   MINJRNENTF    Whether journal  entries  to files  will be  minimized
                 in  size.   For a  description of  the codes,  see the
                 API   QjoRetrieveJournalInformation.    If  specified,
                 the  return  variable  must   be  declared  as   *CHAR
                 LEN(1).

   JRNRCVCNT     Describes whether  a faster  abnormal IPL  will occur.
                 The  value  influences how  fast  journal  objects are
                 forced to auxiliary storage.   For a full  description
                 of       the      value,       see       the       API
                 QjoRetrieveJournalInformation.     If  specified,  the
                 return  variable must  be declared as  *DEC LEN(11 0).

   TEXT          The text description  of the  Journal.  If  specified,
                 the  return   variable  must  be   declared  as  *CHAR
                 LEN(50).


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

Because  the command  returns variables, it  may only  be used  in a CL
program.

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

The following TAA Tools must be on your system:

     CHKOBJ3         Check object 3

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

None, the tool is ready to use.

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

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

   RTVJRNA       *CMD                   TAAJRNR       QATTCMD
   TAAJRNRC      *PGM       CLLE        TAAJRNRC      QATTCL
					

Added to TAA Productivity tools November 15, 1999


Home Page Up to Top