Prohibit Modification for some selected users

Question

Hello, I have a need to prohibit modification to a field for certain users only. 
 I tried to select multiple and open on new tab and prohibit there. I get and error. 
 I also tried to do it in Object Browser but cannot find a way. Is there a programmatic way to set prohibit on specific user i need it set on? 
 Thank you, 
 Lu

Markus Weiss-Ehlers · Answer

Correct answer is to use the class VI.DB.Entities.EntityLock. Sample code is: Public Sub CCC_LockColumns(ObjectKey As String, ColumnNames As String(), LockType As EntityLockType)
 ' ENUM EntityLockType
 ' Append = 0
 ' Replace = 1
 ' Remove = 2

' Parameter validation
 If String.IsNullOrWhiteSpace(ObjectKey) Then Throw New ArgumentNullException(NameOf(ObjectKey), "No ObjectKey supplied.")
 If (ColumnNames Is Nothing) OrElse (ColumnNames.Count = 0) Then Throw New ArgumentNullException(NameOf(ColumnNames), "No column names array supplied.")
 If LockType < 0 And LockType > 2 Then Throw New ArgumentNullException(NameOf(LockType), "No valid entity lock type supplied. Valid values are 0 (Append), 1 (Replace) or 2 (Remove).")

' Create DBObjectKey
 Dim objKey = New DbObjectKey(ObjectKey)

' Get meta data for the table of the entity
 Dim dbTable = Session.MetaData().GetTable(objKey.Tablename)
 ' Get the UID of the DialogColumn entries for the ColumnNames
 Dim columnUIDs = ColumnNames.AvoidNull.Select(Function(c) dbTable.Columns(c).Uid)

' Get the entity
 Dim dbEntity As IEntity = Session.Source.Get(objKey, EntityLoadType.Interactive)

' Ensure that we are allowed to lock columns
 If Entities.EntityLock.IsAllowedAsync(Session).Result() Then
 ' Create a Unit of Work
 Using uow = Session.StartUnitOfWork()
 ' Lock the columns by creating the entries in QBMLock and changing XMarkedForDeletion
 Entities.EntityLock.LockColumnsAsync(uow, dbEntity, ColumnNames, LockType).Wait()
 uow.Put(dbEntity)
 uow.Commit()
 End Using
 End If
End Sub