ID of the provider that the patient is on the wait list for.
object.ProviderID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISWaitList interface |
int
Display the number of the case wait lists loaded on the basis of the selected filter and ID of the provider.
Dim aFilter
Dim aCaseWaitList
Dim aCaseWaitLists
Dim aMessage
Set aFilter = Profile.CreateCaseWaitListFilter
aFilter.WaitListType = Profile.LoadShortCodeByCodeType("WL1", 122).ID
set aCaseWaitLists = Profile.LoadCaseWaitLists(aFilter)
aMessage = "The number of the wait lists with the specified type (" &_
aFilter.WaitListType & ") is " & aCaseWaitLists.Count
for i = 0 to aCaseWaitLists.Count - 1
set aCaseWaitList = aCaseWaitLists.Item(i)
aMessage = aMessage & vbNewLine & (i + 1) & ") " & _
"Provider ID: " & aCaseWaitList.ProviderID
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Provider ID cannot be found, but Provider can be found in
.