ISPatient.IsMemberOfPOS

Description

This function checks if the selected patient is member of the POS with the specified ID on the specified date. The return value depends on the preferences, than can be found and set in Organisation/Preferences/Organisation/Patient/Member of POS.

Syntax

object.IsMemberOfPOS(aPOSID, aAtDate)

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface
`aPOSID`	In, Required	int	ID of the place of service
`aAtDate`	In, Required	DateTime	The date on which the patient's membership should be checked

Return Value

bool

Returns True if the selected patient is member of the POS with the specified ID on the specified date.

Example

Display IsMemberOfPOS for the patient.

Dim aPatient
Dim aPOS
Dim aIsMemberAtDate
   
Set aPatient = Profile.SelectPatient
set aPOS = Profile.LoadProviderById(Profile.CurrentPOSId)
aIsMemberAtDate = aPatient.IsMemberOfPOS(aPOS.Id, #10/14/2019#)
Profile.MsgBox(aPatient.SurnameFirstName & " is member of " & aPOS.FullName &_ 
  ": " & aIsMemberAtDate)

Note:

In Profile Client v8 on User Interface the membership of the patient in the selected POS can be checked in Report > Find Objects > Patient > Member of.

Version information

Added in v8.5.0