Procedure SQLSeek *--------- ------- LParameters pHandle , pTable, pWhereCondition Local cOldAlias, bFound, cSelectStr cOldAlias = Select () cSelectStr = "Select Count (*) as SeekCount From " + pTableName + IIf (! Empty (pWhereCondition), " Where " + pWhereCondition, "") SqlExec (pHandle, cSelectStr, "CurSQLSeek") Select CurSQLSeek bFound = SeekCount > 0 Use In CurSQLSeek Select (cOldAlias) Return bFound EndProc && of SQLSeekThanks!