>>function GetTableName(wa) >> wa = evl( m.wa, select(0) ) >> >> do case >> case !used(m.wa) >> return '???' >> >> case !empty(cursorgetprop('DataBase', m.wa)) >> return proper(cursorgetprop('SourceName', m.wa)) >> >> otherwise >> return Proper(juststem(dbf(m.wa))) >> >> endcase >>endfunc >>>