ISPatientFilter.IsNotOnHold

Description

This filter is used to load the collection of patients with the Hold Account checkbox unchecked.

Syntax

object.IsNotOnHold

Part Attribute Type Description
object Required
The object always implements the ISPatientFilter interface

Return Value

bool

Example

Display the number of the patients loaded on the basis of the selected filter, their full names and IDs.

Dim aIterator  
Dim aFilter  
Dim aCount
Dim aCanProcessItem
Dim aPatient
Dim aMessage

Set aIterator = Profile.CreatePatientIterator
set aFilter = Profile.CreatePatientFilter    
aFilter.IsNotOnHold = True                          
aIterator.Open(aFilter)
aCount = aIterator.Count

aMessage = "Patients Count = " & aCount & vbNewLine & vbNewLine
 
aMessage = aMessage & "Selected Patients: " & vbNewLine
aIterator.Reset
aCanProcessItem = aIterator.Next

i = 1
do while aCanProcessItem 
  set aPatient = aIterator.Patient
  aMessage = aMessage & vbNewLine & i & ")  " &_
   aPatient.FirstName & " " & aPatient.LastName &_
   " ( " & aIterator.PatientId & " ) "
  i = i + 1
  aCanProcessItem = aIterator.Next
loop

Profile.MsgBox(aMessage)  
Note:

In Profile Client v8 on User Interface the Hold Account checkbox can be checked in Patient > Alter Patient > Financial.

Version information

Added in v7.8.0