ISPatientEnrolment.ExternalId

Description

The external unique ID for the patient's enrolment record.

Syntax

object.ExternalId

Part Attribute Type Description
object Required
The object always implements the ISPatientEnrolment interface

Return Value

int

Example

Display the number of the patient's NES Enrolments, external ID for them and the date and time of their creation.

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 &_
   ", external ID: " & aEnrolment.ExternalId
next 

Profile.MsgBox(aMessage)    
Note:

In Profile Client v8 on User Interface External ID cannot be found.

Version information

Added in v8.1.0