The user who updated the patient's NES Enrolment last time.
object.UpdatedBy
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientEnrolment interface |
string
Display the number of the patient's NES Enrolments, the date and time of their creation and last update, the user who updated them last time.
Dim aPatient
Dim aEnrolments
Dim aEnrolment
Dim aMessage
Set aPatient = Profile.SelectPatient
set aEnrolments = aPatient.GetEnrolments
aMessage = "Enrolments Count = " & aEnrolments.Count
for i = 0 to aEnrolments.Count - 1
set aEnrolment = aEnrolments.Item(i)
aMessage = aMessage & vbNewLine
aMessage = aMessage & "Created: " & aEnrolment.CreatedDate & ", updated: " &_
aEnrolment.UpdatedDate & " by " & aEnrolment.UpdatedBy
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Updated By can be found in
.