Kevin,

What if the answer is Q?

I almost always put in a CASE 1 statement to catch anything that resulted from a later code revision by a colleague or someone who follows me in a job! (The 'almost' is to exclude one-shot programs that nobody should ever run again.)

Susan  Lynch
F.W. Davison & Company, Inc.


----- Original Message ----- From: "Kevin King" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, July 25, 2007 12:16 PM
Subject: Re: [U2] [u2] : Cleaner Case Statement


On 7/25/07, Brutzman, Bill <[EMAIL PROTECTED]> wrote:

How can this structure be cleaned-up?

  begin case
        case Ans = 'A'  ;  gosub Check.A
        case Ans = 'B'  ;  gosub Check.B
        case Ans = '2'  ;  gosub Check.B
  end   case


If this is all you need, why not:

IF (Ans = 'A') THEN
 GOSUB Check.A
END ELSE
 GOSUB Check.B
END

Or is your example a simplification?
-Kevin
http://www.PrecisOnline.com
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to