cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
Thanks for the links.
The problem I'm having is I've got two ICETOOL steps within about 3000 lines of REXX code and the program is working correctly, until I hit the INCLUDE limitation. The INCLUDEs look like this except there are about 800 of them.
Code: |
SORT FIELDS=COPY
INCLUDE COND=((54,8,CH,EQ,C'DEFAULT1'),OR,
(54,8,CH,EQ,C'AD1234 ',AND,63,1,SS,EQ,C'R,U,C,A'),OR,
(54,8,CH,EQ,C'AD1235 ',AND,63,1,SS,EQ,C'R,U,C,A'),OR,
(54,8,CH,EQ,C'AD1236 ',AND,63,1,SS,EQ,C'R,U,C,A'),OR,
(54,8,CH,EQ,C'ABCD#123'))
OUTFIL FNAMES=ACCESS,OUTREC=(1:1,130,131:87C' ')
|
I could used IFTHEN/WHEN or SPLICE, but that would cause the program to take the 1.4 million record input file and duplicate (or write) it within the REXX as I'm trying to get my selected records.
After reading the provided links, I altered the control cards slightly and was able to get past the ICE151A error. Instead of "63,1,SS,EQ,C'R,U,C,A')", I changed it to "63,1,CH,NE,C'-')" to accomplish the same selection and keep it within the program limitation.
FILEAID has an option called MAXENT that allows a user increase the storage set aside for IF parameters. |
|