Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Sendupdate not working for my view
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Sendupdate not working for my view
Miscellaneous
Thread ID:
00205299
Message ID:
00205299
Views:
42
I have a bound control textbox to a view, Whenever I change a value and do sendupdate, the value doesn't seem to be changing in the table.
This is holding true when I want to delete through a view also. I am throwing the main switch for update after user specifiy yes or no. lv_div is my view for o_div table. The fields are selected in view for updates, however sendupdate is set to .f. until user answsers yes. Here is the code that I have for editing and deletion:

*****************************************
EDIT
nDialogType = 4 + 32 + 256
nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)
do case
case nAnswer = 6
cursorsetprop('sendupdates', .t.,'lv_div')
.list1.requery()
.list1.refresh()
.refresh()
.cmdreturn.setfocus()

case nAnswer = 7
requery('lv_div')
locate for lv_div.uniqueid = int(hldcurrid1)
.list1.requery()
.list1.refresh()
.refresh()
********************************************

***********************************************
DELETE
do case
case nAnswer = 6
d = lv_div.uniqueid
delete from lv_div where lv_div.uniqueid = d
cursorsetprop('sendupdates', .t., 'lv_div')
requery('lv_div')
.list1.requery()
.list1.refresh()
.refresh()

case nAnswer = 7
requery('lv_div')
.refresh()
endcase

helps much appreciate

NIck
Next
Reply
Map
View

Click here to load this message in the networking platform