The fourth ethnicity of the patient, returned as the short code description.
object.Ethnicity4
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatient interface |
string
Display the fourth ethnicity of the patient.
Dim aPatient
Dim aEthnicity4
Set aPatient = Profile.SelectPatient
aEthnicity4 = aPatient.Ethnicity4
Profile.MsgBox (aEthnicity4)
In Profile Client v8 on User Interface Ethnicity 4 can be found in
.