ISProfile.SelectPatient

Description

This function is used to show the dialog window and load the selected patient.

Syntax

object.SelectPatient()

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

Return Value

ISPatient

Returns the selected patient.

Example

Select the patient and display the information about him/her.

Dim aPatient 
Dim aFirstname 
Dim aLastname 
Dim aSex
Dim aAge
Dim aDOB

Set aPatient = Profile.SelectPatient
aFirstname = aPatient.Firstname 
aLastname = aPatient.Lastname
aAge = aPatient.Age
aSex = aPatient.Sex
aDOB = aPatient.DOB
Profile.MsgBox ("The patient: " & aFirstname &  ", " & aLastname &_
  vbNewLine & "Gender: " & aSex & vbNewLine & "Age: " & aAge & vbNewLine &_
  "Date of birth: " & aDOB)

Note:

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

Version information

Added in v7.8.0