ISProfile.LoadOrderActions

Description

This function returns the order actions.

Syntax

object.LoadOrderActions(aPatientID, aOrderType, aDateFrom, aDateTo)

Part Attribute Type Description
object Required
The object always implements the ISProfile interface
aPatientID In, Required
int
ID of the patient
aOrderType In, Required
int
The type of order
aDateFrom In, Required
DateTime
The start date
aDateTo In, Required
DateTime
The end date

Return Value

ISList

Returns the order actions.

Example

Display the number of the order actions and some information about them.

Dim aPatient
Dim aPatientID
Dim aOrderType
Dim aDateFrom, aDateTo
Dim aOrderActions, aOrderAction
Dim aMessage
Dim i      

Set aPatient = Profile.SelectPatient
aPatientID = aPatient.ID
aOrderType = 1 'Pathology 
aDateFrom = #01/01/2000#
aDateTo = #01/01/2020#
set aOrderActions = Profile.LoadOrderActions(aPatientID, aOrderType, aDateFrom, aDateTo)

aMessage = "Order Actions Count: " & aOrderActions.Count & vbNewLine

for i = 0 to aOrderActions.Count - 1
  set aOrderAction = aOrderActions.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ". " &_
    "Description: " & aOrderAction.Description & vbNewLine &_
    "    Patient: " & Profile.LoadPatient(aOrderAction.PatientId).SurnameFirstName & vbNewLine &_ 
    "    Order Date: " & aOrderAction.OrderDate & vbNewLine &_  
    "    Actioned on: " & aOrderAction.ActionedOn & vbNewLine &_ 
    "    Contact Happen On: " & aOrderAction.ContactHappenOn & vbNewLine &_
    "    Bill: " & aOrderAction.Bill & vbNewLine &_ 
    "    OID: " & aOrderAction.OID & vbNewLine &_
    "    Link CID: "  & aOrderAction.LinkCID & vbNewLine &_ 
    "    Link OID: "  & aOrderAction.LinkOID & vbNewLine &_ 
    "    Provider: " & Profile.LoadProviderById(aOrderAction.ProviderID).FullName & vbNewLine &_
    "    Status: " & aOrderAction.Status & vbNewLine
next   

Profile.MsgBox(aMessage)  
Note:

In Profile Client v8 on User Interface Order Actions can be found in Clinical > Medical Record > Past Orders.

Version information

Added in v7.10.3