6.68.3 Psuedocode Example
Check if the record can be updated.
strList = "SURNAME, SALARY"
strName = "PSLMST"
strKey = "EMPNO"
IF NOT LceSetFieldValue(iSession, strKey , "12345")
/* return error */
ENDIF
IF NOT LceSetFieldValue(iSession, "SALARY", "25000")
/* return error */
ENDIF
IF NOT LceSetFieldValue(iSession, "SURNAME", "Buckley")
/* return error */
ENDIF
IF LceUpdate(iSession, strList, strName, strKey, TRUE)
/* update of the record can be performed */
ELSE
/* cannot update the record */
/* display error messages */
ENDIF