ISRxMedication.DosageLine

Description

The Rx medication dosage that is returned as a string.

Syntax

object.DosageLine

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

Restriction: This property is readonly.

Return Value

string

Example

Display the short information about the loaded Rx medication, including its dosage that is returned as a string.

Dim aRxMedication
Dim aRxMedicationInfo  
 
Set aRxMedication = Profile.LoadRxMedication(1507)

if aRxMedication is nothing then 
  Profile.MsgBox("There is no Rx Medication with the specified ID")
  exit sub
end if

aRxMedicationInfo = _
  "Rx Name: " & aRxMedication.RxName & vbNewLine &_
  "Ordered date: " & aRxMedication.OrderedDate & vbNewLine &_ 
  "Dosage: " & aRxMedication.Dosage & vbNewLine &_
  "Dosage Line: " & aRxMedication.DosageLine & vbNewLine &_
  "Dose Max 24h: " & aRxMedication.DoseMax24h & vbNewLine 
if not aRxMedication.DosageUnit is nothing then 
  aRxMedicationInfo = aRxMedicationInfo & "Dosage Unit: " &_
    aRxMedication.DosageUnit.Name & vbNewLine
end if   
  
Profile.MsgBox(aRxMedicationInfo)

Note:

In Profile Client v8 on User Interface the string description of Dosage can be found in Clinical > Medical Record > MedChart > Medication Instruction.

Version information

Added in v7.10.100