ISPatient.Registered

Description

Returns 1 if the patient is registered.

Syntax

object.Registered

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

Return Value

TSPatientRegisteredStatus

Example

Display 1 if the patient is registered. Otherwise, display 0.

Dim aPatient  
Dim aRegistered

Set aPatient = Profile.SelectPatient
aRegistered = aPatient.Registered
Profile.MsgBox (aRegistered)
Note: Registered field is available only for Canadian and Australian databases, except British Columbia.

In Profile Client v8 on User Interface "Yes" should be chosen in Patient > Alter Patient > General > Registered field.

Version information

Added in v7.9.0
Parent topic: ISPatient