Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Frustration with private dataset not saving
Message
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Frustration with private dataset not saving
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows 7
Miscellaneous
Thread ID:
01486018
Message ID:
01486018
Views:
208
I have a form running a private datasession with optimistic buffering. I insert a blank record into table a, then update field x through an interactive change procedure.

Most times this works just fine. However, sometimes the changes are not accepted by the database. I am suspended on the procedure right now and the datasessionid=4, rlock on table a is .t. - even flock on table a is .t. right now. yet when the replace command is run, the database field remains blank.

The record pointer is on the last field of the table, which is consistent with an insert - sql command that setup the new record I should be updating.

here's the procedure:
PARAMETERS l_check

* l_check values
* 1 = yes
* 2 = no
SET STEP ON

thisform.pageframe1.page1.tol_no.Value = 0
thisform.pageframe1.page1.tol_yes.Value = 0


IF thisform.isloading AND thisform.isediting then
	l_check = VAL(jcpmt.tolerance)
ELSE
	replace jcpmt.tolerance WITH ALLTRIM(STR(l_check))
ENDIF
	
IF l_check = 1		&&yes
	thisform.pageframe1.page1.tol_yes.Value = 1
ELSE
	thisform.pageframe1.page1.tol_no.Value = 1
ENDIF

thisform.pageframe1.page1.tol_yes.Refresh
thisform.pageframe1.page1.tol_no.Refresh
the replace command sometimes just doesn't update the table....what am I missing here?

thanks in advance!
Steve Howie, owner
DaSH Technology
Denver, CO
Next
Reply
Map
View

Click here to load this message in the networking platform