ISPatientDocumentFilter.DateTo

Description

This filter is used to load the documents till the specified date and time.

Syntax

object.DateTo

Part	Attribute	Type	Description
`object`	Required	ISPatientDocumentFilter	The `object` always implements the ISPatientDocumentFilter interface

Return Value

DateTime

Example

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)

Note:

In Profile Client v8 on User Interface Date To cannot be found.

Version information

Added in v7.8.0