At 22:28 +0900 on 06/07/2015, Minoru Massaki wrote about DFSORT - How
to select last 8 bytes in variable length reco:
Hello
There is a input file of variable length records.
I want to insert the last 8 bytes of a record to front of the record as
following sample.
Input file:
RECORD01X11AAAAAAAA
RECORD02Y2BBBBBBBB
RECORD03ZCCCCCCC
RECORD044A4444444DDDDDDDD
RECORD0555B55555555EEEEEEEE
Output File I want to have:
AAAAAAAA RECORD01X11AAAAAAAA
BBBBBBBB RECORD02Y2BBBBBBBB
ZCCCCCCC RECORD03ZCCCCCCC
DDDDDDDD RECORD044A4444444DDDDDDDD
EEEEEEEE RECORD0555B55555555EEEEEEEE
Record data before the last 8 bytes may contain x'00' thru x'FF',
there is no specific delimiter character for parsing the last 8 bytes.
The last 8 bytes is also binary.
I'd like to hear any ideas how this to be done by DFSORT WITHOUT using
E15/E35.
Your help would be highly appreciated.
Minoru Massaki - M*M
--
ëSêÊ é¿ - Minoru Massaki (M*M)
E-mail: [email protected]
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
Why are they bothering with trying to convince DFSORT to do the copy?
A simple Quick and Dirty Assembler program can be written in under a
hour to copy the file and output the modified/extended records.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
