ISLegalStatusChange.ModifiedDT

Description

The date and time the legal status change was modified.

Syntax

object.ModifiedDT

Part Attribute Type Description
object Required
The object always implements the ISLegalStatusChange interface
Restriction: This property is readonly.

Return Value

DateTime

Example

Display the number of the legal status changes and some information about them, including the dates and time when legal status changes were modified.

Dim aFilter
Dim aLegalStatusChanges, aLegalStatusChange
Dim aMessage
Dim i 

set aFilter = Profile.CreateLegalStatusChangeFilter
aFilter.FromDate = #09/09/2015#
set aLegalStatusChanges = Profile.LoadLegalStatusChanges(aFilter)

aMessage = "Legal Status Changes Count = " & aLegalStatusChanges.Count
for i = 0 to aLegalStatusChanges.Count - 1
  set aLegalStatusChange = aLegalStatusChanges.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " &_
    "Created Date/Time: " & aLegalStatusChange.CreatedDT & vbNewLine &_
    "ID: " & aLegalStatusChange.ID & vbNewLine &_
    "Modified Date/Time: " & aLegalStatusChange.ModifiedDT & vbNewLine 
next      

Profile.MsgBox(aMessage)               
Note:

In Profile Client v8 on User Interface Modified Date cannot be found, but Legal Status can be found in Patient > Alter Patient > General > Social > Legal Status.

Version information

Added in v7.8.0