This filter property is used to load the patient's referrals initiated by the internal provider.
object.ReferredByProv
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISReferralsFilter interface |
string
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)
In Profile Client v8 on User Interface Referred By Prov cannot be found.