ISService.GetHelpInfo

Description

This function returns some explanatory information about the service in a format that would be helpful to (and understandable by) a patient.

Syntax

object.GetHelpInfo()

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

Return Value

ISHelpInfo

Returns some explanatory information about the service in a format that would be helpful to (and understandable by) a patient.

Example

Display the number of the services loaded on the basis of the selected filter, some information about them, including some explanatory information about the services in a format that would be helpful to (and understandable by) a patient.

Dim aFilter
Dim aService
Dim aServices
Dim aMessage
Dim aHelpInfo

Set aFilter = Profile.CreateServicesFilter
aFilter.Description = "Injection"
set aServices = Profile.LoadServicesByFilter(aFilter)

aMessage = "Services Count = " & aServices.Count & vbNewLine

for each aService in aServices
  set aHelpInfo = aService.GetHelpInfo
  if aHelpInfo is nothing then
    aMessage =  vbNewLine & "No Help Info"
  else
    aMessage =  vbNewLine & "Information about the service '" &_
      aService.Description & "': " &_
      Profile.Rtf2Plain(aHelpInfo.GetBody)
  end if
next

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Help Info can be found in Maintain > Services > Edit the selected service > Patient Info.

Version information

Added in v7.8.0