ISPatientLookupParam.Index

Description

This lookup parameter property is used to load the collection of patients by their indexes, codes, dates of birth, file numbers, folder numbers, insurance numbers or national numbers.

Syntax

object.Index

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

Return Value

TSPatientParamIndex

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.Index = 1 'smppiFileNum
aParam.Value = 9108
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 ISPatientLookupParam.Value.

In Profile Client v8 on User Interface File Number (Code) can be found in Patient > Alter Patient > General > File Num field, DOB can be found in Patient > Alter Patient > General > DOB field, Folder number can be found in Patient > Alter Patient > General > Folder fieldor in Patient > Alter Patient > Family > Folder field, National Number can be found in Patient > Alter Patient > General > NHI field(for New Zealand), Patient > Alter Patient > General > PHN field (for Canada) or in Patient > Alter Patient > General > Medicare field.

Version information

Added in v7.8.0