This script uses the System object's FixGetUserInfo method to get security information about the user.
Example: Using the System Object's FixGetUserInfo Method
Public Sub SecurityGetUser()
Dim Result As Integer
Dim UserID As String
Dim UserName As String
Dim GroupName As String
Dim UserInfo As String
System.FixGetUserInfo UserID, UserName, GroupName
MsgBox "Login Name: " & UserID & vbCr & "Full Name: " _
& UserName & vbCr & "Clearance Level: " & GroupName
End Sub