The Revoke  IFS Primary Group  Profile command  sets the Primary  Group
Profile  to *NONE for  a specific  user.   This allows some  cleanup of
the  IFS  objects.   The command  defaults to  '*CHECK' and  provides a
listing of what would be changed if '*REVOKE' had been specified.

You must have *ALLOBJ special authority to use RVKIFSPGP.

A typical command would be:

             RVKIFSPGP  USRPRF(xxx)

A listing would be  output of all IFS  objects where the named user  is
the Primary Group  Profile.  Because the default  is ACTION(*CHECK), no
changes  would  be  made.    After  reviewing  the  listing, you  could
specify ACTION(*REVOKE) to set the PGP attribute to *NONE.

RVKIFSPGP escape messages you can monitor for
---------------------------------------------

      TAA9891    The user is not the PGP for any IFS objects

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

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

   USRPRF        The name of  the user  profile to  revoke the  Primary
                 Group Profile attribute (set it to *NONE).

   ACTION        The action to be performed.

                 *CHECK is the  default which allows a  listing of what
                 would happen if *REVOKE had been specified.

                 *REVOKE  also produces a listing  and sets the Primary
                 Group Profile attribute to *NONE.

   OUTPUT        How to  output  the results.    * is  the  default  to
                 display the  spooled file  if the  command is  entered
                 interactively.   The spooled file is  deleted after it
                 is displayed.

                 If  the  command  is  entered in  batch  or  *PRINT is
                 specified, the  spooled file  is output and  retained.

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

You must have *ALLOBJ special authority to use RVKIFSPGP.

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

The following TAA Tools must be on your system:

     CHKALLOBJ       Check *ALLOBJ special authority
     CVTIFSAUT2      Convert IFS authority 2
     RTVSYSVAL3      Retrieve system value 3
     SNDCOMPMSG      Send completion message
     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
   ------        ----    ---------      ----------    ----------

   RVKIFSPGP     *CMD                   TAAIFTZ       QATTCMD
   TAAIFTZC      *PGM       CLP         TAAIFTZC      QATTCL
   TAAIFTZC2     *PGM       CLP         TAAIFTZC2     QATTCL
   TAAIFTZR      *PGM       RPG         TAAIFTZR      QATTRPG