Index: WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml
===================================================================
diff -u -r68051 -r68974
--- WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml	(.../LadeVariantBepaler.cls.xml)	(revision 68051)
+++ WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml	(.../LadeVariantBepaler.cls.xml)	(revision 68974)
@@ -66,6 +66,8 @@
 		Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX()
 	} ElseIf (..ProductTypeApi.IsAntislipmatProduct(ProductId)) {
 		Set LadeVariant = "MAT"
+	} ElseIf (..ProductTypeApi.IsRevegoProduct(ProductId)) {
+		Set LadeVariant = "RVG"
 	}
 	
 	Quit LadeVariant
@@ -100,8 +102,10 @@
 		Set LadeVariant = "MAT"
 	} ElseIf (..LadeVariantVolgensAxKenmerken = "MVX") {
 		Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX()
-	}ElseIf (..LadeVariantVolgensAxKenmerken = "TAX") {
+	} ElseIf (..LadeVariantVolgensAxKenmerken = "TAX") {
 		Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX()
+	} ElseIf (..LadeVariantVolgensAxKenmerken = "RVG") {
+		Set LadeVariant = "RVG"
 	} 
 	
 	Quit LadeVariant
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/LadeVariantBepaler/Test.cls.xml
===================================================================
diff -u -r64169 -r68974
--- vhUnitTest/WSimpl/AX/CalculatedProduct/LadeVariantBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 64169)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/LadeVariantBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 68974)
@@ -99,6 +99,7 @@
 	Do ProductTypeApiStub.VerwachtMethodCall("IsLegraboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsTAORboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsMerivoboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsRevegoProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	
 	Set ..ProductTypeApi = ProductTypeApiStub
 	
@@ -123,6 +124,7 @@
 	Do ProductTypeApiStub.VerwachtMethodCall("IsLegraboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsTAORboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsMerivoboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsRevegoProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	
 	Set ..ProductTypeApi = ProductTypeApiStub
 	
@@ -147,6 +149,7 @@
 	Do ProductTypeApiStub.VerwachtMethodCall("IsLegraboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsTAORboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsMerivoboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsRevegoProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	
 	Set ..ProductTypeApi = ProductTypeApiStub
 	
@@ -171,13 +174,39 @@
 	Do ProductTypeApiStub.VerwachtMethodCall("IsLegraboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsTAORboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	Do ProductTypeApiStub.VerwachtMethodCall("IsMerivoboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsRevegoProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
 	
 	Set ..ProductTypeApi = ProductTypeApiStub
 	
 	Do ..Assert(KenmerkenLijst, ##class(AXimpl.PM.enu.LadeVariant).MVX())
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Als bepaling LadeVariant via ProductTypeApi leeg geeft =&gt; LadeVariant ophalen uit Kenmerken =&gt; RVG">
+<Implementation><![CDATA[
+	#dim AxVariant As %String = "RVG"
+	
+	#dim Kenmerk As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New()
+	Set Kenmerk.Name = "Data.Kenmerken.Variant"
+	Set Kenmerk.ValueTxt = AxVariant
+	
+	#dim KenmerkenLijst As %ListOfObjects = ##class(%ListOfObjects).%New()
+	Do KenmerkenLijst.Insert(Kenmerk)
+	
+	Set ProductTypeApiStub  = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).%New()
+	Do ProductTypeApiStub.VerwachtMethodCall("IsAntislipmatProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsTandemboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsLegraboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsTAORboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsMerivoboxProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	Do ProductTypeApiStub.VerwachtMethodCall("IsRevegoProduct", ..#RandomProductId).ExactAantalKeer(1).DanReturn($$$False)
+	
+	Set ..ProductTypeApi = ProductTypeApiStub
+	
+	Do ..Assert(KenmerkenLijst, "RVG")
+]]></Implementation>
+</Method>
+
 <Method name="GeefLadeVariantBepaler">
 <Private>1</Private>
 <ReturnType>WSimpl.AX.CalculatedProduct.LadeVariantBepaler</ReturnType>