SCNSRC2 -- Scan Source 2 - Lists Members Without Argument

SCNSRC2 SCAN SOURCE 2 COMMAND TAASREV
The Scan Source 2 command is the inverse of the SCNSRC command. SCNSRC2 scans for an argument and lists the name of the member in a spooled file if the argument does not exist. One, generic, or all members in a source file may be scanned. An outfile is optional. If the outfile is requested, the SCNSRC2P file is output. The model file used for the outfile is TAASREVP with a format name of SCSRCR. The value to be scanned for cannot span a source record. A typical command would be: SCNSRC2 FILE(RPG) ARGUMENT(ABC) All members of the QRPGSRC file would be scanned. A listing would be output of any member that did not contain the string ABC. Command parameters CMD ------------------ FILE The qualified name of the source file to be scanned. To simplify the entering of system supplied source file names, you may use the standard abbreviations like RPG, RPGLE, CLP etc. The library defaults to LIBL. A specific library name or the special value LIBL may be used. ARGUMENT The argument to be scanned for. Because the system command function folds the value to upper case, you may need to surround the value in quotes. Trailing blanks will be trimmed off. MBR The member name. The default is ALL for all members in a file. A specific name or a generic member name may be entered. TRANSLATE A YES/NO option that defaults to NO. YES causes the source statement to be translated to upper case before scanning for the argument. NO does not cause translation. ADDBLANKS The number of blanks to add to the end of the argument before scanning. 0 is the default meaning the length of the data for each argument determines what is scanned for. A value in a range of 0 to 3 must be entered. The intent of this parameter is to provide for the situation such as when you want to scan for the end of a name or word ending in 'red', but you do not want words such as 'redeem'. Using ADDBLANKS(1) finds any words such as 'altered' which are followed by a blank. SELCOL6 Whether to select only certain source records based on the value of column 6 of the source data portion of the record. The default is ANY meaning that column 6 is not considered and the entire data portion of the record is scanned. This option is designed for RPG/RPGLE to allow selection of the type of specification such as I, D, C, etc. For example, if C is entered, only statements with a C in column 6 of the source data will be scanned. Note that this may include some array and table data. A value should only be entered when you are limiting the scan to RPG/RPGLE source types. The scan which occurs is not sensitive to the source type and would probably provide misleading information if a non-RPG type of source was scanned. NOTFOUND A YES/NO option that determines if the TAA9897 escape message will be sent if one or more members are found without the argument. NO is the default meaning only a completion message is sent. YES means that if one or more members do not contain the argument, the TAA9897 escape message is sent. OUTLIB The library in which the file SCNSRC2P will be placed. The file will contain one record for each member that does not contain the argument. The model file used for the outfile is TAASREVP with a format name of SCSRCR. The default is NONE meaning no outfile is created. LIBL may be entered if the SCNSRC2P exists. If the SCNSRC2P file does not exist, a library must be specified. OUTMBR The member of the SCNSRC2P file to be used. If the member does not exist, it is added. The default is SCNSRC2P. REPLACE A YES/NO value for whether the member should be cleared before writing records into it. YES is the default to clear the member first. NO may be specified to add records to an existing member. Restrictions ------------ The value to be scanned for cannot span a source record. Prerequisites ------------- The following TAA Tools must be on your system: DUPTAADBF Duplicate TAA data base file EDTVAR Edit variable HLRMVMSG HLL Remove message RTVDBFA Retrieve data base file attributes RTVMBRLST Retrieve member list RTVSYSVAL3 Retrieve system value 3 SNDCOMPMSG Send completion message SNDESCINF Send escape information SNDESCMSG Send escape message SNDSTSCNT Send status count Implementation -------------- None, the tool is ready to use. Objects used by the tool ------------------------ Object Type Attribute Src member Src file ------ ----- --------- ---------- ----------- SCNSRC2 CMD TAASREV QATTCMD TAASREVC PGM CLP TAASREVC QATTCL TAASREVR PGM RPG TAASREVR QATTRPG TAASRCFP FILE PF TAASREVP QATTDDS

SCNSRC2      SCAN SOURCE 2 COMMAND                TAASREV


The  Scan Source  2  command  is the  inverse  of the  SCNSRC  command.
SCNSRC2 scans  for an argument  and lists the  name of the  member in a
spooled  file if  the argument  does not exist.   One,  generic, or all
members in a source file may be scanned.  An outfile is optional.

If the outfile is  requested, the SCNSRC2P file  is output.  The  model
file used for the outfile is TAASREVP with a format name of SCSRCR.

The value to be scanned for cannot span a source record.

A typical command would be:

         SCNSRC2   FILE(*RPG) ARGUMENT(ABC)

All members of  the QRPGSRC file would be scanned.   A listing would be
output of any member that did not contain the string ABC.

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

   FILE          The  qualified name of the source  file to be scanned.
                 To simplify  the entering  of system  supplied  source
                 file  names, you  may use  the standard  abbreviations
                 like *RPG, *RPGLE, *CLP etc.

                 The  library defaults  to *LIBL.   A  specific library
                 name or the special value *LIBL may be used.

   ARGUMENT      The argument to  be scanned for.   Because the  system
                 command function  folds the value  to upper  case, you
                 may need  to surround the  value in quotes.   Trailing
                 blanks will be trimmed off.

   MBR           The  member  name.    The  default  is  *ALL  for  all
                 members in  a  file.   A specific  name  or a  generic
                 member name may be entered.

   TRANSLATE     A *YES/*NO  option that defaults to *NO.   *YES causes
                 the  source statement to  be translated  to upper case
                 before scanning for the argument.

                 *NO does not cause translation.

   ADDBLANKS     The  number of  blanks  to  add  to  the  end  of  the
                 argument before scanning.

                 0 is  the default meaning the  length of the  data for
                 each argument determines what is scanned for.

                 A value in a range of 0 to 3 must be entered.

                 The  intent of  this parameter is  to provide  for the
                 situation such as when  you want to  scan for the  end
                 of a  name or  word ending  in 'red', but  you do  not
                 want  words  such  as  'redeem'.   Using  ADDBLANKS(1)
                 finds  any words such as  'altered' which are followed
                 by a blank.

   SELCOL6       Whether to  select only certain  source records  based
                 on the  value of column  6 of the source  data portion
                 of  the  record.   The  default is  *ANY  meaning that
                 column  6  is  not  considered  and  the  entire  data
                 portion of the record is scanned.

                 This  option  is  designed   for  RPG/RPGLE  to  allow
                 selection of  the type of specification  such as I, D,
                 C,  etc.    For  example,   if  C  is  entered,   only
                 statements with  a C in  column 6  of the source  data
                 will  be scanned.   Note  that  this may  include some
                 array and table data.

                 A  value should only be  entered when you are limiting
                 the scan to  RPG/RPGLE source types.   The scan  which
                 occurs is  not sensitive to the source  type and would
                 probably  provide misleading information  if a non-RPG
                 type of source was scanned.

   NOTFOUND      A *YES/*NO  option  that  determines  if  the  TAA9897
                 escape message  will be  sent if  one or more  members
                 are found without the argument.

                 *NO is  the default meaning only  a completion message
                 is sent.

                 *YES  means  that  if  one  or  more  members  do  not
                 contain the  argument, the  TAA9897 escape message  is
                 sent.

   OUTLIB        The  library  in  which  the  file  SCNSRC2P  will  be
                 placed.   The  file will  contain one  record for each
                 member  that does  not  contain  the  argument.    The
                 model  file used for  the outfile  is TAASREVP  with a
                 format name of SCSRCR.

                 The  default is *NONE  meaning no  outfile is created.
                 *LIBL may be entered if  the SCNSRC2P exists.  If  the
                 SCNSRC2P  file  does  not  exist, a  library  must  be
                 specified.

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

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

                 *YES is the default to clear the member first.

                 *NO  may be specified  to add  records to  an existing
                 member.

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

The value to be scanned for cannot span a source record.

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

The following TAA Tools must be on your system:

      DUPTAADBF    Duplicate TAA data base file
      EDTVAR       Edit variable
      HLRMVMSG     HLL Remove message
      RTVDBFA      Retrieve data base file attributes
      RTVMBRLST    Retrieve member list
      RTVSYSVAL3   Retrieve system value 3
      SNDCOMPMSG   Send completion message
      SNDESCINF    Send escape information
      SNDESCMSG    Send escape message
      SNDSTSCNT    Send status count

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

None, the tool is ready to use.

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

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

   SCNSRC2       *CMD                      TAASREV        QATTCMD
   TAASREVC      *PGM          CLP         TAASREVC       QATTCL

   TAASREVR      *PGM          RPG         TAASREVR       QATTRPG
   TAASRCFP      *FILE         PF          TAASREVP       QATTDDS

Added to TAA Productivity tools June 1, 2005

Home Page

Up to Top