Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml
===================================================================
diff -u -r64472 -r64474
--- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64472)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64474)
@@ -33,10 +33,13 @@
 	Set ..Console = ##class(vhTest.Mock.TECH.Console.Console).%New()
 	Set ..ProductIdRecycleerder = ##class(WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.ProductIdRecycleerder).%New(..LadeVariantBepaler, ..ProductApi, ..Console)
 	Set ..ProductIdRecycleerder.GlobalNaam = "^ProductIdRecycleTEST"
-	Set ..ProductIdRecycleerder.LbxRange = "1000,1001,1002"
+	Set ..ProductIdRecycleerder.LbxRange = "1000,1001,1002,1003,1004,1005"
 	Set ..ProductIdRecycleerder.MvxRange = "1010,1011,1012"
 	Set ..ProductIdRecycleerder.TaxRange = "1020,1021,1022"
 	Set ..ProductIdRecycleerder.TbxRange = "1030,1031,1032"
+	
+	Kill ^ProductIdRecycleTEST
+	Kill ^KPRO(1000,0)
 ]]></Implementation>
 </Method>
 
@@ -55,25 +58,48 @@
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1000").DanReturn($$$False)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1001").DanReturn($$$True)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1002").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1003").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$False)
 	
-	Do ..Console.VerwachtMethodCall("WriteLine", "1 ProductIds in de range in gebruik: 1001-")
-	Do ..Console.VerwachtMethodCall("WriteLine", "2 beschikbare ProductId's in de range: 1000-1002-")
+	Do ..Console.VerwachtMethodCall("WriteLine", "1 ProductId's in de range in gebruik: 1001-")
+	Do ..Console.VerwachtMethodCall("WriteLine", "5 beschikbare ProductId's in de range: 1000-1002-1003-1004-1005-")
 	
 	Do ..ProductIdRecycleerder.CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).LBX())
 	Do ..Console.Verifieer()
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Meerdere ProductId&apos;s in de LBX-range zijn al in gebruik (in KPR)">
+<Implementation><![CDATA[
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1000").DanReturn($$$True)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1001").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1002").DanReturn($$$True)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1003").DanReturn($$$True)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$True)
+	
+	Do ..Console.VerwachtMethodCall("WriteLine", "4 ProductId's in de range in gebruik: 1000-1002-1003-1005-")
+	Do ..Console.VerwachtMethodCall("WriteLine", "2 beschikbare ProductId's in de range: 1001-1004-")
+	
+	Do ..ProductIdRecycleerder.CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).LBX())
+	Do ..Console.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Waarschuwing in Console indien het product bestaat in KPRO (maar niet meer in KPR)">
 <Implementation><![CDATA[
 	Set ^KPRO(1000,0) = "TEST"
 	
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1000").DanReturn($$$False)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1001").DanReturn($$$False)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1002").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1003").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$False)
 	
-	Do ..Console.VerwachtMethodCall("WriteLine", "0 ProductIds in de range in gebruik: ")
-	Do ..Console.VerwachtMethodCall("WriteLine", "3 beschikbare ProductId's in de range: 1000-1001-1002-")
+	Do ..Console.VerwachtMethodCall("WriteLine", "0 ProductId's in de range in gebruik: ")
+	Do ..Console.VerwachtMethodCall("WriteLine", "6 beschikbare ProductId's in de range: 1000-1001-1002-1003-1004-1005-")
 	
 	#dim KproTekst As %String = "1 ProductId's uit de range komen voor in ^KPRO: 1000- !!! OPGELET !!! Indien het over erg lage ProductId's gaat (heel oude), gelieve ze dan uit ^KPRO te verwijderen! "
 	Set KproTekst = KproTekst _ "Indien niet, gelieve dan andere ProductId's te gebruiken voor deze range!!! "
Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml
===================================================================
diff -u -r64472 -r64474
--- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64472)
+++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64474)
@@ -184,7 +184,7 @@
 		}
 	}
 	
-	Do ..Console.WriteLine(CountOnBeschikbareProductIdsInRange _ " ProductIds in de range in gebruik: " _ OnBeschikbareProductIdsInRange)
+	Do ..Console.WriteLine(CountOnBeschikbareProductIdsInRange _ " ProductId's in de range in gebruik: " _ OnBeschikbareProductIdsInRange)
 	Do ..Console.WriteLine(CountBeschikbareProductIdsInRange _ " beschikbare ProductId's in de range: " _ BeschikbareProductIdsInRange)
 	
 	If (CountAanwezigeProductIdsInKPRO > 0) {