Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml
===================================================================
diff -u -r64475 -r64476
--- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64475)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64476)
@@ -62,6 +62,7 @@
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$False)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$True)
 	
+	Do ..Console.VerwachtMethodCall("WriteLine", "De in gebruik zijnde range voor LadeVariant 'LBX' wordt gecheckt... ")
 	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-")
 	
@@ -81,6 +82,7 @@
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$False)
 	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$False)
 	
+	Do ..Console.VerwachtMethodCall("WriteLine", "De in gebruik zijnde range voor LadeVariant 'LBX' wordt gecheckt... ")
 	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-")
 	
@@ -93,6 +95,35 @@
 	Do ..Console.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Meerdere ProductId&apos;s uit een middels komma delimited opgegeven string van ProductId&apos;s zijn al in gebruik (in KPR)">
+<Implementation><![CDATA[
+	#dim TeCheckenProductIds As %String = "1000,1001,1002,1003,1004,1005"
+	
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1000").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1001").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1002").DanReturn($$$True)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1003").DanReturn($$$False)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1004").DanReturn($$$True)
+	Do ..ProductApi.IndienMethodCall("BestaatProduct", "1005").DanReturn($$$False)
+	
+	Do ..Console.VerwachtMethodCall("WriteLine", "De middels komma delimited string opgegeven range (uitbreiding op bestaande range) wordt gecheckt... ")
+	Do ..Console.VerwachtMethodCall("WriteLine", "2 ProductId's in de range in gebruik: 1002-1004-")
+	Do ..Console.VerwachtMethodCall("WriteLine", "4 beschikbare ProductId's in de range: 1000-1001-1003-1005-")
+	
+	Do ..ProductIdRecycleerder.CheckRangeOpBeschikbaarheidProductIds(, TeCheckenProductIds)
+	Do ..Console.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Aan CheckRangeOpBeschikbaarheidProductIds werd geen parameter meegegeven">
+<Implementation><![CDATA[
+	Do ..Console.VerwachtMethodCall("WriteLine", "Er moet ofwel een LadeVariant (par 1) OFWEL een komma delimited ProductId-string (par 2) meegegeven worden om de check te kunnen uitvoeren. ")
+	
+	Do ..ProductIdRecycleerder.CheckRangeOpBeschikbaarheidProductIds()
+	Do ..Console.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml
===================================================================
diff -u -r64474 -r64476
--- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64474)
+++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64476)
@@ -5,9 +5,10 @@
 
 <Property name="LbxRange">
 <Description>
-HET UITBREIDEN VAN EEN RANGE KAN DOOR SIMPELWEG AAN ONDERSTAANDE PROPERTIES TOE TE VOEGEN. OPGELET: WEES ZEKER DAT TOEVOEGINGEN ONGEBRUIKTE PRNs ZIJN !!! Gebruik eventueel lokale method BestaatProduct("PRNr").
-BOVENDIEN: CHECK OOK ^KPRO !!! ALS HET OVER LAGE PRNs GAAT (oude) MOGEN/MOETEN DIE IN DE ^KPRO VERWIJDERD WORDEN, ANDERS GRAAG PRNs GEBRUIKEN DIE NIET IN DE ^KPRO ZITTEN !!! 
-Nota (info van PV): ^KPRO bestaat om details van facturen te kunnen tonen. Bij ontbreken wordt vermeld "onbekend product".</Description>
+HET UITBREIDEN VAN EEN RANGE KAN DOOR SIMPELWEG AAN ONDERSTAANDE PROPERTIES TOE TE VOEGEN. OPGELET: WEES ZEKER DAT TOEVOEGINGEN ONGEBRUIKTE PRNs ZIJN !!! 
+OM BIJ UITBREIDING DE NIEUWE PRNs TE CHECKEN KUN JE CheckRangeOpBeschikbaarheidProductIds("", ProductIdsAlsKommaDelString) GEBRUIKEN !!!
+BOVENDIEN CHECKED DEZE OOK DE ^KPRO. ALS HET OVER LAGE PRNs GAAT MOGEN/MOETEN DIE IN DE ^KPRO VERWIJDERD WORDEN (via deploy-klasje, vb: vhDeploy.D20210525xProductIdRecycleerderKproOpkuis).
+ANDERS GRAAG PRNs GEBRUIKEN DIE NIET IN DE ^KPRO ZITTEN !!! Nota (info van PV): ^KPRO bestaat om details van facturen te kunnen tonen. Bij ontbreken wordt vermeld "onbekend product".</Description>
 <Type>%String</Type>
 <InitialExpression>"3027,3028,3029,3030,3031,3032,3033,3034,3035,3036,3037,3038,3039,3040,3041,3042,3043,3044,3045,3046,3047,3048,3049,3050,3051,3052,3053,3054,3055,3056"</InitialExpression>
 </Property>
@@ -133,29 +134,23 @@
 <Method name="CheckAlleRangesOpBeschikbaarheidProductIds">
 <Description>
 Check alle ProductId's in de ranges of er al producten voor bestaan (via: BestaatProduct op ProductApi) en rapporteer in Console.
-Dit handelt NIET over de ranges zoals ze hier gebruikt worden (Global in ..GlobalNaam), maar over het gebruik in ^KPR !!!
+Dit gaat NIET over of de ProductId's al in de ranges zitten zoals ze hier gedefinieerd zijn (in de Global in ..GlobalNaam), maar of ze aanwezig zijn in ^KPR !!!
 M.a.w. dit geeft aan of de hier gebruikte ProductId-ranges effectief vrij voor gebruik zijn VOORALEER de ProductIdRecycleerder in gebruik genomen wordt.</Description>
 <Implementation><![CDATA[
-	Do ..Console.WriteLine("LBX: ")
 	Do ..CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).LBX())
-	
-	Do ..Console.WriteLine("MVX: ")
 	Do ..CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).MVX())
-	
-	Do ..Console.WriteLine("TAX: ")
 	Do ..CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).TAX())
-	
-	Do ..Console.WriteLine("TBX: ")
 	Do ..CheckRangeOpBeschikbaarheidProductIds(##class(AXimpl.PM.enu.LadeVariant).TBX())
 ]]></Implementation>
 </Method>
 
 <Method name="CheckRangeOpBeschikbaarheidProductIds">
 <Description>
 Check alle ProductId's in de range of er al producten voor bestaan (via: BestaatProduct op ProductApi) en rapporteer in Console.
-Dit handelt NIET over de ranges zoals ze hier gebruikt worden (Global in ..GlobalNaam), maar over het gebruik in ^KPR !!!
+I.g.v. UITBREIDING RANGES kan de 2e parameter gebruikt worden, om enkel de uitbreidende ProductId-range te testen.
+Dit gaat NIET over of de ProductId's al in de ranges zitten zoals ze hier gedefinieerd zijn (in de Global in ..GlobalNaam), maar of ze aanwezig zijn in ^KPR !!!
 M.a.w. dit geeft aan of de hier gebruikte ProductId-ranges effectief vrij voor gebruik zijn VOORALEER de ProductIdRecycleerder in gebruik genomen wordt.</Description>
-<FormalSpec>LadeVariant:AXimpl.PM.enu.LadeVariant</FormalSpec>
+<FormalSpec>LadeVariant:AXimpl.PM.enu.LadeVariant="",ProductIdsAlsKommaDelString:%String=""</FormalSpec>
 <Implementation><![CDATA[
 	#dim BeschikbareProductIdsInRange As %String = ""
 	#dim OnBeschikbareProductIdsInRange As %String = ""
@@ -164,8 +159,18 @@
 	#dim CountOnBeschikbareProductIdsInRange As %Integer = 0
 	#dim CountAanwezigeProductIdsInKPRO As %Integer = 0
 	#dim ProductId As %String
-	#dim Range As %String = ..GeefRangeVolgensLadeVariant(LadeVariant)
+	#dim Range As %String = ""
 	
+	If ($$$HasLength(LadeVariant)) {
+		Set Range = ..GeefRangeVolgensLadeVariant(LadeVariant)
+		Do ..Console.WriteLine("De in gebruik zijnde range voor LadeVariant '"_LadeVariant_"' wordt gecheckt... ")
+	} ElseIf ($$$HasLength(ProductIdsAlsKommaDelString)) {
+		Set Range = ProductIdsAlsKommaDelString
+		Do ..Console.WriteLine("De middels komma delimited string opgegeven range (uitbreiding op bestaande range) wordt gecheckt... ")
+	} Else {
+		Do ..Console.WriteLine("Er moet ofwel een LadeVariant (par 1) OFWEL een komma delimited ProductId-string (par 2) meegegeven worden om de check te kunnen uitvoeren. ")
+	}
+	
 	Set RangeIterator = ##class(TECH.StringIterator).%New(Range, ",")
 	While RangeIterator.HasNext() {
 		Set ProductId = RangeIterator.Next()
@@ -184,8 +189,10 @@
 		}
 	}
 	
-	Do ..Console.WriteLine(CountOnBeschikbareProductIdsInRange _ " ProductId's in de range in gebruik: " _ OnBeschikbareProductIdsInRange)
-	Do ..Console.WriteLine(CountBeschikbareProductIdsInRange _ " beschikbare ProductId's in de range: " _ BeschikbareProductIdsInRange)
+	If ((CountOnBeschikbareProductIdsInRange + CountBeschikbareProductIdsInRange) > 0) {
+		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) {
 		#dim KproTekst As %String = CountAanwezigeProductIdsInKPRO _ " ProductId's uit de range komen voor in ^KPRO: " _ AanwezigeProductIdsInKPRO
@@ -197,21 +204,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="BestaatProduct">
-<Description>
-Check los ProductId of er al een product voor bestaat en rapporteer in Console. Handig bij uitbreidingen van ranges.
-Dit handelt NIET over de ProductId's zoals ze hier gebruikt worden (Global in ..GlobalNaam), maar over het gebruik in ^KPR !!!
-M.a.w. dit geeft aan of de hier gebruikte ProductId effectief vrij voor gebruik is VOORALEER het in de ProductIdRecycleerder in gebruik genomen wordt.</Description>
-<FormalSpec>ProductId:%String</FormalSpec>
-<Implementation><![CDATA[
-	If (..ProductApi.BestaatProduct(ProductId)) {
-		Do ..Console.WriteLine("Voor ProductId '"_ ProductId _"' bestaat er al een product. Het is dus NIET vrij om hier aan een range toe te voegen!")
-	} Else {
-		Do ..Console.WriteLine("Voor ProductId '"_ ProductId _"' bestaat er nog geen product. Het is dus WEL vrij om hier aan een range toe te voegen!")
-	}
-]]></Implementation>
-</Method>
-
 <Method name="GeefProductIdVrij">
 <Description>
 Wordt aangeroepen vanuit WSimpl.AX.CalculatedProduct.RequestConverter om op het einde van de rit het ProductId weer vrij te geven.</Description>
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml
===================================================================
diff -u -r64472 -r64476
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64472)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64476)
@@ -15,20 +15,14 @@
 ]]></Implementation>
 </Method>
 
-<Method name="BestaatProduct">
-<FormalSpec>ProductId:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("BestaatProduct",ProductId)
-]]></Implementation>
-</Method>
-
 <Method name="CheckAlleRangesOpBeschikbaarheidProductIds">
 <Implementation><![CDATA[	do ..VerwerkMethodCall("CheckAlleRangesOpBeschikbaarheidProductIds")
 ]]></Implementation>
 </Method>
 
 <Method name="CheckRangeOpBeschikbaarheidProductIds">
-<FormalSpec>LadeVariant:AXimpl.PM.enu.LadeVariant</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("CheckRangeOpBeschikbaarheidProductIds",LadeVariant)
+<FormalSpec>LadeVariant:AXimpl.PM.enu.LadeVariant="",ProductIdsAlsKommaDelString:%String=""</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("CheckRangeOpBeschikbaarheidProductIds",LadeVariant,ProductIdsAlsKommaDelString)
 ]]></Implementation>
 </Method>