ISPatientSMS.Text

Description

The text of the patient's SMS message.

Syntax

object.Text

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 delivery result.

Dim aPatient
Dim aPhoneNumber
Dim aPatientSms
Dim aMessage 

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

aMessage = "Text: " & aPatientSms.Text & " (delivery result: " &_ 
  aPatientSms.DeliveryResult & ")" 
  
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Patient SMS Messages can be found in Clinical > Medical Record > Messages.

Version information

Added in v7.8.0