Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml
===================================================================
diff -u -r64500 -r64505
--- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64500)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder/Test.cls.xml	(.../Test.cls.xml)	(revision 64505)
@@ -285,12 +285,11 @@
 <Implementation><![CDATA[
 	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..GeefRequest()
 	#dim LadeVariant As AXimpl.PM.enu.LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).LBX()
-	#dim LoggerMock As vhLib.Logger = ##class(vhTest.Mock.vhLib.Logger).%New("ProductIdRecycleerder")
 	#dim Range, UitbreidingRange As %String
 	#dim LoggingDetail As %String
 	#dim ForceerVolledigeReset As %Boolean = $$$True
 	
-	Set LoggerMock = ##class(vhTest.Mock.vhLib.Logger).%New("ProductIdRecycleerder")
+	#dim LoggerMock As vhLib.Logger = ##class(vhTest.Mock.vhLib.Logger).%New("ProductIdRecycleerder")
 	Set Range = "1000,1001,1002,1003,1004"
 	Set LoggingDetail = 				"De gepersisteerde range van LadeVariant '"_LadeVariant_"' werd volledig gereset. De data (Global "_..#GlobalNaam_") van alle ProductId's erin staat op false (0 = niet in gebruik). "
 	Set LoggingDetail = LoggingDetail _ "De volledige range is dus terug beschikbaar om gebruikt te worden door de ProductIdRecycleerder. "
@@ -331,6 +330,34 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: GeefProductIdVrij - Logging bij ProductId niet gevonden">
+<Implementation><![CDATA[
+	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..GeefRequest()
+	#dim LadeVariant As AXimpl.PM.enu.LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).LBX()
+	#dim Range As %String = "1000,1001,1002,1003,1004"
+	#dim ProductId As %String = "123456"
+	#dim LoggingDetail As %String
+	
+	#dim LoggerMock As vhLib.Logger = ##class(vhTest.Mock.vhLib.Logger).%New("ProductIdRecycleerder")
+	Set LoggingDetail = "Voor LadeVariant '"_LadeVariant_"' werden van de desbetreffende range (zie: property in ProductIdRecycleerder) alle voorheen nog niet gepersisteerde ProductId's zojuist gepersisteerd (Global "_..#GlobalNaam_"). "
+	Set LoggingDetail = LoggingDetail _ "Bij de eerstvolgende vraag om een ProductId in deze range zullen ze beschikbaar zijn om gebruikt te worden door de ProductIdRecycleerder. "
+	Set LoggingDetail = LoggingDetail _ "Volgende ProductId's werden zopas gepersisteerd: '" _ Range _ "'. "
+	Do LoggerMock.VerwachtMethodCall("Info", "Range gepersisteerd", LoggingDetail)
+	
+	Set LoggingDetail = "Er werd in de ProductIdRecycleerder, in functie van BOMBOL, gepoogd ProductId '"_ProductId_"' vrij te geven, maar dit werd niet teruggevonden in één van de gedefinieerde ranges. "
+	Set LoggingDetail = LoggingDetail _ "Er is waarschijnlijk niets fout gelopen voor de BOMBOL in kwestie, maar mogelijks dient er nog een variatie opgevangen te worden in de code. "
+	Do LoggerMock.VerwachtMethodCall("Error", "GeefLadeVariantVanRangeVolgensProductId", LoggingDetail)
+	
+	Set ProductIdRecycleerder = ##class(WSimpl.AX.CalculatedProduct.ProductVolgensAxAttribuutBepaler.ProductIdRecycleerder).%New(..LadeVariantBepaler, ..ProductApi, ..Console, LoggerMock)
+	Set ProductIdRecycleerder.LbxRange = Range
+	Set ProductIdRecycleerder.GlobalNaam = ..#GlobalNaam
+	
+	Do ProductIdRecycleerder.PersisteerRange(LadeVariant)
+	Do ProductIdRecycleerder.GeefProductIdVrij(ProductId)
+	Do LoggerMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Sequentie over LadeVarianten heen met tussendoor vrijgave van ProductId, range die op is, uitbreiding van range en ForceerVolledigeReset">
 <Implementation><![CDATA[
 	#dim LbxRequest As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..GeefRequest(##class(AXimpl.PM.enu.LadeVariant).LBX())
Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml
===================================================================
diff -u -r64500 -r64505
--- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64500)
+++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/ProductIdRecycleerder.cls.xml	(.../ProductIdRecycleerder.cls.xml)	(revision 64505)
@@ -255,9 +255,7 @@
 	#dim LadeVariantVanRangeVolgensProductId = ..GeefLadeVariantVanRangeVolgensProductId(ProductId)
 	#dim GlobalKey As %String
 	
-	If ($$$Not($$$HasLength(LadeVariantVanRangeVolgensProductId))) {
-		// Error-logging => ProductId niet gevonden in range om weer vrij te geven!
-	} Else {
+	If ($$$HasLength(LadeVariantVanRangeVolgensProductId)) {
 		Set GlobalKey = ..GlobalNaam_"("""_LadeVariantVanRangeVolgensProductId_""","_ProductId_")"
 		Set @GlobalKey = 0
 	}
@@ -271,6 +269,7 @@
 <Implementation><![CDATA[
 	#dim LadeVariant As AXimpl.PM.enu.LadeVariant
 	#dim RangeLijst As %ListOfDataTypes
+	#dim LoggingDetail As %String
 	
 	Set RangeLijst = ##class(TECH.ListUtils).PiecesToList(..GeefLBXRange(), ",")
 	Set LadeVariant = $$$If(##class(TECH.ListUtils).Contains(RangeLijst, ProductId), ##class(AXimpl.PM.enu.LadeVariant).LBX(), "")
@@ -291,7 +290,9 @@
 	}
 	
 	If ($$$Not($$$HasLength(LadeVariant))) {
-		// Logging => Voor ProductIdRecycleerder gezocht ProductId niet gevonden in de ProductId-ranges die ervoor gereserveerd zijn.
+		Set LoggingDetail = 				"Er werd in de ProductIdRecycleerder, in functie van BOMBOL, gepoogd ProductId '"_ProductId_"' vrij te geven, maar dit werd niet teruggevonden in één van de gedefinieerde ranges. "
+		Set LoggingDetail = LoggingDetail _ "Er is waarschijnlijk niets fout gelopen voor de BOMBOL in kwestie, maar mogelijks dient er nog een variatie opgevangen te worden in de code. "
+		Do ..Logger.Error("GeefLadeVariantVanRangeVolgensProductId", LoggingDetail)
 	}
 	
 	Quit LadeVariant