ISProviderPOSInfo.PosID

Description

ID of the place of service the provider is a member of.

Syntax

object.PosID

Part	Attribute	Type	Description
`object`	Required	ISProviderPOSInfo	The `object` always implements the ISProviderPOSInfo interface

Restriction: This property is readonly.

Return Value

int

Example

Display some information about the places of service the provider is a member of, including their codes.

Dim aProvider
Dim aPOSList
Dim aPOS
Dim aProv
Dim aPOSInfo
Dim aRefSystem
Dim aMessage

Set aProvider = Profile.LoadProvider ("PROV")
set aPOSList = aProvider.MemberOfPOSInfos
aMessage = aProvider.FullName &_
  " has " & aPOSList.Count & " places of service" & vbNewLine

aMessage = aMessage & vbNewLine & "POS Info: " & vbNewLine   
for each aPOSInfo in aPOSList
  set aPOS = Profile.LoadProviderById(aPOSInfo.PosID)
  set aProv = Profile.LoadProviderById(aPOSInfo.ProviderId)
  set aRefSystem = aPOSInfo.ReferenceSystem
  aMessage = aMessage &_
   "-  POS Code: " & aPOS.Code & vbNewLine &_
   "    Provider Code: " & aProv.Code & vbNewLine &_
   "    Reference System: " & aRefSystem.Description & vbNewLine &_
   "    Reference System ID: " & aPOSInfo.ReferenceSystemID & vbNewLine &_
   "    Service ID: " & aPOSInfo.ServiceID & vbNewLine &_
   "    Payee ID: " & aPOSInfo.PayeeID & vbNewLine    
next 
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface POS ID cannot be found. POS can be found in Organisation > People&Places > People and Places > Open the selected Provider > Member Of.

Version information

Added in v7.10.2