This filter property is used to load the collection of the patient measures from the lower bound of the date range.
object.StartDate
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientMeasureFilter interface |
DateTime
Display the number of the patient measures loaded on the basis of the selected filter and their descriptions.
Dim aPatient
Dim aPatientMeasureFilter, aPhysQuantity
Dim aMeasures, aMeasure
Dim i
Dim aMessage
Set aPatient = Profile.SelectPatient
Set aPatientMeasureFilter = Profile.CreatePatientMeasureFilter
aPatientMeasureFilter.StartDate = #01/01/2000#
aPatientMeasureFilter.EndDate = #07/12/2020#
set aMeasures = aPatient.GetMeasuresByFilter(aPatientMeasureFilter, aPhysQuantity)
aMessage = "Measures Count = " & aMeasures.Count & vbNewLine
for i = 0 to aMeasures.Count - 1
set aMeasure = aMeasures.Item(i) 'ISHRI
aMessage = aMessage & vbNewLine & (i + 1) & ") " & aMeasure.AsString & vbTab & aMeasure.GUID
next
Profile.MsgBox(aMessage)