ISPatientLookupParam.PatientTypes

Description

This lookup parameter property is used to load the collection of patients of the selected types.

Syntax

object.PatientTypes

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

Return Value

int

Example

Display the number of the patients loaded on the basis of the selected Lookup Parameter and their full names.

Dim aParam
Dim aList
Dim aPatientLookupItem 
Dim aLookupType
Dim aMessage 

Set aParam = Profile.MakePatientLookupParam 'ISPatientLookupParam
aParam.PatientTypes = 2 'TSPatientTypes
aParam.IsStartsWith = True
aParam.Value = "S" 
 
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 & "Name: " & aPatientLookupItem.Name & vbNewLine  
next
                                  
Profile.MsgBox(aMessage)

Note: This lookup parameter property cannot be used without the lookup parameter properties with the inserted values.

In Profile Client v8 on User Interface Type can be found in Patient > Alter Patient > General > Type field.

Version information

Added in v7.8.0