The  Work Current  User  command is  similar  to the  WRKUSRJOB  system
command except  that the current user  of the job is also  shown.  This
allows  support  for  jobs  that  swap  profiles  to  be  displayed and
operated on.   The  same options  as on  WRKUSRJOB such  as CHGJOB  are
supported.  Only active jobs are displayed.

See  the  DSPCURUSR  command  for  a  similar  function  that  supports
'display only' options.

When  entering  the command,  the  'job  user' name  (the  user profile
assigned when the job  started) must be  described (the default is  the
current user profile).   You may optionally describe  a 'current user'.

You  must have *JOBCTL special  authority to request a  'job user' name
other than your own.

A typical command would be:

            WRKCURUSR      JOBUSER(QUSER) CURUSER(*ALL)

All jobs that  were started with  the QUSER profile  regardless of  the
current  user name  that  are  active would  be  displayed.   The  same
options  as appear on  WRKUSRJOB may be  entered to perform  actions on
the job.

The  F16 key acts  as a toggle  switch between displaying  the job user
or the subsystem name.

WRKCURUSR escape messages you can monitor for
---------------------------------------------

      TAA9895    No jobs exist for the specified user

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

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

   JOBUSER       Enter the  name of  the 'job  user' that  you want  to
                 display  jobs  for.    The  'job  user'  is  the  user
                 profile  name  that the  job  was started  with.   The
                 default is * meaning the current user profile.

                 A specific user  or *ALL may be  entered.  Using  *ALL
                 causes slower performance  as all active jobs  must be
                 considered.

                 You must  have *JOBCTL special authority  to request a
                 'job user' other than your own or *ALL users.

   CURUSER       Enter the name  of the  'current user'  that you  want
                 to display jobs for.   The 'current user' is  the user
                 profile  name  that   the  job  is  currently  running
                 under.   The default is  *ALL meaning any current user
                 profile.

                 A specific user may be entered.

   JOBTYP        The type  of  job to  provide  information for.    The
                 default is *BOTH for both batch and interactive.

                 *INTERACT  may be entered  to access  only interactive
                 jobs.

                 *BATCH may be entered to access only batch jobs.

   OUTPUT        How  to  output the  results.    * is  the  default to
                 present an  interactive  display  if  the  command  is
                 entered interactively.

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

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

You  must have *JOBCTL special  authority to request a  user other than
your own.

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

The following TAA Tools must be on your system:

     CHKJOBCTL       Check job control special authority
     FILEFDBCK       File feedback
     RPGSTSDS        RPG status data structure
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message
     TAAEXC          TAA Execute

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

None, the tool is ready to use.

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

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

   WRKCURUSR     *CMD                   TAAJODL       QATTCMD
   TAAJODLC      *PGM       CLP         TAAJODLC      QATTCL
   TAAJODLC2     *PGM       CLP         TAAJODLC2     QATTCL
   TAAJODLR      *PGM       RPG         TAAJODLR      QATTRPG
   TAAJODLD      *FILE      DSPF        TAAJODLD      QATTDDS