Posted: Thu May 07, 2009 6:31 pm Post subject: Conditionally hanging the length of variable length records.
I have a VB input file where all of the records start with a fixed identifier in RDW + 0 (the first data portion of the record - the "record type").
I am happily modifying the input data records based on the "record type", except for one particular record type - the "3B900".
For this type, I happen to know that it's a 20 byte record (including the RDW). My problem is that I need to add a 7 byte field containing character zeroes to the end of the record, and increase its size to 27 bytes.
The following sort of explains what I'm trying to do, but doesn't work!
The "IFOUTLEN" clause gets errored in the above example, but I've tried a few similar combinations, all to no avail. It looks like IFOUTLEN works on ALL records.
Has anyone got any ideas on how to just change the record length for specific records only, without affecting the length of the other records in the file? _________________ The only stupid question is the one you DON'T ask!
Have you tried just removing the IFOUTLEN statement? If you are still not getting the desired results after making this change, please identify which SORT utility and the release you are running. _________________ Alissa Margulies
SyncSort Mainframe Product Services
Last edited by Alissa Margulies on Thu May 07, 2009 8:51 pm; edited 1 time in total
Thanks for your efforts, but the problem was a lot simpler than I thought it was.
The real problem is that I'm an idiot!
The clue is in the parameter
which should have read
With that correction made, several of my aborted attempts started working!
Another of the "I'll just re-use this code" perils!
Nonetheless, thanks to all you guys out there who took the issue seriously, and offered assistance. _________________ The only stupid question is the one you DON'T ask!
Joined: 18 Feb 2006 Posts: 812 Location: San Jose, CA
Posted: Fri May 08, 2009 8:09 pm Post subject:
Oh, I thought you wanted to compare against '04 ' with two trailing blanks which is what your original statement would have done. _________________ Frank Yaeger - DFSORT Development Team (IBM) - email@example.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum