This filter property is used to load the patient's referrals referred after the specified date and time.
object.ReferredDateFrom
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISReferralsFilter interface |
DateTime
Display the number of the patient's referrals filtered after the specified date and time.
Dim aPatient
Dim aReferralsFilter
Dim aReferrals
Dim aMessage
Set aPatient = Profile.SelectPatient
set aReferralsFilter = Profile.CreateReferralsFilter
aReferralsFilter.Patient = aPatient.Id
aReferralsFilter.ReferredDateFrom = #05/20/2019 12:35:00#
set aReferrals = Profile.LoadReferrals(aReferralsFilter)
aMessage = aMessage & "The number of the patient's referrals referred after " &_
aReferralsFilter.ReferredDateFrom & " is " & aReferrals.Count
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Referred Date From cannot be found.