Kevin:
Thanks for writing. I was unClear on the syntax for the mask and I was
hoping that someone would look at the code and flag the fluff.
--B
begin case
case Width > 20 ; Width = 6
case Width < 1 ; Width = 1
case not(num(Width)) ; Width = 6
end case
Mask = 'L#' : Width
print R.File<This.Field, This.Count> Mask : Red : '_' : Grn :
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Kevin King
Sent: Tuesday, July 29, 2008 8:41 PM
To: [email protected]
Subject: Re: [U2] Data Displayer
No offense, but do you realize that big CASE statement could be reduced to
three lines?
If (Width LT 1 or Width GT 20) Then Width = 6
Mask = "L#" : Width
print R.File<This.Field, This.Count> Mask : Red : '_' : Grn :
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
