Class: | loginpicture |
LOCAL llCloseUserLevel, ; lcUserLevel SET DATABASE TO TASTRADE *-- Look up the group information IF !USED("user_level") USE user_level IN 0 llCloseUserLevel = .T. ENDIF lcUserLevel = LOOKUP(user_level.description, ; employee.group_id, ; user_level.group_id, ; "group_id") IF llCloseUserLevel USE IN user_level ENDIF RETURN lcUserLevel