Confusing code

Author: MB Software Solutions General Account

Posted: 2009-10-14 at 16:08:40

Here's the code:

USE (THIS.cPath+"QuitApp.dbf") IN (SELECT("QuitApp")) SHARED

SELECT (SELECT("QuitApp"))

Is this basically saying "use the table if it's not already being used;

otherwise, use it in a new area....and then select the area where it is.

Seems to me like it could have been written easier with a simple

IF NOT USED("QuitApp") THEN

USE this.cPath + "QuitApp" in 0

ENDIF

SELECT QuitApp

???

tia!

--Mike

©2009 MB Software Solutions General Account