local lcSQL, laResults(1) private pcCharValue, pdDateValue, pnNumberValue, pnPKValue pcCharValue = ALLTRIM(THISFORM.txtSomeTextbox.Value) pdDateValue = THISFORM.txtSomeDateTextBox.Value pnNumberValue = THISFORM.spnSomeSpinner.Value pnPKValue = crsMyCursorOfTable1Data.PKField TEXT TO lcSQL TEXTMERGE NOSHOW PRETEXT 15 UPDATE Table1 SET cVarCharField = ?pcCharValue, cDateField = ?pdDateValue, nNumberField = ?pnNumberValue WHERE PKField = ?pnPKValue ENDTEXT SLQEXEC(lnHandle, lcSQL, '', laResults) *!* the contents of the laResults array will *!* provide the number of records updated