This function returns the occupancies loaded on the basis of the selected filter.
object.LoadOccupancy(aFilter)
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aFilter |
In, Required | The object that defines conditions for filtering
|
Display the number of the occupancies loaded on the basis of the selected filter and their descriptions.
Dim aFilter
Dim aOccupancies
Dim aOccupancy
Dim aMessage
Set aFilter = Profile.CreateOccupancyFilter
aFilter.DateFrom = #09/09/2017#
set aOccupancies = Profile.LoadOccupancy(aFilter)
aMessage = "Occupancies Count = " & aOccupancies.Count
for i = 0 to aOccupancies.Count - 1
set aOccupancy = aOccupancies.Item(i)
aMessage = aMessage & vbNewLine & aOccupancy.ResponsibleUnit
next
Profile.MsgBox(aMessage) In Profile Client v8 on User Interface Occupancy can be found in .