ISPatient.EthnicityCode4

Description

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

Syntax

object.EthnicityCode4

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

Return Value

string

Example

Display the code of the fourth ethnicity of the patient.

Dim aPatient  
Dim aEthnicityCode4

Set aPatient = Profile.SelectPatient 
aEthnicityCode4 = aPatient.EthnicityCode4
Profile.MsgBox (aEthnicityCode4)
Note:

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

Version information

Added in v7.10.80
Parent topic: ISPatient