TAA Tools

 RTVILEPGMA      RETRIEVE ILE PROGRAM ATTRIBUTES        TAAPGMP

 The Retrieve  ILE Program Attributes  command retrieves  the attributes
 from an ILE  *PGM object.  The RTVPGMA tool  should be used to retrieve
 the   basic  program  attributes.    See  the  RTVILEMODA  command  for
 information about the modules of the program.

 A typical command would be:

              DCL          &NBRMOD *DEC LEN(5 0)
               .
              RTVILEPGMA   PGM(xxx) NBRMOD(&NBRMOD)

 The number of modules in the ILE program would be retrieved.

 TAA9893 is  sent as  an escape message  if the  program is  not an  ILE
 type.

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

    PGM           The  qualified program to  be retrieved.   It  must be
                  an  ILE  program.    The  library  value  defaults  to
                  *LIBL.  *CURLIB may also be used.

    RTNLIB        An optional  return  variable that  will  contain  the
                  library name where  the program was found.   The value
                  may  be helpful if  the program is  accessed without a
                  specific library  name.   If specified,  the  variable
                  must be declared as *CHAR LEN(10).

    ENTMOD        An  optional return  variable  that will  contain  the
                  entry  module name.   If specified, the  variable must
                  be declared as *CHAR LEN(10).

    ENTMODL       An  optional  return  variable that  will  contain the
                  entry  module library.    If specified,  the  variable
                  must be declared as *CHAR LEN(10).

    ACTGRPATR     An  optional return  variable  that  will contain  the
                  activation  group attribute.  The  value will be *NEW,
                  *DFTACTGRP, *CALLER,  or  an  activation  group  name.
                  If specified, the  variable must be declared  as *CHAR
                  LEN(30).

    ALLCRTDTA     An   optional  return   variable  that   will  contain
                  whether creation  data  exists.   The  value  will  be
                  *NO, *ALL,  or  *UNOB (unobservable).   If  specified,
                  the variable must be declared as *CHAR LEN(5).

    OBSCMP        An   optional  return   variable  that   will  contain
                  whether  the  observable  information  associated with
                  the program has  been compressed.   The value will  be
                  Y or N.   If specified, the variable  must be declared
                  as *CHAR LEN(1).

    RUNTIMCMP     An   optional  return   variable  that   will  contain
                  whether the run time  information associated with  the
                  program has been  compressed.  The value will  be Y or
                  N.   If  specified, the variable  must be  declared as
                  *CHAR LEN(1).

    RLSCRTON      An optional  return  variable that  will  contain  the
                  release the  program was created  on.  The  value will
                  be  an  entry  such  as  V3R6M0.   If  specified,  the
                  variable must be declared as *CHAR LEN(6).

    RLSCRTFOR     An  optional  return  variable that  will  contain the
                  release the  program was  created  for.   This is  the
                  target  release of  the  program and  is the  earliest
                  release  the program  can run on.   The  value will be
                  an entry such as V3R6M0.   If specified, the  variable
                  must be declared as *CHAR LEN(6).

    SHRACTGRP     An  optional   return  variable   that  will   contain
                  whether  the  program  runs  in  a  shared  activation
                  group.  The value will by  Y or N.  If specified,  the
                  variable must be declared as *CHAR LEN(1).

    ALWUPD        An  optional   return  variable   that  will   contain
                  whether  the UPDPGM command  may be  used.   The value
                  will  by Y or  N.  If specified,  the variable must be
                  declared as *CHAR LEN(1).

    CCSID         An optional  return  variable  that will  contain  the
                  Coded   Character  Set   ID  of   the  program.     If
                  specified,  the  variable  must  be  declared  as *DEC
                  LEN(5 0).

    NBRMOD        An optional  return  variable that  will  contain  the
                  number of modules  in the program.   If specified, the
                  variable must be declared as *DEC LEN(5 0).

    NBRSRVPGM     An  optional  return variable  that  will  contain the
                  number of service programs bound  to the program.   If
                  specified,  the  variable must  be  declared  as  *DEC
                  LEN(5 0).

    NBRCPYRGT     An  optional  return variable  that  will contain  the
                  number  of Copyrights  in the program.   If specified,
                  the variable must be declared as *DEC LEN(5 0).

    NBRUNRREF     An  optional return  variable  that will  contain  the
                  number  of  unresolved   references  in  the  program.
                  This  is  the  number of  symbols  that  could  not be
                  resolved at CRTPGM time.   If specified, the  variable
                  must be declared as *DEC LEN(5 0).

    ALWSTGINZ     An  optional   return  variable   that  will   contain
                  whether    the   program    allows    static   storage
                  re-initialization.   If specified,  the variable  must
                  be declared as *CHAR LEN(1).

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

 Because the  command returns  variables, it may  only be  used in  a CL
 program.

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

 The following TAA Tools must be on your system:

      SNDESCMSG       Send escape message

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

 None, the tool is ready to use.

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

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

    RTVILEPGMA    *CMD                   TAAPGMP       QATTCMD
    TAAPGMPC      *PGM       CLP         TAAPGMPC      QATTCL

Added to TAA Productivity Tools May 1, 1996


Home Page

Last modified on November 19, 2014 © 1995, 2014 - TAA Tools, Inc.