Page History
[ 
|../../index.htm#lansa/srvgudba_0350.htm]
You are here:
...
Private Sub cmdSave_Click()
...
' Saves changes or inserts a new record. Note that the fields are
' updated as the user changes them.
' Errors are automatically handled by LANSA
Dim iRet As Integer
If bAdding = True Then
' user is inserting a new record
iRet = LceInsert(iSession, "SKILCODE,SKILDESC",
...
"SKLTAB",
...
_
LceFalse)
Else
...
' user is saving changed record
End If
If iRet = LceTrue Then
' if successful force a refresh so list shows changes
Call RefreshSkillsList
End If
End Sub