Initial Checking with all 820 MLMs

This commit is contained in:
2020-02-02 00:54:01 -05:00
parent c59dc6de2e
commit 840d0432f4
828 changed files with 239162 additions and 0 deletions

View File

@@ -0,0 +1,60 @@
maintenance:
title: FORM_ORDER_MANAGEMENT_EXAMPLE_MLM;;
mlmname: FORM_ORDER_MANAGEMENT_EXAMPLE_MLM;;
arden: version 2;;
version: 4.50;;
institution: St Clair Memorial Hospital;;
author: Don Warnick;;
specialist: Don Warnick;;
date: 2016-04-22;;
validation: testing;;
library:
purpose: This MLM calls the launch MLM that launches the Order Management DLL
THIS MLM IS FOR DEMONSTRATION PURPOSES. IT IS ONLY IN DEV AND IS NOT IN PRODUCTION STATUS
;;
explanation:
Change history
04.22.2016 DW Created
;;
keywords: Example MLM
;;
knowledge:
type: data-driven;;
data:
(this_communication, this_form, client_info_obj) := argument;
log_execution_info := FALSE;
// Pass these fields to the launching MLM This Order Name | Form Type | Conflicting Order GUIDS | Order Source | Requesting Provider GUID | Order Type |
Launch_Order_Management_MLM := mlm {{{SINGLE-QUOTE}}}SCH_LAUNCH_ORDER_MANAGEMENT{{{SINGLE-QUOTE}}};
OrderInformation := "Codeine 30mg Tab|Q|{{{SINGLE-QUOTE}}}9001415601100680{{{SINGLE-QUOTE}}},{{{SINGLE-QUOTE}}}9001415601100680{{{SINGLE-QUOTE}}}|Per Written Order|9000001090119001|Pharmacy|";
returndata := call Launch_Order_Management_MLM with (OrderInformation);
// A 2 character combination will be retuned Character#1 = Was at least one prior order deleted? (Y or N) Character#2 = Was the new order abandoned? (Y or N)
this_communication.Message := "This information was returned from the Order Management application"
|| "\n\n " || returndata
|| "\n\n Note : A combination of Y and N is normal."; this_communication.MessageType := "Informational";
;;
evoke: // No evoke statement
;;
logic:
conclude true;
;;
action:
// This MLM returns two parameters, of types communication_type and form_type respectively.
return this_communication, this_form;
;;
end: