ISPatientProblem.IsDeleted

Description

This property value is True if the patient's problem was deleted.

Syntax

object.IsDeleted

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

Restriction: This property is readonly.

Return Value

bool

Example

Display IsDeleted for the patient's problems.

Dim aPatient  
Dim aNewProblem
Dim aMessage

Set aPatient = Profile.SelectPatient
set aNewProblem = aPatient.AddProblem(1) 'ptDiagnosis
aNewProblem.DxCode = "LETH"

aNewProblem.Save

Profile.MsgBox ("New problem with Dx Code " & "'" & aNewProblem.DxCode &_ 
  "'" & " was added successfully, IsDeleted = " & aNewProblem.IsDeleted)
 
aNewProblem.Delete

aNewProblem.Save

aMessage = aMessage & vbNewLine & "The added problem with Dx Code " & "'" &_ 
  aNewProblem.DxCode & "'" & " was deleted: " & aNewProblem.IsDeleted

Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Problems can be found and deleted in Clinical > Medical Record > Problems, in Clinical > Clinical Details > Problems or in Patient > Cases > Clinical > Problems.

Version information

Added in v8.2.0