ISPatientSMS.ExternalKey

Description

The unique ID of the patient's SMS message in the external SMS delivery service.

Syntax

object.ExternalKey

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

Restriction: This property is readonly.

Return Value

string

Example

Send a new SMS message, display its text and external key.

Dim aPatient
Dim aPhoneNumber
Dim aPatientSms
Dim aMessage 

Set aPatient = Profile.SelectPatient
aPhoneNumber = aPatient.CellPhone
 
set aPatientSms = Profile.SendPatientSMS(aPatient.ID, aPhoneNumber, "Hello!") 

if aPatientSms.DeliveryResult = 0 then  'ssdrSent 
  aMessage = "Text: " & aPatientSms.Text & " (external key: " &_ 
    aPatientSms.ExternalKey & ")"
else
  aMessage = "Text: " & aPatientSms.Text & " (" & aPatientSms.ErrorMessage & ")"     
end if     
  
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface External Key cannot be found.

Version information

Added in v7.8.0