The Display File CCSIDs  command displays either a total  of the CCSIDs
that  exist  in a  data  base file  or  the CCSIDs  for  the individual
fields.   CCSIDs may be assigned to each  character field in a file and
normally all character  fields will use the  same CCSID.  If  different
CCSIDs  are   used  within  the  file,  different   processing  may  be
required.   DSPCCSID allows you to determine  if a file uses a standard
CCSID for all character fields and what the value is.

Decimal fields may not  be assigned a CCSID,  but the system assigns  a
value of 65535.

A typical command would be:

             DSPCCSID   FILE(xxx)

The default  is to  provide a  total of  the CCSIDs  that exist  in the
file.    If the  command  was entered  interactively,  a  display would
appear with the summary for the file.

Enter TYPE(*DETAIL) for a list of each field's CCSID.

DSPCCSID escape messages you can monitor for
--------------------------------------------

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

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

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

   TYPE          The type of display to output.

                 *TOTAL  is the  default to  display  a summary  of the
                 file's CCSIDs.

                 *DETAIL  may be specified  to list each  field and the
                 CCSID used.

   OUTPUT        How to output the results.

                 * is the  default to display  the spooled file if  the
                 command is  entered interactively.   The  spooled file
                 is deleted after it is displayed.

                 If  the  command  is entered  in  batch  or  *PRINT is
                 specified, the spooled  file is  output and  retained.

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

None.

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

The following TAA Tools must be on your system:

     RSNLSTMSG       Resend last message
     RTVDBFA         Retrieve data base file
     RTVSYSVAL3      Retrieve system value 3
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message

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

None, the tool is ready to use.

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

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

   DSPCCSID      *CMD                   TAADBLC       QATTCMD
   TAADBLCC      *PGM       CLP         TAADBLCC      QATTCL
   TAADBLCR      *PGM       RPG         TAADBLCR      QATTRPG