This filter property is used to load the patient's referrals by an external provider that the referral was for.
object.ReferredToExtProv
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 external provider that the referral was for.
Dim aPatient
Dim aReferralsFilter
Dim aReferrals
Dim aMessage
Set aPatient = Profile.SelectPatient
set aReferralsFilter = Profile.CreateReferralsFilter
aReferralsFilter.ReferredToExtProv = "L9060"
set aReferrals = Profile.LoadReferrals(aReferralsFilter)
aMessage = aMessage & "The number of the referrals filtered by" &_
" the external provider (" & aReferralsFilter.ReferredToExtProv &_
") that the referral was for is " & aReferrals.Count
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Referred To Ext Prov cannot be found.