Initial Checking with all 820 MLMs

MLMStripper/bin/Debug/SCH/SCH_FUNC_PRINT.mlm

@@ -0,0 +1,70 @@
+maintenance:
+
+	title:  SCH_FUNC_PRINT;;
+	mlmname:  SCH_FUNC_PRINT;;
+	arden: version 2;;
+	version:  4.00;;
+	institution:  St Clair Memorial Hospital;;
+	author:  Don Warnick;;
+	specialist:  ;;
+	date:  2012-10-25;;
+	validation:  testing;;
+
+library:
+	purpose:  This MLM calls an Objects+ DLL (SCMPRINT.DLL)which processes SCM report requests 
+	;;
+	explanation: 
+
+Change history 
+    
+    10.25.2012   DW   Created
+ 
+	;;
+	keywords:
+	;;
+knowledge:
+	type: data-driven;;
+	data:
+		
+		log_execution_info:=FALSE;
+        if (Called_By_Editor = true) then triggerme := false; else triggerme := true; endif;
+
+     	(reportname, logicalprinter, physicalprinter) := ARGUMENT;
+
+     	reportname     := "" || reportname;
+        logicalprinter := "" || logicalprinter;
+	    physicalprinter:= "" || physicalprinter;
+
+		if  physicalprinter <> "" then physicalprinter:= "\\sc1drp1\" || physicalprinter; endif;
+
+		using "SCMPrint";                       /* 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}}}SCMPrintFromMLM.SCMPrintForm{{{SINGLE-QUOTE}}} with (reportname , logicalprinter , physicalprinter);
+
+	;;
+	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: