[Download-List] ****In /datatel/release/RELEASE.CUSTOM/CUSTOM.SOURCE/DOWNLOAD711/_DOWNLOAD.LOAD

[David L. Rotman]

As far as I can tell, BUF_TYPE is a message generated by
Unidata when the string environment is totally overrun.
I have not been able to find a reference to how to adjust
the size of any related configuration parameters.

In this particular case, I would strongly recommend creating
a virtual field.  (I would also base the virtual field on a
subroutine so that the complicated logic would be more
readable...but that's a personal preference.)  Unidata
does not provide any system way to invoke EVAL, so
DOWNLOAD is actually issuing a select for each record
in your active list.   The complicated EVAL expression
is getting "compiled" many, many times.  At a minimum,
performance will be poor.

The virtual field would be fairly straightforward:
001: I
002: SUBR('I15.SUBR',
   XM.APPL.HI.ACT.COMP.REC,
   XM.APPL.HI.ACT.MATH.REC,
   XH.APPL.RES.STATE, 
   XD.APPL.HS.GPA)




Dave Rotman
Director of Computer Services
Cedarville University
251 N. Main Street
Cedarville, OH 45314
rotmand at cedarville.edu
voice 937-766-7905
fax 937-766-8819

>>> Richard.Brich at sdsmt.edu 2/6/2006 5:43:04 pm >>>
Good Afternoon Download Gurus

keep getting ****In
/datatel/release/RELEASE.CUSTOM/CUSTOM.SOURCE/DOWNLOAD711/_DOWNLOAD.LOAD

at line 127 out of BUF_TYPE space. 
then aborts out of Colleague

Maybe a character limit in Download EVAL ?

Thanks
Dick Brich

offending code segment:
Download Applications \
...

011: EVAL "IF XM.APPL.HI.ACT.COMP.REC[12,2] GE 25 AND
XM.APPL.HI.MATH.REC[12,2] 
GE 25 AND XH.APPL.RES.STATE = 'SD' THEN 'AUTOACT-SD'  \

012: ELSE IF XM.APPL.HI.ACT.COMP.REC[12,2] GE 25 AND
XM.APPL.HI.MATH.REC[12,2] G
E 25 AND XH.APPL.RES.STATE NE 'SD' THEN 'AUTOACT-FA' \

013: ELSE IF XM.APPL.HI.SAT.COMP.REC[12,4] GE 1130 AND
XM.APPL.HI.SAT.MATH.REC[1
2,4] GE 570 AND XH.APPL.RES.STATE = 'SD' THEN 'AUTOACT-SD' \

014: ELSE IF XM.APPL.HI.SAT.COMP.REC[12,4] GE 1130 AND
XM.APPL.HI.SAT.MATH.REC[1
2,4] GE 570 AND XH.APPL.RES.STATE NE 'SD' THEN 'AUTOACT-FA' \

015: ELSE IF XD.APPL.HS.GPA GE 3500 AND XH.APPL.RES.STATE = 'SD' THEN
'RevMath-S
D' \

016: ELSE IF XD.APPL.HS.GPA GE 3500 AND XH.APPL.RES.STATE NE 'SD' THEN
'RevMath-F
A' \

017: ELSE IF XD.APPL.HS.GPA GE 2750 OR XM.APPL.HI.ACT.COMP.REC[12,2]
GE
21 OR XM
.APPL.HI.ACT.MATH.REC[12,2] GE 21 THEN 'Rev21-2.75' \

018: ELSE 'REVIEW'"