ISFamilyProblem.GetDTModified

Description

This function returns the date and time the family problem was last modified.

Syntax

object.GetDTModified()

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

Return Value

DateTime

Return the date and time the family problem was last modified

Example

Display some information about the family problems loaded on the basis of the selected filter including the date and time they were last modified.

Dim aPatient
Dim aFilter
Dim aFamilyProblems, aFamilyProblem
Dim aMessage

Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateFamilyProblemFilter
aFilter.PatientID = aPatient.ID
set aFamilyProblems = aFilter.Load
  
aMessage = "Family Problems Count: " & aFamilyProblems.Count &_
  vbNewLine & vbNewLine & "Dx Description" & vbTab & "Last Modified"  
 
for i = 0 to aFamilyProblems.Count - 1 
  set aFamilyProblem = aFamilyProblems.Items(i)
  aMessage = aMessage & vbNewLine & aFamilyProblem.DxDescription & vbTab &_
    vbTab & aFamilyProblem.GetDTModified 
next 

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface DTModified cannot be found.

Version information

Added in v8.4.0