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

Powered by AS/400Powered by AS/400 Last modified on January 12, 2010 © 1995, 2010 - Jim Sloan, Inc.