Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Checking some field for uniqueness
Message
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00518556
Message ID:
00518586
Views:
11
Oops, seems like I sent this message without saying anything. Basically, I was going to say, that it's not enough, since SQL works with tables directly, so it doesn't check buffered changes.


>>>Hi everybody,
>>>
>>>I had discussion on the same topic long time ago, but I have this problem again and I'm not sure, how to handle it.
>>>I have a table called AllFunctions. This table has FunctionID field (Primary autogenerated), FunName field and couple of other fields. FunName is the function name, which is entered by the user. My question is: how can I ensure uniqueness of this field? I want to have message at the time FuncionName is entered into the table and another check should be performed at the time of saving record. We have a class wgUniqueText, but I've just realized, that the code in it is not sufficient.
>>>
>>>Do you have ideas to share?
>>>
>>>Thanks in advance.
>>>
>>>P.S. Table has a regular index on FunName with expression upper(FunName)
>>
>>
>>Hi Nadya,
>>If you didn't want to use a candidate index and trap the errors you could try adding the following:
>>
>>SELECT FunName ;
>>	FROM AllFunctions ;
>>	GROUP BY FunName ;
>>	HAVING COUNT(FunName)>1 ;
>>	ORDER BY FunName ;
>>	INTO CURSOR csrDups
>>	nDups = IIF(_Tally > 0, .T., .F.)
>>	USE IN csrDups
>>IF nDups = .T.
>>	=MESSAGEBOX("Cannot save, the Function Name is already used",0,"")
>>	nDups = .F.
>>	RETURN .F.
>>ENDIF
>>
>>
>We have a class, which uses this method, but it does not work for buffered tables, since SQL works with table directly.
>>
>>- Brian
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform