The HPI Organisation ID of the organisation where the patient can receive the service.
object.OrganisationServiceID
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 the HPI Organisation ID of the organisation, where the patient can receive the service.
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 & ", Organisation "_
& "Service ID: " & aEnrolment.OrganisationServiceID
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Organisation Service ID cannot be found.