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

95
MLMStripper/bin/Debug/FORM/FORM_LAB_PRIORITY_OPTIONS.mlm Normal file
View File

@@ -0,0 +1,95 @@
maintenance:
title: FORM_LAB_PRIORITY_OPTIONS;;
mlmname: FORM_LAB_PRIORITY_OPTIONS;;
arden: version 2;;
version: 4.50;;
institution: St Clair Isolation Set MLM;;
author: Eclipsys Corp;;
specialist: Shawn Head;;
date: 2014-11-24;;
validation: testing;;
library:
purpose: MLM will display either the custom priorities or system priorites and assign the proper schedule to the lab orders.
;;
explanation: This MLM can be called from any fields on a form that need to trigger the custom priority fields added to the lab forms.
This MLM will display a custom UDDI that has "user fiendly" descriptions. The called MLM SCH_LAB_PRIORITY_OPTIONS_CALLED
is the MLM that actually does all the logic. If there are other MLM{{{SINGLE-QUOTE}}}s already attached to form fields on the MLM then their is a section
commented out below that can be copied/pasted into other MLM{{{SINGLE-QUOTE}}}s to call the MLM properly. There are configuration pieces that Maria Pest
put in place for all this to work properly with the MLM. See the CSR request details for more information. This logic will work on both
Order forms and Order Set Forms.
Change History
2014.11.24 - STH CSR#: 32765 - Created MLM
2015.03.09 - STH CSR#: 32765 - Issues addressed based on users feed back (showing the time field disabled instead of hidding it,adding section for
order set calling, and making sure all fields are working from both order entry and being called from Order Sets).
;;
keywords: Called MLMs, Form fields, schedule
;;
knowledge:
type: data-driven;;
data:
// This MLM is passed three arguments, of types
// communication_type, form_type and client info object respectively.
(this_communication, // Communication object
this_form, // Form object
client_info_obj //Arden ClientInfo object
) := argument;
/*******************Make Changes To Spelling And Flags In This Section*******************/
/* These variables must containt he same wording as the options in the drop down list */
/***************************************************************************************/
// Initialize error message
error_message:="";
call_field := this_communication.CallingFieldName;
field_list:= this_form.fields;
DisplayNewScheduled := first of (field_list.Value
where field_list.DataItemName = "LAB_CB_Alternate Priorities");
if (DisplayNewScheduled) then
Call_UserFriendly_Lab_Priorities := mlm {{{SINGLE-QUOTE}}}SCH_LAB_PRIORITY_OPTIONS_CALLED{{{SINGLE-QUOTE}}};
(this_communication,this_form) := call Call_UserFriendly_Lab_Priorities with (this_communication,this_form,client_info_obj);
endif;
//testmlm := mlm {{{SINGLE-QUOTE}}}SCH_LAB_PRIORITY_OPTIONS_CALLED{{{SINGLE-QUOTE}}};
// (this_communication,this_form) := call testmlm with (this_communication,this_form,client_info_obj);
//--------THIS SECTION CAN BE COPIED TO OTHER MLM{{{SINGLE-QUOTE}}}S IF YOU NEED TO CALL THE CUSTOM LAB PRIORITIES MLM
/*
//-----------BEGIN COPY SECTION-------------------
DisplayNewScheduled := first of (field_list.Value
where field_list.DataItemName = "LAB_CB_Alternate Priorities");
if (DisplayNewScheduled) then
Call_UserFriendly_Lab_Priorities := mlm {{{SINGLE-QUOTE}}}SCH_LAB_PRIORITY_OPTIONS_CALLED{{{SINGLE-QUOTE}}};
(this_communication,this_form) := call Call_UserFriendly_Lab_Priorities with (this_communication,this_form,client_info_obj);
endif;
//-----------END COPY SECTION-------------------
//--------THIS SECTION CAN BE COPIED TO OTHER MLM{{{SINGLE-QUOTE}}}S IF YOU NEED TO CALL THE CUSTOM LAB PRIORITIES MLM*/
;;
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: