Eric Bielefeld wrote:
I'm trying to fix some SMF records from our TEST Lpars that have the wrong
SMFID in them. I'm pretty sure I can fix them with Syncsort using the OUTREC
Change command, but I'm not sure how to do that. I haven't worked with
Syncsort that much, and I've spent the last hour or so trying to figure out
what I need. I figure there's someone out there that can do this off the top
of their head quickly.
This is what I have so far:
OUTREC FIELDS=(15,4,
CHANGE=(4,C'CSYS',C'ESYS',
C'DSYS',C'FSYS',
C'FSYS',C'FSYS'))
SORT FIELDS=COPY
I'm sure there is a few things missing. I get a message:
WER108I SORTIN : RECFM=VBS ; LRECL= 32756; BLKSIZE= 27990
WER235A OUTREC RDW NOT INCLUDED
I'd appreciate any help. Thanks.
Eric
--
Eric Bielefeld
Systems Programmer
Washington University
St Louis, Missouri
314-935-3418
Eric,
I've been spending a lot of time developing a DFSORT/ICETOOL
class, which I hope to announce next week.
Although DFSORT is not SyncSort, I imagine they are the same for this case.
OUTREC FIELDS=(15,4,
CHANGE=(4,C'CSYS',C'ESYS',
C'DSYS',C'FSYS',
C'FSYS',C'FSYS'))
SORT FIELDS=COPY
This will copy from your SORTIN data set; the output
data set will just be the four bytes ESYS, or FSYS.
You want to OVERLAY the field; since the input records
are variable, you must also allow for a 4 byte RDW in
your positioning.
Try this:
SORT FIELDS=COPY
OUTREC OVERLAY=(19,4,
CHANGE=(4,C'CSYS',C'ESYS',
C'DSYS',C'FSYS',
C'FSYS',C'FSYS'))
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
303-393-8716
http://www.trainersfriend.com
z/OS Application development made easier
* Our classes include
+ How things work
+ Programming examples with realistic applications
+ Starter / skeleton code
+ Complete working programs
+ Useful utilities and subroutines
+ Tips and techniques
==> Check out the Trainer's Friend Store to purchase z/OS <==
==> application developer toolkits. Sample code in four <==
==> programming languages, JCL to Assemble or compile, <==
==> bind and test. <==
==> http://www.trainersfriend.com/TTFStore/index.html <==
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
