Thanks all for the comments and advice. My issue is resolved, but I don't yet
understand why.
A big thanks to Kolusu. I took him up on his offer and sent him the relevant
data offline. He produced a solution that looks as follows (apologies if the
formatting gets messed up):
My original control cards:
OPTION COPY,NOVLSHRT,
OUTFIL FNAMES=OUT,VTOF,OUTREC=(ASEGAR,
C'|',
...
<lots of additional fields and "|" separators>
...
C'|',
AFRE98)
Kolusu's solution:
OPTION COPY
INREC IFTHEN=(WHEN=INIT,
BUILD=(RDW,
ASEGAR,
C'|',
...
<lots of additional fields and "|" separators>
...
C'|',
AFRE98))
OUTFIL VTOF,BUILD=(5,5090)
This solved my problem and was a simple fix to implement in the REXX that
generates the control cards.
In addition he pointed out that my edit masks needed some work as I had a lot
of
EDIT=(IIIIIIIII.II)
types of masks that should have been
EDIT=(IIIIIIIIT.TT)
So while my issue is resolved, I do wonder what the magic here is. Reviewing
the manual on INREC IFTHEN(WHEN=INIT it suggests there's no actual
functionality to this for the sort statement I have. However, removing this and
just using INREC BUILD resulted in the same ICE085A problem.
So what's the logic here with regards to IFTHEN and memory usage?
Thanks,
Bart
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Sri h Kolusu
Sent: Tuesday, April 02, 2019 1:57 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSORT ICE085A - Options?
>>There are 473 input fields that are copied over, some of them converted,
with '|' inserted as separator.
Bart,
That is one too many edit fields. Looks like you have an input file and
want to convert it to pipe delimited file. If you can send me a sample
input file and the symbol mapping along with control cards, then I probably
might be able to come up with something ( No promises though)
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
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
