#DEFINE C_TASTRADEDIR_LOC "Samples\Tastrade\" && Location of Tastrade, off of HOME()
LOCAL llContinue
IF WEXIST("Project Manager")
*- assume that TasTrade isn't running, since it closes the Project Manager window
DO FORM (HOME() + C_TASTRADEDIR_LOC + "forms\gettitle") TO cTitle
ELSE
DO FORM forms\gettitle TO cTitle
ENDIf
IF EMPTY(cTitle)
RETURN .F.
ENDIF
IF UPPER(cTitle) = "ALL"
cTitle = ""
ENDIF
this.OpenTables()
llContinue = !(_tally = 0)
IF !llContinue
=MESSAGEBOX(NOTHINGTOPRINT_LOC, ;
MB_ICONEXCLAMATION, ;
TASTRADE_LOC)
this.CloseTables()
ENDIF
*=REQUERY()
RETURN llContinue