>set exclusive off && this is required for shared access in a network >set deleted on && nothing to do with network, > && but usually you would want to include this >* Open tables >use Table1 in 0 order Field1 >... >* Buffering: >CursorSetProp("Buffering", 5, "Table1") >... >>
>* Form.OnCancel() && method added by programmer >TableRevert() >>
>* Form.OnSave() && method added by programmer >select Table1 >if not TableUpdate() && if TableUpdate() failed > local laError(1) > aerror(laError) > MessageBox("Can't save the record, message #" trans(laError(1); > + " Message: " + laError(2)) >endif >>