Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml
===================================================================
diff -u -r47950 -r48129
--- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 47950)
+++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/ConversieBezwarenBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 48129)
@@ -51,7 +51,6 @@
 	Do ..ProductTypeAPIMock.VerwachtMethodCall("IsOrgaluxOpMaat","ProductID").DanReturn($$$False)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),0)
 	
@@ -67,7 +66,6 @@
 	Set Bericht.JournalTable.GetAt(1).JournalTrans.GetAt(1).CustVendAccount = ""
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Leverancier is niet ingevuld.")
@@ -83,7 +81,6 @@
 	Do ..AankoopAPIMock.IndienMethodCall("GeefLeverancier","L||1234").DanReturn(LeverancierMock)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Product is niet ingevuld.")
@@ -104,7 +101,6 @@
 	Do ..ProductTypeAPIMock.VerwachtMethodCall("IsOrgaluxOpMaat","ProductID").DanReturn($$$False)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Terugname voor Halux kan niet.")
@@ -121,7 +117,6 @@
 	Set Bericht.JournalTable.GetAt(1).LegalEntityId = "hlx"
 		
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Leverancier met SupplierID '01234' niet gekend voor Halux.")
@@ -136,9 +131,9 @@
 	Do ..AankoopAPIMock.IndienMethodCall("GeefLeverancier","L||1234").DanException(InvalidInputException)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
+	Do $$$AssertEquals(Bezwaren.GetAt(1),"Leverancier met AX id '01234' niet gekend in Admin.")
 ]]></Implementation>
 </Method>
 
@@ -153,7 +148,6 @@
 	Do ..ProductLookupMock.IndienMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||1234","").DanException(InvalidInputException)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Product met AX id 'Identnummer' niet gevonden voor leverancier met AX SupplierId '01234' / Cache LeverancierId 'L||1234'.")
@@ -174,7 +168,6 @@
 	Do ..ProductLookupMock.IndienMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||1234","SoprContractId").DanException(InvalidInputException)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"SOPR Product met AX id 'Identnummer' en SOPR ContractId 'SoprContract' niet gevonden voor leverancier met AX SupplierId '01234' / Cache LeverancierId 'L||1234'.")
@@ -194,11 +187,9 @@
 	Do ..ProductTypeAPIMock.VerwachtMethodCall("IsOrgaluxOpMaat","ProductID").DanReturn($$$False)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Product met AX id 'Identnummer' is maatwerk en kan niet gerecepteerd worden.")
-
 	
 	Do ..AankoopAPIMock.Verifieer()
 	Do ..ProductLookupMock.Verifieer()
@@ -217,7 +208,6 @@
 	Do ..ProductTypeAPIMock.VerwachtMethodCall("IsOrgaluxOpMaat","ProductID").DanReturn($$$True)
 	
 	#dim Bezwaren as %ListOfDataTypes = ..BezwarenBepaler.GeefBezwaren(Bericht)
-	Do ##class(Tools.Wlip).%New(207).String(##class(TECH.ListUtils).ListToPieces(Bezwaren,$$$CRLF))
 	
 	Do $$$AssertEquals(Bezwaren.Count(),1)
 	Do $$$AssertEquals(Bezwaren.GetAt(1),"Product met AX id 'Identnummer' is Orgalux op maat en kan niet gerecepteerd worden.")