Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Frustration with private dataset not saving
Message
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Frustration with private dataset not saving
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows 7
Divers
Thread ID:
01486018
Message ID:
01486018
Vues:
206
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform