When an  object is restored  to a different  system that is  authorized
to  an authorization  list, the  object  does not  automatically become
authorized  to the  authorization list  even if  the authorization list
exists on the second system.  You must either:

  **   Ensure  the   authorization  list   exists   and  restore   with
       ALWOBJDIF(*ALL) or:

  **   Ensure   the  authorization   list  exists   and  re-grant   the
       authorization on the second system.

Any  authorizations made to the list are  not transferred to the second
system other than the owner and *PUBLIC user.

The Save Authorization  List Data tool and  the companion tool  RSTAUTL
provide an  alternative solution for this  situation.  The  tools allow
the simple transfer of the authorization list structure.

A typical SAVAUTL command would be:

      SAVAUTL    AUTL(xxx) LIB(yyy)

A  listing would be output  to the spooled file  AUTHORIZED with a list
by library of the objects that are authorized.

The AUTL  parameter  allows  a  maximum of  40  entries.    A  specific
authorization list may  be named, a  generic name or the  special value
*ALL for all authorization lists.

The library  must not exist.   It will be created with  three data base
files:

  **   A list of the authorization lists you specified.

  **   A  list of the objects  that are authorized to  the list on your
       system.

  **   A list  of the  users who  are authorized  to the  authorization
       list.

You then  save the library that  has been created and  the objects that
you  want to  restore to  the second  system.  You  would use  a normal
SAVLIB command for the library  specified on SAVAUTL and either  SAVLIB
or SAVOBJ for your objects.

You then  restore the SAVAUTL  library on a  second system and  use the
RSTAUTL tool (2 different commands) to:

  **   Ensure  the   authorization  lists  exist  (if   not,  they  are
       created).

  **   Authorize the users that  were on the list  of the first  system
       to be  on the list of  the second system.   An option  exists to
       make  the lists  the same,  ignore  any authorizations,  or only
       add new users.

  **   Re-grant the objects that were authorized to the lists.

See the specific steps described for the RSTAUTL tool.

One  of the  advantages of SAVAUTL/RSTAUTL  is that the  major steps do
not have to be followed in  the exact order.  For example, if  you have
already restored your  objects on a second system  and realize that the
authorization  structure  is  now incorrect  (e.g.    the authorization
lists did  not  exist or  you forgot  to  specify ALWOBJDIF),  you  can
recover by using SAVAUTL/RSTAUTL.

Summary of the steps (normal procedure)
---------------------------------------

  **   Use the SAVAUTL command for the desired authorization lists:

         SAVAUTL    AUTL(xxx) LIB(yyy)

  **   Save the library that was created by SAVAUTL:

         SAVLIB     LIB(xxx) ...

  **   Save the  objects you want  to move to  the second system.   You
       can  save objects that  are not authorized  to the authorization
       list at the same time.

         SAVLIB (or SAVOBJ) ...

  **   Restore to the second system.

  **   Follow the instructions for the RSTAUTL tool.

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

   AUTL          A  list   of   up  to   40   entries.     A   specific
                 authorization list,  a  generic name,  or the  special
                 value   *ALL   (all   authorization  lists)   may   be
                 specified.

   LIB           The  library  where  the data  files  will  be created
                 that will  be  restored on  a  second system  for  the
                 RSTAUTL tool  use.   The library must  not exist.   It
                 will  be created  for you.   If  an error  occurs when
                 creating the data  for the  library, the library  will
                 be automatically deleted.

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

None.

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

The following TAA Tools must be on your system:

           EDTVAR         Edit variable
           EXTLST         Extract list
           RTVDOCOBJ      Retrieve document object
           SNDCOMPMSG     Send completion message
           SNDESCMSG      Send escape message
           SNDSTSMSG      Send status message

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

None, the tool is ready to use.

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

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

   SAVAUTL       *CMD                   TAASECZ       QATTCMD
   TAASECZC      *PGM       CLP         TAASECZC      QATTCL
   TAASECZC2     *PGM       CLP         TAASECZC2     QATTCL
   TAASECZR      *PGM       RPG         TAASECZR      QATTRPG