Returns True if the patients were loaded by their alternative names, maiden names or aliases.
object.ByAlternativeSearch
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientLookupItem interface |
bool
Display the number of the loaded patients and check whether these patients were loaded by their alternative names, maiden names or aliases.
Dim aParam
Dim aList
Dim aPatientLookupItem
Dim aLookupType
Dim aMessage
Set aParam = Profile.MakePatientLookupParam 'ISPatientLookupParam
aParam.IsIncludeAlternatives = True
aParam.Value = "John"
aParam.MaxCount = 20
aLookupType = 23 'patient lookup
set aList = Profile.LoadLookupList2(aLookupType, aParam) 'ISPatientLookupItem collection
aMessage = "Patients Count = " & aList.Count & vbNewLine & vbNewLine
for each aPatientLookupItem in aList
aMessage = aMessage &_
"By Alternative Search: " & aPatientLookupItem.ByAlternativeSearch & vbNewLine &_
"Name: " & aPatientLookupItem.Name & vbNewLine & vbNewLine
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Alternative Names can be found in
, Alias Name can be found in , Maiden Name can be found in .