Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem updating a view
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Problem updating a view
Divers
Thread ID:
00171363
Message ID:
00171363
Vues:
62
I have a form with a page frame with 6 pages. On the last page I have a grid based on a parameterized updatable view. This implements an order entry system. The grid contians the detail lines of the order.

After an order is entered the user can click a button to produce a confirmation report of the order the client has placed. When this button is clicked, or when the form is closed, my ThisForm.SaveAll() method is executed.

The problem occurs when the user returns to the form after running the confirmation report and realizes that the detail lines of the order need to be changed.

The grid allows the user to make the appropriate change, but when the user either re-runs the confirmation report or closes the form, executing the SaveAll() method, the master table behind the view is not updated with the changes... even tho the TableUpdate does not return a problem.

I've tried several things, but....

The current implementation looks like this...
Master Table 1: OrderItems.dbf - Not buffered, Not in Data Environment
Master Table 2: Supplier.dbf - Not buffered, Not in Data Environment
View: vpOrderItemsSupplier - Buffered (5-Optimistic Table), In Data Environment

cmdConfirmReport.Click()
LOCAL cOrder_ID
cOrder_ID = ThisForm.cOrder_ID
IF ThisForm.SaveAll()
etc...

ThisForm.SaveAll()
...numerous lines of associated set up...
SELECT vpOrderItemsSupplier
n=0
BEGIN TRANSACTION
SCAN
	n=n+1
	IF NOT TableUpdate(0,.T., "vpOrderItemsSupplier")
		MESSAGEBOX( "The Order Items table was not updated for" +CHR(13)+ ;
			"record "+str(n) +CHR(13)+ ;
			"Report_Nam "+vpOrderItemsSupplier.Report_Nam +CHR(13)+ ;
			"Report_Num "+vpOrderItemsSupplier.Report_Num, ;
			MB_ICONEXCLAMATION+MB_OK, ;
			"Omnia Background Search - Saving Order Information")
		lSuccess = .F.
		lRetVal  = .F.
	ENDIF
ENDSCAN
END TRANSACTION
At this point an inspection of the OrderItems.dbf shows that the records are unchanged... I'm at a loss and need help!

TIA,
Rick
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform