This filter property is used to load the patient's referrals that have been modified since the specified date.
object.ChangedSince
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISReferralsFilter interface |
DateTime
Display the number of the patient's referrals that have been modified since the specified date.
Dim aPatient
Dim aReferralsFilter
Dim aReferrals
Dim aMessage
Set aPatient = Profile.SelectPatient
set aReferralsFilter = Profile.CreateReferralsFilter
aReferralsFilter.Patient = aPatient.Id
aReferralsFilter.ChangedSince = #05/20/2019#
set aReferrals = Profile.LoadReferrals(aReferralsFilter)
aMessage = aMessage & "The number of the patient's referrals " &_
"that have been modified since " &aReferralsFilter.ChangedSince &_
" is " & aReferrals.Count
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Changed Since cannot be found.