ISPatientLookupParam.LoadAction

Description

This lookup parameter property is used to load the collection of patients by their full names, codes or IDs.

Syntax

object.LoadAction

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

Return Value

TSLookupLoadAction

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.LoadAction = 2 'lulaID
aParam.Value = 8021 'the patient's ID

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: 1) This lookup parameter property cannot be used without ISPatientLookupParam.Value. 2) If the patients cannot be found by one of the parameters, the search continues by the rest.

In Profile Client v8 on User Interface Last Name can be found in Patient > Alter Patient > General > Last Name field, First Name can be found in Patient > Alter Patient > General > First Names field, File Number (Code) can be found in Patient > Alter Patient > General > File Num field.

Version information

Added in v7.8.0