ISPatientDocument.Date

Description

The date of the patient's document.

Syntax

object.Date

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

Restriction: This property is readonly.

Return Value

DateTime

Example

Display the number of the patient's documents, their type and date.

Dim aPatient
Dim aFilter
Dim aDocuments
Dim aDocument
Dim aMessage

Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreatePatientDocumentFilter
aFilter.PatientId = aPatient.ID 
aFilter.IncludeScanDoc = True
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 can be found in Clinical > Medical Record > Documents > Date.

Version information

Added in v7.8.0