ISService.IsGroupHeader

Description

Returns True, if the group is the group header.

Syntax

object.IsGroupHeader

Part Attribute Type Description
object Required
The object always implements the ISService interface
Restriction: This property is readonly.

Return Value

bool

Example

Display IsGroupHeader for the specified service.

Dim aFilter
Dim aService
Dim aServices
Dim aMessage
Dim i

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

aMessage = "Services Count = " & aServices.Count & vbNewLine
for i = 0 to aServices.Count - 1
  set aService = aServices.Item(i)
  aMessage = aMessage & vbNewLine & "----------------------------" & vbNewLine &_
    "Description: " & aService.Description & vbNewLine &_
    "Code: " & aService.Code & vbNewLine &_
    "Added: " & aService.Added & vbNewLine &_
    "Changed: " & aService.Changed & vbNewLine &_
    "Status: " & aService.Status & vbNewLine &_
    "ID: " & aService.ID & vbNewLine &_
    "Output Code: " & aService.OutputCode & vbNewLine &_
    "Default Delivery Time: " & aService.DefaultDeliveryTime & vbNewLine &_
    "Is Group Header: " & aService.IsGroupHeader & vbNewLine 
next      

Profile.MsgBox(aMessage)             
Note:

In Profile Client v8 on User Interface the Group Header checkbox can be checked in Maintain > Services > Edit the selected service > General.

Version information

Added in v7.8.0