ISPatientEnrolments.Count

Description

The number of the patient's NES Enrolments.

Syntax

object.Count

Part	Attribute	Type	Description
`object`	Required	ISPatientEnrolments	The `object` always implements the ISPatientEnrolments interface

Restriction: This property is readonly.

Return Value

int

Example

Display the number of the patient's NES Enrolments.

Dim aPatient  
Dim aEnrolments
Dim aMessage

Set aPatient = Profile.SelectPatient 
set aEnrolments = aPatient.GetEnrolments
aMessage = "Enrolments Count = " & aEnrolments.Count

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface NES Enrolments can be found in Patient > Alter Patient > General > Enrolment.

Version information

Added in v8.1.0