ISPatient.IsNotablePerson

Description

This property is True if the patient is a very important person (VIP).

Syntax

object.IsNotablePerson

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

Return Value

bool

Example

Display IsNotablePerson for the patient.

Dim aPatient  
Dim aIsNotablePerson

Set aPatient = Profile.SelectPatient 
aIsNotablePerson = aPatient.IsNotablePerson
Profile.MsgBox (aIsNotablePerson) 
Note:

In Profile Client v8 on User Interface the Notable person checkbox can be checked in Patient > Alter Patient > Personal.

Version information

Added in v7.8.0