Index: WS/TBX/Order.cls.xml
===================================================================
diff -u -r40353 -r40439
--- WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 40353)
+++ WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 40439)
@@ -70,7 +70,7 @@
 <Implementation><![CDATA[
 	// Controle ShowInHist
 	If (..ShowInHist="") {
-		Do ##class(vhLib.Logger).%New("TBXWeb").WarningMail("CHECK_SAVE_VALUES","De waarde ShowInHist is leeg (WSOrd="_..mID_"). "_$$$CRLF_"Uitzoeken welke code hiervoor verantwoordelijk is! "_$$$CRLF_$$GetStackToString^vhLib())
+		Do ##class(vhLib.Logger).%New("TBXWeb").WarningMail("CHECK_SAVE_VALUES","De waarde ShowInHist is leeg (WSOrd="_..mID_"). "_$$$CRLF_"Uitzoeken welke code hiervoor verantwoordelijk is! "_$$$CRLF_$$GetStackToString^vhLib.System())
 	}
 	Quit $$$OK
 ]]></Implementation>