Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to delete a free table record?
Message
From
17/05/2002 04:06:50
Henry Ravichander
RC Management Systems Inc.
Saskatchewan, Canada
 
 
To
17/05/2002 03:59:33
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00658004
Message ID:
00658034
Views:
18
>>
>>I am still having trouble. Its doing the same thing again i.e., shows records that I deleted.
>>Here is what I have in the Init()Form1
>>
>>
select 50
>>use patient order tag last_name of patient.cdx
>>set safety off
>>set deleted on
>>set multilock on
>>CURSORSETPROP("Buffering", 5, "patient")
>>
>>GotFocus() has - thisform.refresh()Form1
>>
>>Destroy() has:
>>
select 50
>>use
>>close tables
>>
>>Delete click Event:Form2
>>
delete
>>tableupdate()
>>skip
>>if eof()
>>	go bottom
>>endif
>>thisform.release()
>>
>>Exit button has:Form1
>>
set safety on
>>thisform.release()
>>
>>The Buffer Mode in the properties window of the form is set to 2-Optimistic. This is a form that I have inherited.
>>
>>Do you find anything odd here that may be causing the problem? TIA.
>
>I can't keep track on how many forms are these and if there is a grid in question. If there is a grid then try :
>
>select patient
>if !eof()
> go recno()
>endif
>
>This is a kind of refresh for grid.
>Cetin

Cetin:

There is no grid on the form. All of this is in one form except the code for delete is on another form which asks for confirmation if the user wants to delete. Should I issue a pack command by using the tables exclusively in the Exit click event? Will it impact network users?

Thanks.
- Ravi

True greatness consists in being great in little things.
- Charles Simmons
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform