This function returns information about the patient's care plan in a form that is usable to (and understandable by) a patient.
object.GetHelpInfo()
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientRecallPlan interface |
Display the information about the patient's care plan.
Dim aPatient
Dim aRecallPlans
Dim aPlan
Dim aHelpInfo
set aPatient = Profile.SelectPatient
set aRecallPlans = aPatient.RecallPlans
for each aPlan in aRecallPlans
set aHelpInfo = aPlan.GetHelpInfo
if aHelpInfo is nothing then
aMessage = aMessage & vbNewLine & "No Patient Info"
else
aMessage = aMessage & vbNewLine & "Information about the patient's " &_
"care plan '" & aPlan.Description & "': " &_
Profile.Rtf2Plain(aHelpInfo.GetBody)
end if
next
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Help Info can be found in
.