Index: AXimpl/Admin/VKP/OrderLijnLookup.cls.xml
===================================================================
diff -u -r45650 -r45651
--- AXimpl/Admin/VKP/OrderLijnLookup.cls.xml	(.../OrderLijnLookup.cls.xml)	(revision 45650)
+++ AXimpl/Admin/VKP/OrderLijnLookup.cls.xml	(.../OrderLijnLookup.cls.xml)	(revision 45651)
@@ -41,14 +41,14 @@
 	Set Query = ##class(TECH.DynamicQuery).%New("SELECT ID FROM Flow_Order.Lijn WHERE AxInventTransId = ?",$ListBuild(AxInventTransId))
 	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(Query)
 	#dim OrderLijnID As %String = ""
-	if ResultSet.Next() {
+	If ResultSet.Next() {
 		Set OrderLijnID = ResultSet.GetDataByName("ID")
-		if ResultSet.Next() {
+		If ResultSet.Next() {
 			Set Exception  = ##class(AXimpl.Admin.DatabaseOutOfSyncException).%New(##class(AXimpl.Admin.EntiteitType).OrderLijn(), AxInventTransId , OrderLijnID _","_ ResultSet.GetDataByName("ID"))
 			Do Exception.VoegToeExtraInfo("Minstens 2 orderlijnen met dezelfde AxInventTransId gevonden")
 			Do ##class(TECH.ExceptionHandler).Throw(Exception)			
 		}		
-	} else {
+	} Else {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(AXimpl.Admin.DatabaseOutOfSyncException).%New(##class(AXimpl.Admin.EntiteitType).OrderLijn(),AxInventTransId,""))		
 	}
 	
Index: vhUnitTest/AXimpl/Admin/VKP/OrderLijnLookup/Test.cls.xml
===================================================================
diff -u -r45650 -r45651
--- vhUnitTest/AXimpl/Admin/VKP/OrderLijnLookup/Test.cls.xml	(.../Test.cls.xml)	(revision 45650)
+++ vhUnitTest/AXimpl/Admin/VKP/OrderLijnLookup/Test.cls.xml	(.../Test.cls.xml)	(revision 45651)
@@ -27,7 +27,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test prepare query statement en Bevestigd Order bestaat">
+<Method name="Test: prepare query statement en OrderLijn bestaat">
 <Implementation><![CDATA[
 	#dim OrderLijnDummy As Flow.Offerte.Lijn = ##class(vhTest.Utils.Flow.Offerte.Lijn).LeegOrderLijn()
 	
@@ -47,16 +47,17 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test prepare query statement en meerdere bevestigde OrderLijnen gevonden">
+<Method name="Test: prepare query statement en meerdere OrderLijnen gevonden">
 <Implementation><![CDATA[
 	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
 	#dim Values as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes($ListBuild("1000"),$ListBuild("1001"))
 	Set QueryAPIFake = ##class(vhTest.Fake.TECH.Query.PrepareOnlyQueryAPI).%New(Values,Columns)
 	
-	Set OrderLijnRepositoryMock = ##class(vhTest.Mock.DOM.VKP.Order.impl.OrderLijnRepository).%New()
-	Do OrderLijnRepositoryMock.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn("")
+	Set OrderLijnRepositoryStub = ##class(vhTest.Mock.DOM.VKP.Order.impl.OrderLijnRepository).%New()
+	Do OrderLijnRepositoryStub.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn("DummyOrderLijnID")
 
-	Set OrderLijnLookup = ##class(AXimpl.Admin.VKP.OrderLijnLookup).%New(QueryAPIFake, OrderLijnRepositoryMock)
+	Set OrderLijnLookup = ##class(AXimpl.Admin.VKP.OrderLijnLookup).%New(QueryAPIFake, OrderLijnRepositoryStub)
+	
 	Try {		
 		#dim OrderLijn as %String = OrderLijnLookup.GeefOrderLijn("AxInventTransId")
 		Do ..Fail("Er werd een exceptie verwacht")
@@ -69,23 +70,23 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test prepare query statement en Bevestigd Order niet gevonden">
+<Method name="Test: prepare query statement en OrderLijn niet gevonden">
 <Implementation><![CDATA[
-	Set OrderLijnRepositoryMock = ##class(vhTest.Mock.DOM.VKP.Order.impl.OrderLijnRepository).%New()
-	Do OrderLijnRepositoryMock.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn("")
+	Set OrderLijnRepositoryStub = ##class(vhTest.Mock.DOM.VKP.Order.impl.OrderLijnRepository).%New()
+	Do OrderLijnRepositoryStub.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn("DummyOrderLijnID")
 
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("!!! Ernstig probleem : OrderLijn is niet meer in sync - AxId : 'AxInventTransId' - AdminId : '' !!!!")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(AXimpl.Admin.DatabaseOutOfSyncException).%ClassName($$$True),Substrings))
 	
 	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
 	Set QueryAPIFake = ##class(vhTest.Fake.TECH.Query.PrepareOnlyQueryAPI).%New("",Columns)
 	
-	Set OrderLijnLookup = ##class(AXimpl.Admin.VKP.OrderLijnLookup).%New(QueryAPIFake, OrderLijnRepositoryMock)
+	Set OrderLijnLookup = ##class(AXimpl.Admin.VKP.OrderLijnLookup).%New(QueryAPIFake, OrderLijnRepositoryStub)
 	Do OrderLijnLookup.GeefOrderLijn("AxInventTransId")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: foutmelding indien OrderLijn_OrderID niet hetzelfde is als het OrderID">
+<Method name="Test: foutmelding indien OrderLijn_OrderID niet hetzelfde is als het opgegeven OrderID">
 <Implementation><![CDATA[
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("!!! Ernstig probleem : OrderLijn is niet meer in sync - AxId : 'OrderID' - AdminId : 'OrderLijn.AnderOrderID' !!!!")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(AXimpl.Admin.DatabaseOutOfSyncException).%ClassName($$$True),Substrings))