Hey, nice enhancement!

On Wed, Jul 30, 2008 at 8:55 AM, Brutzman, Bill <[EMAIL PROTECTED]>wrote:

> 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/
>



-- 
-Kevin
http://www.PrecisOnline.com
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to