Conditional statements 1

[mmerlinn]

[ ]
I have the following bit of cut & pasted code I am using. It works well. However to my way of thinking it is convoluted. Is there a better way of doing this?

[blue]
IF ALLTRIM(m.tablename) $ z
ELSE
DELETE TAG ALL
z = z + ALLTRIM(m.tablename) + ','
ENDIF
[/blue]

I know that I could do this, but to me it is no improvement:

[blue]
DO CASE
CASE ALLTRIM(m.tablename) $ z
OTHERWISE
DELETE TAG ALL
z = z + ALLTRIM(m.tablename) + ','
ENDCASE
[/blue]


mmerlinn

http://mmerlinn.com

"We've found by experience that people who are careless and sloppy writers are usually also careless and sloppy at thinking and coding. Answering questions for careless and sloppy thinkers is not rewarding." - Eric Steven Raymond

 

[DSummZZZ]

Not too much different, but:

IF !(ALLTRIM(m.tablename) $ z)
   DELETE TAG ALL
   z = z + ALLTRIM(m.tablename) + ','
ENDIF

-Dave Summers-

Even more Fox stuff at:

http://www.davesummers.net/foxprolinks.htm

 

[Olaf Doschke]

Mmerlin,

are you saying in foxpro 2.6 there doesn't exist the NOT operator or the !-Operator?

Bye,Olaf.

 

[stesvet1]

Maybe for you it is convoluted, but for computer any problem!!! It is important that it works well.