TAA Tools
DSPDBFDTA       DISPLAY DATA BASE FILE DATA            TAADBIB

The Display Data  Base File Data  command displays or prints  data from
a  single record in  a file  (using Relative  Record number) or  from a
passed  in image of  a record (such  as a journal  entry).  The command
will operate  on any  externally described  file.   The  output is  one
line per field whether a subfile or listing occurs.

If  a subfile is  used, a  detail display  option provides  more detail
information.

The  command prompt  appears as  if the user  will process  by relative
record  number.   F10  may  be  used  on  the  command  prompt  to  see
additional parameters that allow a record image to be displayed.

A typical command to display a record would be:

             DSPDBFDTA   FILE(xxx) RELRCD(nnn)

A subfile  would be displayed  of all the fields  in the file  with the
text description and value.

A typical command to pass a record image to be displayed would be:

            DSPDBFDTA   FILE(xxx) RCDIMAGE(yyyy)

The  CPP (TAADBIBC) could also  be called directly from  a HLL program.
For example, the RPG code would be:

     IRCDIMG      DS                       9999
     .
     C                     CALL 'TAADBIBC'
     C                     PARM           FULFIL  20
     C                     PARM           MBR     10
     C                     PARM           RELRCD  110
     C                     PARM           RCDIMG
     C                     PARM           FSTPOS   50
     C                     PARM           DSPTXT  70
     C                     PARM           SETLR    8
     C                     PARM           OUTPUT   6

Note that if a  record image is  passed, it must  adhere to the  format
specified in the file.

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

   FILE          The qualified  file  name of  the file.   The  library
                 value defaults  to *LIBL.   *CURLIB may also  be used.

                 It  must be  a data  base file  with a  single format.
                 Either a physical or logical file may be used.

   MBR           The member  to be  processed.  The  default is  *FIRST
                 for the first  member in the file.   This parameter is
                 ignored if a record image is passed in.

   RELRCD        The   relative  record  number  in   the  file  to  be
                 processed.  The default is  1 for the first record  in
                 the file.

                 If  a   relative  record  number   other  than   1  is
                 specified,  the  RCDIMAGE parameter  must  specify the
                 default value.

   OUTPUT        How to  output  the results.    * is  the  default  to
                 display the  results if used  interactively.   If used
                 in  batch or *PRINT  is specified, in  listing occurs.

   RCDIMAGE      The  record image to  be processed.   If a value other
                 than  the default  is  specified,  RELRCD(1)  must  be
                 used.

                 The  record image  must  adhere to  the definition  of
                 the specified file.

   FIRSTPOS      The  first   position  in  the  record  format  to  be
                 displayed.   The  default  is 1  meaning  the  display
                 begins with the first field in the file.

                 The intent of  specifying a value other than  1 is for
                 a  format such  as output  by  DSPJRN where  there are
                 standard fields  at the  beginning of  the record  and
                 then  a  single  large field  for  the  record  image.
                 When  there is  an externally  described file  for the
                 record  image,  the  standard fields  can  be bypassed
                 and the format  of the externally described  file used
                 for the single large field.

                 A value other  than 1 must be the start  of a field in
                 the format.

   TEXT          The  text for line 5  of the display.   The default is
                 *NONE in which case blanks will be displayed.

                 A value of up to 70  bytes may be entered and will  be
                 displayed on  line 5 beginning  at position 10  of the
                 display.

   SETLR         How  to  end the  RPG  program.   The  default  is *ON
                 which causes the  RPG program to  perform the  display
                 and then  end  normally with  LR set  on which  closes
                 all of the files.

                 *OFF  may be  specified to  cause  the RPG  program to
                 perform  the  display and  then  end with  LR  set off
                 which keeps the files open and the fields intact.

                 *ONIMMED  may  be  specified  which  causes   the  RPG
                 program  to   end  immediately  with   LR  on  without
                 performing  the display.   The  intent of  *ONIMMED is
                 that if  *OFF  is  used previously,  *ONIMMED  may  be
                 used to close the program when required.

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

A physical or single format logical file must be used.

The number of fields in the file must be less than 200.

The maximum length of displayable data for a field is 300.

The maximum record length which can be displayed is 9999.

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

The following TAA Tools must be on your system:

     EDTVAR          Edit variable
     EDTVAR2         Edit variable 2
     FILEFDBCK       File feedback
     HLRMVMSG        HLL Remove message
     RTVFLDARR       Retrieve field array
     RTVSYSVAL3      Retrieve system value 3
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   DSPDBFDTA     *CMD                   TAADBIB       QATTCMD
   TAADBIBC      *PGM       CLP         TAADBIBC      QATTCL
   TAADBIBR      *PGM       RPG         TAADBIBR      QATTRPG
   TAADBIBD      *FILE      DSPF        TAADBIBD      QATTDDS
					

Added to TAA Productivity tools February 1, 1997


Home Page Up to Top