×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Well, you certainly don't need X's (you could use blanks) but it is a fun idea.
Don't think I'd ever use it as %size(x)-2 is much more clear in my mind.
-Bob Cozzi
www.i5PodCast.com
Ask your manager to watch i5 TV
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [
mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Jon Paris
Sent: Friday, May 11, 2007 11:05 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Max length of a VARYING field
Given that IBM will be changing the maximum size of a varying length field
and there is currently no %MaxLen BIF - wouldn't this solution be
safer/better? It could be placed in the INZSR for each of the variables in
question. If there is concern over the Xs being left laying about, then the
*INZSR could simply add an varyField = ''; to reset it.
You could always
d varyField s 1234a Varying Inz(*ALL'X')
d maxLen s 10i 0 Inz
/Free
maxLen = %Len(varyField);
dsply ('Max length of varyField is ' + %char(maxLen));
*InLR = *On;
/End-free
Jon Paris
Partner400
www.Partner400.com
midrange.com
