ISPatient.Sealed

Description

This property is True if the patient is sealed and all records about the patient become read-only and cannot be modified by anyone.

Syntax

object.Sealed

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

Return Value

bool

Example

Display Sealed for the patient.

Dim aPatient  
Dim aSealed

Set aPatient = Profile.SelectPatient
aSealed = aPatient.Sealed
Profile.MsgBox (aSealed)  
Note:

In Profile Client v8 on User Interface cannot be found.

Version information

Added in v7.8.0