The Truncate Spooled File  command is intended for the  situation where
you:

  **   Already have spooled printed output and

  **   Need  to print on  a printer  that is  not wide enough  to print
       the data (typical of PC printers) and

  **   Don't want folded lines on the hard copy output.

When  the printer is not  wide enough to print  the spooled print line,
the system  will fold the  print line  so that you  get multiple  lines
printed for each  original print line.  The  FOLD(*NO) parameter exists
on OVRPRTF, but cannot be changed once the file has been spooled.

TCTSPLF  lets  you re-print  the spooled  file  and truncate  the print
line at a specific point.

A typical command would be:

           TCTSPLF    SPLF(xxx)

This would  re-print  the  spooled  file and  truncate  any  characters
after position 80.  The original spooled file would be deleted.

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

   SPLF          The spooled file name to be re-printed.

   JOB           The  qualified   job  name  where  the   spooled  file
                 exists.  * is the default meaning the current job.

   SPLNBR        The  number  of  the spooled  file.    The default  is
                 *ONLY.  *LAST may also be specified.

   NEWSPLF       The name  of the  new spooled  file.   The default  is
                 *SPLF  meaning it  will  have  the  same name  as  the
                 original spooled file.

   LASTPOS       The  last  position to  truncate  the  print line  at.
                 Any  characters  to the  right will  not appear.   The
                 default is 80.

   DLTSPLF       Whether to  delete  the original  spooled  file.   The
                 default  is *YES.    *NO causes  the original  spooled
                 file to be retained.

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

None.

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

The following TAA Tools must be on your system:

     ALCTMPMBR    Allocate temporary member
     EDTVAR       Edit variable
     HLRMVMSG     HLL Remove message
     RTVSPLFID    Retrieve spooled file ID
     SNDCOMPMSG   Send completion message
     SNDESCMSG    Send escape message

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

None, the tool is ready to use.

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

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

   TCTSPLF       *CMD                   TAASPLN       QATTCMD
   TAASPLNC      *PGM       CLP         TAASPLNC      QATTCL