ISProfile.FindPatientByNHI

Description

This function returns the patient by the specified personal health number.

Syntax

object.FindPatientByNHI(aPatientNHI)

Part Attribute Type Description
object Required
The object always implements the ISProfile interface
aPatientNHI In, Required
string
The patient's personal health number

Return Value

ISPatient

Returns the patient by the specified personal health number.

Example

Display the patient's full name.

Dim aPatient
Dim aMessage 

Set aPatient = Profile.FindPatientByNHI("BC")

if aPatient is nothing then 
aMessage = "There is no patient with the specified NHI"
else 
aMessage = aPatient.SurnameFirstName
end if

Profile.MsgBox(aMessage)
Note:

In Profile Client v8 on User Interface NHI can be found in Patient > Alter Patient.

Version information

Added in v7.8.0