DanielR78/St.Clair
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial Checking with all 820 MLMs

Browse Source
This commit is contained in:
Daniel Romischer
2020-02-02 00:54:01 -05:00
parent c59dc6de2e
commit 840d0432f4
828 changed files with 239162 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

72
MLMStripper/bin/Debug/SCH/SCH_RETRIEVE_VANCOMYCIN_ANTIBIOTIC_SCHEDULE.mlm Normal file
View File

@@ -0,0 +1,72 @@
maintenance:
title: SCH_RETRIEVE_VANCOMYCIN_ANTIBIOTIC_SCHEDULE;;
mlmname: SCH_RETRIEVE_VANCOMYCIN_ANTIBIOTIC_SCHEDULE;;
arden: version 2.5;;
version: 6.10;;
institution: Allscripts;;
author: Juliet M. Law;;
specialist: Teresa Spicuzza;;
date: 2011-07-25;;
validation: testing;;
library:
purpose: TEST
;;
explanation:
;;
keywords:
;;
knowledge:
type: data-driven;;
data:
//.Net libraries
standard_libs := mlm {{{SINGLE-QUOTE}}}std_include_libs{{{SINGLE-QUOTE}}};
include standard_libs;
//Local session object
local_session := cds_session.local;
/*******************************************************************/
//Set to true if logging needed
log_execution_info := false;
//Set the text for this variable to indicate whether to send the message or not
send_alert := "DoNotSend";
vanco_enter_event := EVENT { OrderEnter User Order : WHERE Name = "Vancomycin:"};
/*******************************************************************/
//Unit testing
if called_by_editor then
evokingobject := read last {Order : THIS where Name = "Vancomycin:"};
endif;
//Capture current patient
(clientGuid, clientName, client_clientId_obj) := read last {ClientInfo : GUID, DisplayName, ClientID };
clientVisitGuid := read last {ClientVisit : GUID};
chartGuid := read last {ClientVisit : ChartGUID};
if ( EvokingObject.OrderSetName <> "Pneumonia Antibiotic" AND EvokingObject.OrderSetName <> "Skin Antibiotic Inpatient" //AND EvokingObject.OrderSetName <> "Vancomycin Orders"
AND EvokingObject.OrderSetName <> "Sepsis Unknown Source Antibiotic" ) then
local_session.SessionVancoTroughScheduledDate := read last { Order : RequestedDate REFERENCING EvokingObject };
local_session.SessionVancoTroughScheduledTime := read last { Order : RequestedTime REFERENCING EvokingObject };
local_session.SessionVancoTroughFrequency := read last { Order : FrequencyCode REFERENCING EvokingObject };
endif;
;;
priority: 25
;;
evoke:
vanco_enter_event;
;;
logic:
conclude true;
;;
action:
;;
Urgency: 25;;
end: