Index: AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml
===================================================================
diff -u -r41538 -r41543
--- AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml	(.../VrijgegProductDixfConverter.cls.xml)	(revision 41538)
+++ AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml	(.../VrijgegProductDixfConverter.cls.xml)	(revision 41543)
@@ -54,6 +54,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DateTimeApi">
+<Type>TECH.DateTime.DateTimeAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>DataDefinitieService:BL.Prod.Kenmerk.DataDefinitieService,VoorraadBewegingService:BL.Prod.VoorraadBewegingService</FormalSpec>
 <Private>1</Private>
@@ -63,6 +68,7 @@
 <Implementation><![CDATA[
 	Set ..DataDefinitieService = $$$Inject(DataDefinitieService,##class(BL.Prod.Kenmerk.DataDefinitieService).%New())
 	Set ..VoorraadBewegingService = $$$Inject(VoorraadBewegingService,##class(BL.Prod.VoorraadBewegingService).%New())
+	Set ..DateTimeApi = ##class(TECH.Context).Instance().GeefDateTimeAPI()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -981,7 +987,7 @@
 	
 	If (Product.Basis.ScanType = "L") {
 		Set ItemBuyerGroupIdVH = "Logsteuer"
-	} ElseIf (VoorraadBeweging.Datum > (##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate() - 180)) {
+	} ElseIf (VoorraadBeweging.Datum > (..DateTimeApi.CurrentDate() - 180)) {
 		Set ItemBuyerGroupIdVH = "Nieuw"	
 	} ElseIf (Product.Basis.Uitverkoop '= "") {
 		Set ItemBuyerGroupIdVH = "Uitlopend"