First, you must get a session ID to work with. This ID will be used in all subsequent LANSA Open DLL Calls (LceFunctions):
     ISession = LceGetSessionId()
If iSession = 0 Then
         MsgBox "No Session ID"
        End
    End If