The patient's gender in the selected patient version, returned in a longer format.
M | Male |
F | Female |
i | Indeterminate |
U | Unknown |
T | Transgender |
object.SexLong
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientVers interface |
string
Display the patient's gender in the selected patient version in a longer format.
Dim aPatient
Dim aPatientVers
Dim aMessage
Set aPatient = Profile.SelectPatient
set aPatientVers = aPatient.VersionOnDate(#01/01/2019#)
if aPatientVers is nothing then
aMessage = "There are no patient versions for this date!"
else
aMessage = aMessage & "On 01/01/2019 the patient's gender was " &_
aPatientVers.SexLong
end if
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Sex Long cannot be found, but Sex as a single character string can be found in
.