ISCDOTransaction.CreatedOn

Description

The date and time the CDO transaction was created.

Syntax

object.CreatedOn

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

Return Value

DateTime

Example

Display some information about the CDO transactions, including the dates and time they were created.

Dim aPatient
Dim aFilter 
Dim aCDOTransactions, aCDOTransaction
Dim i
Dim aMessage

Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateCDOTransFilter
aFilter.PatientId = aPatient.Id
set aCDOTransactions = Profile.LoadCDOTransactions(aFilter)

aMessage = "CDO Transactions Count = " & aCDOTransactions.Count & vbNewLine
for i = 0 to aCDOTransactions.Count - 1
  set aCDOTransaction = aCDOTransactions.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " &_
    "Created on: " & aCDOTransaction.CreatedOn & vbNewLine &_
    "     ID: " & aCDOTransaction.CreatedOn & vbNewLine &_
    "     CID: " & aCDOTransaction.CreatedOn & vbNewLine &_
    "     Pos Code: " & aCDOTransaction.PosCode & vbNewLine &_
    "     Privacy: " & aCDOTransaction.Privacy & vbNewLine &_ 
    "     Recorder: " & aCDOTransaction.Recorder & vbNewLine &_ 
    "     Authorizer: " & aCDOTransaction.Authorizer & vbNewLine  
next    

Profile.MsgBox(aMessage)
Note:

In Profile Client v8 on User Interface Created On cannot be found.

Version information

Added in v7.8.0