Easytrieve Plus Report Generator, release 6.4
Here are some coding suggestions:
1. output-file:RECORD-LENGTH = input-file:RECORD-LENGTH
2. OUTFILE:RECORD-LENGTH = ###
then your assignment statement on line 28
3. PUT output-file FROM input-file
4. Try adding WORKAREA to your file statements, this will force use into
move mode instead of locate.
[WORKAREA literal-14]
The WORKAREA option establishes the number of bytes to be allocated as a
work area for the file. WORKAREA cannot be coded if CARD, DLI, or IDMS
parameters are specified. Literal-14 specifies the number of bytes to be
allocated and must be large enough to contain the longest record processed.
This forces "move mode" instead of the default "locate mode."