maintenance: title: SCH_FUNC_PAGE;; mlmname: SCH_FUNC_PAGE;; arden: version 2;; version: 4.00;; institution: St Clair Memorial Hospital;; author: Don Warnick;; specialist: Don Warnick;; date: 2014-12-01;; validation: testing;; library: purpose: This MLM calls an Objects+ DLL (SCMPage.DLL)which processes SCM paging requests ;; explanation: Change history 12.01.2014 DW CSR# 32793 - Foreign Travel Alert (created this new generic alert to be used for future SCM text messaging processess) ;; keywords: ;; knowledge: type: data-driven;; data: log_execution_info:=FALSE; if (Called_By_Editor = true) then triggerme := false; else triggerme := true; endif; (PhoneNumber, MessageSubject, MessageBody) := ARGUMENT; PhoneNumber := "" || PhoneNumber; MessageSubject:= "" || MessageSubject; MessageBody := "" || MessageBody; using "SCMPage"; /* DLL Name */ using namespace "ResultsQuickViewerx"; /* Do not understand purpose...DLL funcional even if this is misspelled */ standard_libs := mlm {{{SINGLE-QUOTE}}}std_include_libs{{{SINGLE-QUOTE}}}; include standard_libs; using "ObjectsPlusXA.SCM.Forms"; using namespace "ObjectsPlusXA.SunriseClinicalManager.Forms"; /* Namespace.Form */ test:= new net_object {{{SINGLE-QUOTE}}}SCMPageFromMLM.SCMPageForm{{{SINGLE-QUOTE}}} with (PhoneNumber , MessageSubject , MessageBody); ;; evoke: /* Call MLM */ ;; logic: if (triggerme = true) then oeUnsigned:=CALL test.ShowDialog; // oeUnsigned:=CALL test.Show; conclude true; else conclude false; endif; ;; action: //all of the action is done by the call to the FFI ;; Urgency: 50;; end: