The information about the Rx medication that is returned as a string and can contain multiple lines.
object.RxAsString
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISRxMedication interface |
string
Display some information about the loaded Rx medication, that is returned as a string and can contain multiple lines.
Dim aRxMedication
Dim aRxMedicationInfo
Set aRxMedication = Profile.LoadRxMedication(1558)
if aRxMedication is nothing then
Profile.MsgBox("There is no Rx Medication with the specified ID")
exit sub
end if
aRxMedicationInfo = "Rx as String" & vbNewLine & aRxMedication.RxAsString &_
vbNewLine
if aRxMedication.Diagnosis.Id > 0 then
aRxMedicationInfo = aRxMedicationInfo & "Diagnosis: " &_
aRxMedication.Diagnosis.Description
end if
Profile.MsgBox(aRxMedicationInfo)
In Profile Client v8 on User Interface Rx as String can be found in
.