The PPPU category.
| 0 | pcUndefined |
| 1 | pcPractice |
| 2 | pcProvider |
| 3 | pcPOS |
| 4 | pcUser |
| 100 | pcAll |
object.Category
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISProvider interface |
int
Display the full name and the category of the PPPU.
Dim aFilter
Dim aProviders
Dim aProvider
Dim aMessage
Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 2 'pcProvider
set aProviders = Profile.LoadProvidersByFilter(aFilter)
aMessage = aMessage & vbNewLine &_
"The number of the providers is " & aProviders.Count
aMessage = aMessage & vbNewLine &_
"Full Name:" & vbTab & "Category:"
for each aProvider in aProviders
aMessage = aMessage & vbNewLine &_
aProvider.FullName & vbTab &_
aProvider.Category
next
Profile.MsgBox (aMessage) In Profile Client v8 on User Interface Category can be found in .