Try this
ON index('AB2',Ans,1) GOSUB Check.A, Check.B, Check.B
Manu
----- Original Message -----
From: "Brutzman, Bill" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, July 25, 2007 5:48 PM
Subject: [U2] [u2] : Cleaner Case Statement
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
The following is more difficult to read.
begin case
case Ans = 'A' ; gosub Check.A
case Ans = 'B' or Ans = '2' ; gosub Check.B
end case
I would like something like...
begin case
case Ans = 'A' ; gosub Check.A
case Ans = 'B'
case Ans = '2' ; gosub Check.B
end case
so that the "gosub Check.B" command is not repeated. I have tried a few
alternatives without a victory.
Suggestions would be appreciated.
--Bill
-------
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/
