Hello MM, without thinking about this much, using DF/SORT, you could
convert all the VB records to FB, pick a fill character that doesn't now
exist in the input file, then PARSE to search across the record, looking
for the fill character and obtain the trailing 8 bytes.
I'm guessing Kolusu will have a more elegant solution Monday morning.
On 6/7/2015 12:23 PM, Minoru Massaki wrote:
Hello Tony-san,
I already have read many DFSORT related posts in many Wed sites but could
not find the answer.
I know that the first 2 bytes of the variable record (RDW) contains the
length of the record. But based on my knowledge of DFSORT, that value of
the field could not use as the pointer in DFSORT control statement
parameter to select the last 8 bytes.
So I'm asking the way to do it by DFSORT.
Thank you.
Minoru Massaki - (M*M)
2015-06-08 1:59 GMT+09:00 Tony's Outlook via Mozilla <tbabo...@outlook.com>:
There was a DF/SORT related post sometime in the not so distant past that
gave an example of how to read a VB file and determine all the differing
record lengths. Without thinking about it much reading all the RDW fields
should not be that difficult.
On 6/7/2015 11:21 AM, Lizette Koehler wrote:
I am sure the DFSORT team will respond on Monday in the USA.
Or you could send your query to them, there might be someone watching
their helpline
dfs...@us.ibm.com
Those folks are very helpful.
Also, the DFSORT Website on
http://www-01.ibm.com/support/docview.wss?uid=isg3T7000079
Also, you could probably do this in REXX. There are many ways to do this
function.
Lizette
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
On Behalf Of Minoru Massaki
Sent: Sunday, June 07, 2015 8:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSORT - How to select last 8 bytes in variable length
records
Hello Gilmartin-san,
Thank you for your idea.
At this point, they (the customer) want to use only DFSORT without
E15/E35.
I'll tell them your ideas.
Minoru Massaki - (M*M)
2015-06-07 23:46 GMT+09:00 Paul Gilmartin <
0000000433f07816-dmarc-requ...@listserv.ua.edu>:
On Sun, 7 Jun 2015 22:28:01 +0900, Minoru Massaki wrote:
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. ...
Must it be DFSORT? For example:
508 $ cat last8; sh last8
#! /bin/sh -x
echo "\
RECORD01X11AAAAAAAA
RECORD02Y2BBBBBBBB
RECORD03ZCCCCCCC
RECORD044A4444444DDDDDDDD
RECORD0555B55555555EEEEEEEE" |
sed 's/\(.*\)\(........\)/\2 \1/'
AAAAAAAA RECORD01X11
BBBBBBBB RECORD02Y2
ZCCCCCCC RECORD03
DDDDDDDD RECORD044A4444444
EEEEEEEE RECORD0555B55555555
509 $
Is it then possible to pipe the output of "sed" into SORTIN?
-- gil\
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
