The Convert  Job Locks command  converts the locks  for a specific  job
to an outfile.   Two commands are provided.   CVTJOBLCK is the old form
and  creates a  spooled file  using DSPJOB  and then reads  the spooled
file.  CVTJOBLCK2 is the new  form which uses the QWCRJBLK API  and has
additional fields in  the outfile.  The outfile  for either command can
then be processed for a variety of needs.  The job must be active.

CVTJOBLCK  uses the  model file  TAAJOEDP and the  output file  name is
JOBLCKP.  CVTJOBLCK2 uses the  model file TAAJOEDQ and the output  file
name is JOBLCKP2.

You must  have *JOBCTL special authority  to convert the job  locks for
a job other than your own.

A typical command would be:

            CVTJOBLCK2     JOB(*) OUTLIB(xxx)

The  locks held  by the  current job  would be  output to  the JOBLCKP2
file in the named library.

CVTJOBLCK/CVTJOBLCK2 escape messages you can monitor for
--------------------------------------------------------

      TAA9891    The job does not have any locks
      TAA9892    No job exists
      TAA9893    More than one job exists
      TAA9894    The job is not active

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

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

   JOB           The qualified job  name of  the job  to convert  locks
                 for.  The default  is * meaning the current  job.  The
                 job  must  be  active   and  a  unique  name  must  be
                 provided.   A  unique name  may be  any combination of
                 job name, job and user, or job and job number.

   OUTLIB        The  library  in  which  the  JOBLCKP   file  will  be
                 placed.   The default is  *LIBL.  If the  JOBLCKP file
                 does  not already exist, a  library must be specified.

   OUTMBR        The member of  the JOBLCKP file  to be used.   If  the
                 member does  not exist, it is  added.  The  default is
                 JOBLCKP.

   REPLACE       A  *YES/*NO  value for  whether the  member  should be
                 cleared before writing records  into it.  The  default
                 is *YES.

                 *NO  may  be  specified to  add  records  to  existing
                 data.

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

   JOB           The  qualified job name  of the  job to  convert locks
                 for.   The default is *  meaning the current job.  The
                 job  must  be  active  and  a  unique  name   must  be
                 provided.   A unique  name may  be any  combination of
                 job name, job and user, or job and job number.

   OUTLIB        The  library  in  which  the  JOBLCKP2  file  will  be
                 placed.  The default is  *LIBL.  If the JOBLCKP2  file
                 does not already  exist, a library must  be specified.

   OUTMBR        The  member of the JOBLCKP2  file to be used.   If the
                 member does not exist,  it is added.   The default  is
                 JOBLCKP2.

   REPLACE       A  *YES/*NO value  for whether  the  member should  be
                 cleared before  writing records into it.   The default
                 is *YES.

                 *NO  may  be  specified  to  add  records  to existing
                 data.

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

You must have  *JOBCTL special authority to  convert the job locks  for
a job other than your own.

CVTJOBLCK may be language dependent.

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

The following TAA Tools must be on your system:

     CHKJOBCTL       Check *JOBCTL special authority
     DUPTAADBF       Duplicate TAA data base file
     EDTVAR          Edit variable
     RTVJOBSTS       Retrieve job status
     RTVSYSVAL3      Retrieve system value 3
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     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
   ------        ----    ---------      ----------    ----------

   CVTJOBLCK     *CMD                   TAAJOED       QATTCMD
   CVTJOBLCK2    *CMD                   TAAJOED2      QATTCMD
   TAAJOEDC      *PGM       CLP         TAAJOEDC      QATTCL
   TAAJOEDC2     *PGM       CLP         TAAJOEDC2     QATTCL
   TAAJOEDR      *PGM       RPG         TAAJOEDR      QATTRPG
   TAAJOEDR2     *PGM       RPGLE       TAAJOEDR2     QATTRPG
   TAAJOEDP      *FILE      PF          TAAJOEDP      QATTDDS
   TAAJOEDQ      *FILE      PF          TAAJOEDQ      QATTDDS