ISPatient.SexualOrientationCode

Description

The patient's sexual orientation, returned as a code of the short code.

Syntax

object.SexualOrientationCode

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

Return Value

string

Example

Display the patient's sexual orientation code.

Dim aPatient  
Dim aSexualOrientationCode

Set aPatient = Profile.SelectPatient
aSexualOrientationCode = aPatient.SexualOrientationCode
Profile.MsgBox (aSexualOrientationCode)

Note:

In Profile Client v8 on User Interface Sexual Orientation can be found in Clinical > Clinical Details > Family > Social History > Sexual Orientation field.

Version information

Added in v7.8.0