ISExternalProvider.ID

Description

ID of the provider of medical services who is external to the organisation.

Syntax

object.ID

Part Attribute Type Description
object Required
The object always implements the ISExternalProvider interface
Restriction: This property is readonly.

Return Value

int

Example

Display the full name and ID of the external provider.

Dim aExtProvider 
Dim aCode
Dim aMessage

aCode = "1"
Set aExtProvider = Profile.LoadExternalProvider(aCode)

if aExtProvider.ID = 0  then 
  Profile.MsgBox("No external provider with the specified code")
  exit sub   
end if
  aMessage = aMessage & vbNewLine &_
    "Full Name:" & vbTab & "ID:" & vbNewLine & vbNewLine &_
    aExtProvider.FullName & vbTab & aExtProvider.ID
 
Profile.MsgBox(aMessage) 
Note:

In Profile Client v8 on User Interface ID cannot be found.

Version information

Added in v7.8.0