ISLegalStatusChange.CreatedDT

Description

The date and time the legal status change was created.

Syntax

object.CreatedDT

Part	Attribute	Type	Description
`object`	Required	ISLegalStatusChange	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 created.

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 Created 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