ISPatient.EthnicityCode6

Description

The sixth ethnicity of the patient, returned as a code of the short code.

Syntax

object.EthnicityCode6

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

Return Value

string

Example

Display the code of the sixth ethnicity of the patient.

Dim aPatient  
Dim aEthnicityCode6

Set aPatient = Profile.SelectPatient 
aEthnicityCode6 = aPatient.EthnicityCode6
Profile.MsgBox (aEthnicityCode6)
Note:

In Profile Client v8 on User Interface Ethnicity Code 6 can be found in Patient > Alter Patient > Social > Ethnicity6 field.

Version information

Added in v7.10.80
Parent topic: ISPatient