This filter is used to load the documents from the specified date and time.
object.DateFrom
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientDocumentFilter interface |
DateTime
Display the number, types and dates of the documents loaded on the basis of the selected filter.
Dim aPatient
Dim aFilter
Dim aDocuments
Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreatePatientDocumentFilter
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #01/01/2018 11:00:00#
aFilter.DateTo = #01/01/2019 12:00:00#
set aDocuments = Profile.LoadPatientDocuments(aFilter)
aMessage = "Documents Count = " & aDocuments.Count
for i = 0 to aDocuments.Count - 1
set aDocument = aDocuments.Items(i)
aMessage = aMessage & vbNewLine
aMessage = aMessage & aDocument.TypeDescription & ", " & aDocument.Date
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Date From cannot be found.