[ |../../index.htm#lansa/srvgudba_0510.htm]
You are here:

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
 
[ |../../index.htm#lansa/srvgudba_0510.htm]