Index: WS/TBX/OrderService/Verwerker.cls.xml
===================================================================
diff -u -r33 -r35
--- WS/TBX/OrderService/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 33)
+++ WS/TBX/OrderService/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 35)
@@ -91,10 +91,12 @@
 </Method>
 
 <Method name="GetMessageNotConfirmed">
+<Description>
+Deze method wordt gecontroleerd door UnitTest </Description>
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Status:%Status</FormalSpec>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $Case($$$GETERRORCODE(Status), $$$errOrderAlreadyConfirmed:"Order already confirmed", $$$errStartTypeIncorrect:"WSOrder start type not correct", :"Order not confirmed")
+<Implementation><![CDATA[	Quit $Case($$$GETERRORCODE(Status), $$$errOrderAlreadyConfirmed:"Order already confirmed", $$$errStartTypeIncorrect:"Order start type not correct", :"Order not confirmed")
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/WS/TBX/OrderService/Verwerker.cls.xml
===================================================================
diff -u
--- vhUnitTest/WS/TBX/OrderService/Verwerker.cls.xml	(revision 0)
+++ vhUnitTest/WS/TBX/OrderService/Verwerker.cls.xml	(revision 35)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhUnitTest.WS.TBX.OrderService.Verwerker">
+<IncludeCode>APPS.TBXWeb</IncludeCode>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>vhUnitTest.TestCase</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="TestBuildMessage">
+<Description>
+Oproepen via 
+	do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","WS.TBX.OrderService.Verwerker") </Description>
+<Implementation><![CDATA[
+	set Message = ##class(WS.TBX.OrderService.Verwerker).GetMessageNotConfirmed($$$ERROR($$$GeneralError,"Dummy text anything; e.g.: wsID not existing"))
+	do $$$AssertEquals("Order not confirmed",Message)
+	
+	set Message = ##class(WS.TBX.OrderService.Verwerker).GetMessageNotConfirmed($$$ERROR($$$errOrderAlreadyConfirmed,"Dummy text anything; e.g.: WSOrder is already confirmed"))
+	do $$$AssertEquals("Order already confirmed",Message)
+
+	set Message = ##class(WS.TBX.OrderService.Verwerker).GetMessageNotConfirmed($$$ERROR($$$errStartTypeIncorrect,"Dummy text anything; e.g.: WSOrder start type not correct"))
+	do $$$AssertEquals("Order start type not correct",Message)
+	
+	quit
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: WV GAProduct WWW.prj.xml
===================================================================
diff -u -r33 -r35
--- WV GAProduct WWW.prj.xml	(.../WV GAProduct WWW.prj.xml)	(revision 33)
+++ WV GAProduct WWW.prj.xml	(.../WV GAProduct WWW.prj.xml)	(revision 35)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
-<Project name="WV GAProduct WWW" LastModified="2011-09-14 13:03:48" Target="ophSendAlertMail^csp" TargetType="2" HttpServer="http://192.168.1.67:1972">
+<Project name="WV GAProduct WWW" LastModified="2011-09-14 14:27:35" Target="ophSendAlertMail^csp" TargetType="2" HttpServer="http://192.168.1.67:1972">
   <Items>
     <ProjectItem name="/csp/httplog/DLGqueryVH.csp" type="CSP"/>
     <ProjectItem name="/csp/httplog/queryVH.csp" type="CSP"/>
@@ -186,6 +186,7 @@
     <ProjectItem name="vhConsistency.Checks.NietVerwerkteTBXOrders" type="CLS"/>
     <ProjectItem name="vhDeploy.WV.Deploy20110905x0939" type="CLS"/>
     <ProjectItem name="vhUnitTest.APPS.TBXWeb.TestActies" type="CLS"/>
+    <ProjectItem name="vhUnitTest.WS.TBX.OrderService.Verwerker" type="CLS"/>
   </Items>
 </Project>
 </Export>
Index: WS/TBX/SFS/OrderServiceInternal.cls.xml
===================================================================
diff -u -r33 -r35
--- WS/TBX/SFS/OrderServiceInternal.cls.xml	(.../OrderServiceInternal.cls.xml)	(revision 33)
+++ WS/TBX/SFS/OrderServiceInternal.cls.xml	(.../OrderServiceInternal.cls.xml)	(revision 35)
@@ -74,7 +74,7 @@
 	{
 		// Alle andere exceptions en caché-errors worden hier gelogd+gemaild naar ICT 
 		Set ErrorMessage="Error in confirmation of order "_EDInr_".  Van Hoecke ICT has been notified."
-		Do Logger.ErrorMail("HAEFELE_ORDER",ErrorMessage_$$$CRLF_Exception.GeefOmschrijving()_"  "_Exception.ToString())
+		Do Logger.ErrorMail("SFS_ORDER",ErrorMessage_$$$CRLF_Exception.GeefOmschrijving()_"  "_Exception.ToString())
 	}
 	Do ..ReturnFault(##class(WS.WSServerFault).%New(ErrorMessage, ..#SERVICENAME, "CO"))
 ]]></Implementation>
FishEye: Tag 35 refers to a dead (removed) revision in file `vhUnitTest/WS/TBX/SFS/OrderServiceInternal.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?