TAA Tools
CPYTOFLAT       COPY TO FLAT FILE                      TAADBNK

The Copy to  Flat File command  copies an externally described  file to
a  flat file  (a single  field file).   Decimal  and binary  fields are
converted  to character  and an  extra position  is added for  the sign
value for all  decimal fields.   The flat  file must  not exist and  is
created by  the command with  a length large  enough to hold  the data.
CPYTOFLAT can make a human readable data base file.

A typical command would be:

             CPYTOFLAT  FROMFILE(ABC) TOFILE(XXX/DEF)

All  records in file  ABC would  be copied to  the DEF  file in library
XXX.   Any packed  or binary  fields would  be  converted to  character
values.  All decimal  fields would have an extra  position for the sign
(minus or blank) at the end of the data.  By default:

  **   A  blank would be used  as a field separator  between all fields
       and after the last field.

  **   Decimal fields  would  be edited  as  if  by an  'L'  edit  code
       causing   the   insertion  of   a   decimal   point   character,
       suppression of  leading zeros, and  an output of 0  for for zero
       amount fields.

If the file is keyed, it is copied in key order.

Considerations
--------------

  **   The record length of the From file cannot exceed 9999 bytes.

  **   Only  character  (including  variable  length),  packed, signed,
       zoned, date, time, and  timezone field types are supported.   If
       other  field types  exist, they  may be  omitted by  use  of the
       OMITFLD parameter.

  **   A character field cannot exceed 500 bytes in length.

  **   The file to be created cannot exceed 9999 bytes.

CPYTOFLAT escape messages you can monitor for
---------------------------------------------

      TAA9891    The From member has no records
      TAA9892    The To file already exists

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

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

   FROMFILE      The  qualified name  of  the From  file to  be copied.
                 It must be an externally described file.

                 The library  qualifier defaults  to *LIBL  A  specific
                 library or *CURLIB may also be entered.

                 If a  source file is  copied, the sequence  number and
                 date are also copied.

   TOFILE        The  qualified name of the  To file to  be created and
                 copied to.   The  file  must not  exist.   The  record
                 length of  the file will  be determined by  the length
                 of the record size to be written.

                 The  library qualifier  must  be a  valid  library (it
                 cannot be blank).

   FROMMBR       The  member of the From file  to be copied.  *FIRST is
                 the default.    A  specific  member or  *LAST  may  be
                 entered.

   OMITFLD       A list  of up to 100  fields that may  be omitted from
                 the  file that will be created.   The default is *NONE
                 meaning all  field values  will exist  in the  created
                 file.

   EDITDEC       A *YES/*NO  parameter for  whether to add  the decimal
                 notation   character   specified  for   the   job  and
                 suppress leading zeros for decimal fields.

                 *YES is the  default meaning any  decimal fields  will
                 be edited  following the  rules of  the 'L' edit  code
                 (see  DSPEDTCDE).   A  field  defined  as  7/2 with  a
                 value  of 100 would  appear as '1.00  ' with the extra
                 position used for the sign (blank or minus).

   SEPCHAR       The separator  character that will  appear at the  end
                 of  each field.   The  default is  *BLANK (X'40').   A
                 specific  single   byte  character  or  *NONE  may  be
                 specified.  The  separator character  will also  exist
                 after the last field.

                 A separator  character of  X'00' may  be used to  help
                 separate   the   field  values   when   the   data  is
                 displayed.  However, X'00'  is also a valid  character
                 within character  fields and may  cause confusion.   A
                 X'00'  does  not  print nor  insert  a  space on  some
                 printers.


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

  **   The To file must not exist and will be created.

  **   The record length of the From file cannot exceed 9999 bytes.

  **   Only  character  (including  variable  length),  packed, signed,
       zoned, date, time, and  timezone field types are supported.   If
       other  field types  exist, they  may be  omitted by  use  of the
       OMITFLD parameter.

  **   A  non-omitted  character  field  cannot  exceed  500  bytes  in
       length.

  **   The file to be created cannot exceed 9999 bytes.

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

The following TAA Tools must be on your system:

     CHKDBFMBR       Check data base file member
     CHKOBJ2         Check object 2
     EDTVAR          Edit variable
     EXTLST          Extract list
     EXTLST2         Extract list 2
     HLRMVMSG        HLL Remove message
     RSNLSTMSG       Resend last message
     RTVDBFA         Retrieve data base file attributes
     RTVFLDA         Retrieve field attributes
     RTVFLDARR       Retrieve field array
     SNDCOMPMSG      Send completion message
     SNDESCINF       Send escape information
     SNDESCMSG       Send escape message
     SNDSTSMSG       Send status message

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

None, the tool is ready to use.

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

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

   CPYTOFLAT     *CMD                   TAADBNK       QATTCMD
   TAADBNKC      *PGM       CLP         TAADBNKC      QATTCL
   TAADBNKR      *PGM       RPG         TAADBNKR      QATTRPG
					

Added to TAA Productivity tools April 15, 2012


Home Page Up to Top