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