ISPatientProblemLoadParams.ChangedBefore

Description

This parameter property is used to load the collection of patient problems changed before the specified date.

Syntax

object.ChangedBefore

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

Return Value

DateTime

Example

Display the number of the patient problems loaded on the basis of the selected parameter, their codes, descriptions and the date and time these problems were last modified.

Dim aParams
Dim aProblems, aProblem
Dim aMessage

Set aParams = Profile.MakePatientProblemLoadParams
aParams.ChangedSince = #01/01/2019#
aParams.ChangedBefore = #09/09/2019# 
set aProblems = Profile.LoadPatientProblems(aParams)

aMessage = "Problems Count = " & aProblems.Count
for i = 0 to aProblems.Count - 1
  set aProblem = aProblems.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & "Code: " & aProblem.DxCode &_
    " (Description: " & aProblem.DxDescription & ") was last modified on " &_ 
    aProblem.ModifiedDT
next      

Profile.MsgBox(aMessage)

Note: If no other problem types are specified, only problems of 'Diagnosis' type will be loaded on the basis of the selected parameter.

In Profile Client v8 on User Interface Modified Dates for problems can be found in Clinical > Medical Record > Problems > Open Problem > History > Date column, in Clinical > Clinical Details > Problems > Open Problem > History > Date column or in Patient > Cases > Clinical > Problems > Open Problem > History > Date column.

Version information

Added in v8.2.0