141 lines
4.8 KiB
Plaintext
141 lines
4.8 KiB
Plaintext
maintenance:
|
|
|
|
title: CALLED_DOC_FS_DEFINITION_MLM;;
|
|
mlmname: CALLED_DOC_FS_DEFINITION_MLM;;
|
|
arden: version 2.5;;
|
|
version: 5.50;;
|
|
institution: St. Clair Hospital;;
|
|
author: Juliet M. Law;;
|
|
specialist: ;;
|
|
date: 2011-09-22;;
|
|
validation: testing;;
|
|
|
|
library:
|
|
purpose: Standardize the document mlm responsible for variable assignment and debugging.
|
|
Specific to flowsheets.
|
|
;;
|
|
explanation:
|
|
;;
|
|
keywords: RTF, Document Called MLM , list, debug, displayMessageFlag
|
|
;;
|
|
knowledge:
|
|
type: data-driven;;
|
|
data:
|
|
(this_documentCommunication) := argument;
|
|
|
|
log_execution_info := false;
|
|
|
|
(displayMessageFlag) := false;
|
|
(client_guid) := this_documentCommunication.ClientGUID;
|
|
(client_visit_guid) := this_documentCommunication.ClientVisitGUID;
|
|
(chart_guid) := this_documentCommunication.ChartGUID;
|
|
(user_guid) := this_documentCommunication.UserGUID;
|
|
(document_type) := this_documentCommunication.DocumentType;
|
|
(document_name) := this_documentCommunication.DocumentName;
|
|
(event_type) := this_documentCommunication.EventType;
|
|
(configuration_guid) := this_documentCommunication.ConfigurationGUID;
|
|
(this_currentObs) := this_documentCommunication.CurrentObservationObj;
|
|
(CancelEventFlag) := this_documentCommunication.CancelEvent;
|
|
(this_fs_doc) := this_documentCommunication.DocumentConfigurationObj;
|
|
|
|
(authored_by_guid) := this_fs_doc.AuthoredByGUID;
|
|
(isIOFlowsheetFlag) := this_fs_doc.IsIOFlowsheet;
|
|
(client_document_guid) := this_fs_doc.CurrentColumn.ClientDocumentGUID;
|
|
(this_parameters) := this_fs_doc.ParametersList;
|
|
(this_columnList) := this_fs_doc.ColumnsList;
|
|
(this_currentColumn) := this_fs_doc.CurrentColumn;
|
|
(this_chartedObservationsList) := this_fs_doc.CurrentColumn.ChartedObservationsList;
|
|
|
|
(this_parameters_displayName) := this_parameters.DisplayName;
|
|
|
|
if (event_type = "DocumentClosing") then
|
|
current_parameter := first of (this_parameters WHERE
|
|
this_parameters.ParameterGUID = this_currentObs.ParameterGUID);
|
|
current_parameter_name := current_parameter.Name;
|
|
current_parameter_guid := current_parameter.ParameterGUID;
|
|
current_parameter_datatype := current_parameter.DataType;
|
|
|
|
if (current_parameter_datatype IS IN ("FreeTextValue", "NumericValue", "DateValue")) then
|
|
current_value := this_currentObs.ValueObj.Value;
|
|
elseif (current_parameter_datatype = "ListValue") then
|
|
selectedItems := (this_currentObs.ValueObj.ListItemsList
|
|
WHERE this_currentObs.ValueObj.ListItemsList.IsSelected = true);
|
|
|
|
selectedItems_Value := selectedItems.Value;
|
|
countOf_selectedItems := count of selectedItems_Value;
|
|
current_value := first of selectedItems_Value;
|
|
endif;
|
|
|
|
if (current_parameter_name = "debug_message" AND exists current_value) then
|
|
displayMessageFlag := true;
|
|
endif;
|
|
endif;
|
|
|
|
diagnostic_message := ("CALLED_DOC_FS_DEFINITION_MLM \n"
|
|
|| "\n client guid: " || client_guid
|
|
|| "\n client visit guid: " || client_visit_guid
|
|
|| "\n chart guid: " || chart_guid
|
|
|| "\n user guid: " || user_guid
|
|
|| "\n document type: " || document_type
|
|
|| "\n document name: " || document_name
|
|
|| "\n event type: " || event_type
|
|
|| "\n configuration guid: " || configuration_guid
|
|
|| "\n current obs: " || this_currentObs
|
|
|| "\n cancel event flag: " || CancelEventFlag
|
|
|| "\n this flowsheet doc: " || this_fs_doc
|
|
|| "\n authored by guid: " || authored_by_guid
|
|
|| "\n IO flowsheet flag: " || isIOFlowsheetFlag
|
|
|| "\n client document guid: " || client_document_guid
|
|
|| "\n current parameter: " || current_parameter
|
|
|| "\n current parameter name: " || current_parameter_name
|
|
|| "\n current parameter guid: " || current_parameter_guid
|
|
|| "\n current parameter datatype: " || current_parameter_datatype
|
|
|| "\n current value: " || current_value
|
|
|| "\n selected items: " || selectedItems
|
|
|| "\n selected items value: " || selectedItems_Value
|
|
|| "\n count of selected items value: " || countOf_selectedItems
|
|
|| "\n"
|
|
);
|
|
;;
|
|
priority: 50
|
|
;;
|
|
evoke:
|
|
;;
|
|
logic:
|
|
conclude true;
|
|
;;
|
|
action:
|
|
return (this_documentCommunication,
|
|
client_guid,
|
|
client_visit_guid,
|
|
chart_guid,
|
|
user_guid,
|
|
document_type,
|
|
document_name,
|
|
event_type,
|
|
configuration_guid,
|
|
this_currentObs,
|
|
CancelEventFlag,
|
|
this_fs_doc,
|
|
authored_by_guid,
|
|
isIOFlowsheetFlag,
|
|
client_document_guid,
|
|
this_parameters,
|
|
this_columnList,
|
|
this_currentColumn,
|
|
this_chartedObservationsList,
|
|
this_parameters_displayName,
|
|
current_parameter,
|
|
current_parameter_name,
|
|
current_parameter_guid,
|
|
current_parameter_datatype,
|
|
selectedItems,
|
|
selectedItems_Value,
|
|
current_value,
|
|
diagnostic_message,
|
|
displayMessageFlag
|
|
);
|
|
;;
|
|
Urgency: 50;;
|
|
end:
|