ISReferralsFilter.ReferredByProv

Description

This filter property is used to load the patient's referrals initiated by the internal provider.

Syntax

object.ReferredByProv

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

Return Value

string

Example

Display the number of the patient's referrals filtered by the internal provider that initiated the referral.

Dim aPatient
Dim aReferralsFilter
Dim aReferrals
Dim aMessage

Set aPatient = Profile.SelectPatient
set aReferralsFilter = Profile.CreateReferralsFilter

aReferralsFilter.Patient = aPatient.Id
aReferralsFilter.ReferredByProv = "PROV"

set aReferrals = Profile.LoadReferrals(aReferralsFilter)

aMessage = aMessage & "The number of the patient's referrals " &_
  "initiated by the internal provider '" &aReferralsFilter.ReferredByProv &_
  "' is " & aReferrals.Count

Profile.MsgBox (aMessage)  
Note:

In Profile Client v8 on User Interface Referred By Prov cannot be found.

Version information

Added in v7.8.0