ISWaitLists.Count

Description

The number of the wait lists within the collection.

Syntax

object.Count

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

Return Value

int

Example

Display the number of the case wait lists loaded on the basis of the selected filter and the dates when they were opened and closed.

Dim aFilter
Dim aCaseWaitList
Dim aCaseWaitLists
Dim aMessage

Set aFilter = Profile.CreateCaseWaitListFilter
aFilter.PosID = Profile.CurrentPOSId 
set aCaseWaitLists = Profile.LoadCaseWaitLists(aFilter) 

aMessage = "The number of the wait lists with the specified POS ID (" &_
  aFilter.PosID  & ") is " & aCaseWaitLists.Count
for i = 0 to aCaseWaitLists.Count - 1
  set aCaseWaitList = aCaseWaitLists.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & _
    "From " & aCaseWaitList.OpenedOn & " To" & aCaseWaitList.ClosedOn
next      

Profile.MsgBox(aMessage) 
Note:

In Profile Client v8 on User Interface Wait Lists can be found in Organisation > Work Centre > Wait List.

Version information

Added in v7.8.0