ISProvider.SCPID

Description

The SCP (Specimen Collection Point) ID associated with the place of service.

Syntax

object.SCPID

Part Attribute Type Description
object Required
The object always implements the ISProvider interface

Return Value

string

Example

Display the SCP (Specimen Collection Point) ID associated with the place of service.

Dim aFilter 
Dim aPOSList, aPOS
Dim aMessage

Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 3 'pcPOS 
set aPOSList = Profile.LoadProvidersByFilter(aFilter)

aMessage = aMessage & vbNewLine &_
  "The number of the providers is " & aPOSList.Count

aMessage = aMessage & vbNewLine &_
  "Full Name:" & vbTab & "SCPID:"  

for each aPOS in aPOSList
  aMessage = aMessage & vbNewLine &_
    aPOS.FullName & vbTab &_
    aPOS.SCPID
next
 
Profile.MsgBox (aMessage) 
Note: Enabled and expanded if Health System Preference = Australia and Invoice Type = Pathology, else disabled and collapsed.

In Profile Client v8 on User Interface SCP ID can be found in Organisation > People&Places > People and Places > Open the selected POS > Financial > Other > SCP ID field.

Version information

Added in v7.8.0