ID of the provider's base place of service.
object.PosID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProvider interface |
int
Display some information about the provider, including ID of the provider's base place of service.
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 & "POS:" & vbTab & "Pos ID:"
for each aProvider in aProviders
aMessage = aMessage & vbNewLine &_
aProvider.FullName & vbTab &_
aProvider.POS & vbTab &_
aProvider.PosID
next
Profile.MsgBox (aMessage)
In Profile Client v8 on User Interface Pos ID cannot be found. POS can be found in
or .