Code

Var vElements as String
Var vUsers as String
Var vCnt as Int
Var vLoop as Int
Var vUser as String
Var vName as String

    vElements = @StringArrayElementList()
    vCnt = @CountStringArray(vElements)
    vLoop = 0
    vUsers = "Sally;Rob;Joe"
    vUser = @UserID

    If @FindStringArray(vUsers, vUser) > 0 Then
    {
	  While vLoop < vCnt
	  {
		vLoop = vLoop + 1
		vName = @AccessStringArray(vElements, vLoop)
		SetThisElement(vName)
		//If you want the elements to not be grayed out but still readonly
		//Change the 1 on the next line to a 2
		ReadOnly(ThisElement, 1)
	  }
	  UnSetThisElement()
    }
 

Code

Var vElements as String
Var vUsers as String
Var vCnt as Int
Var vLoop as Int
Var vUser as String
Var vName as String

    vElements = @StringArrayElementList()
    vCnt = @CountStringArray(vElements)
    vLoop = 0
    vUsers = "Sally;Rob;Joe"
    vUser = @UserID

    If @FindStringArray(vUsers, vUser) > 0 Then
    {
	  While vLoop < vCnt
	  {
		vLoop = vLoop + 1
		vName = @AccessStringArray(vElements, vLoop)
		SetThisElement(vName)
		//Make all elements writeable
		ReadOnly(ThisElement, 0)
	  }
	  UnSetThisElement()
    }