ISPatientDocumentFilter.Direction

Description

This filter is used to load the documents by the direction.

Syntax

object.Direction

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

Return Value

TSCDO_Direction

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.Direction = 0
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 Direction can be found in Clinical > Medical Record > Documents > Edit Properties > Direction field.

Version information

Added in v7.8.0