This property is True if the patient is sealed and all records about the patient become read-only and cannot be modified by anyone.
object.Sealed
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatient interface |
bool
Display Sealed for the patient.
Dim aPatient
Dim aSealed
Set aPatient = Profile.SelectPatient
aSealed = aPatient.Sealed
Profile.MsgBox (aSealed)
In Profile Client v8 on User Interface cannot be found.