TAA Tools

The Convert Library Locks  2 command converts any locks held  on one or
more  library object  types.  This  allows a  determination of  who has
the  library on their  library list or has  made an explicit allocation
of a library.   The  model file in  TAATOOL is  TAAOBJDP with a  format
name of OBJLCKR.

A typical series of commands would be:

            DCLF        FILE(TAAOBJDP) /* CVTOBJLCK model file */
            CVTLIBLCK2  LIB(lib1 lib2 libx*) OUTLIB(QTEMP)
            MONMSG      MSGID(TAA9892) EXEC(DO) /* Locks exist */
 READ:      RCVF
            MONMSG      MSGID(CPF0864) EXEC(GOTO EOF)
                        /*                                  */
                        /*   Your handling of locks         */
                        /*                                  */
            GOTO        READ
 EOF:                   /* All locks have been processed    */
            ENDDO       /* Locks exist */

By default,  the TAA9892 message  is sent as  an escape if  locks exist
on any of the named libraries.

If locks exist, they would be written to the OBJLCKP file in QTEMP.


  **   If  the user  running the  command is not  authorized to  one of
       the named libraries, an error message will occur.

  **   Because there is  a time delay  between accessing the  libraries
       and  checking for  locks, the  situation may  have changed  when
       the command completes.

CVTLIBLCK2 escape messages you can monitor for

      TAA9892    Locks exist (if ESCMSG(*YES)

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

CVTLIBLCK2 Command parameters                         *CMD

   LIB           A  list  of  libraries  or  generic  library names  to
                 check locks  for.   Up  to 300  library names  may  be

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

                 OBJLCKP uses the same  name and format as used  by the
                 CVTOBJLCK tool.

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

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

   ESCMSG        A  *YES/*NO value  that  determines whether  an escape
                 message will be  sent if  locks exist for  any of  the
                 named libraries.   The  default is  *YES which  causes
                 the TAA9892 escape message if locks exist.

                 *NO may  be specified to  avoid the escape  message if
                 locks exist.


See the 'Considerations' section.


The following TAA Tools must be on your system:

     CVTOBJLCK       Convert object lock
     DUPTAADBF       Duplicate data base file
     EDTVAR          Edit variable
     EXTLST          Extract list
     RSNLSTMSG       Resend last message
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message


None, the tool is ready to use.

Objects used by the tool

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

   CVTLIBLCK2    *CMD                   TAALIDJ       QATTCMD
   TAALIDJC      *PGM       CLP         TAALIDJC      QATTCL

Added to TAA Productivity tools October 15, 2009

Home Page Up to Top