lRet = seek(cSeek, 'MyTable', 'MyTag') If !IsNull(IRet) and type('lRet') = 'L' and lRet End Transaction else Rollback endif