The medical data which will be used in the form that calls the macro with this parameter.
object.MedData
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISRxInstructionParams interface |
Fill in the Instruction Params form.
sub main()
Dim aInstruction
Set aInstruction = InstructionParams.Instruction
aInstruction.ProviderID = Profile.LoadProvider("MM").ID
if InstructionParams.Patient.Sex = "M" then
aInstruction.Dosage = 2
aInstruction.Dosage2 = 3
else
aInstruction.Dosage = 3
aInstruction.Dosage2 = 4
end if
aInstruction.StartDate = Now
aInstruction.ExpectedEndDate = Now + 5
InstructionParams.MedData.Date = Now
end sub
In Profile Client v8 on User Interface Instruction Params form can be found in
.