Index: DOM/PM/ProductTypeAPI.cls.xml
===================================================================
diff -u -r68048 -r68722
--- DOM/PM/ProductTypeAPI.cls.xml	(.../ProductTypeAPI.cls.xml)	(revision 68048)
+++ DOM/PM/ProductTypeAPI.cls.xml	(.../ProductTypeAPI.cls.xml)	(revision 68722)
@@ -70,6 +70,12 @@
 <ReturnType>%Boolean</ReturnType>
 </Method>
 
+<Method name="IsRevegoProduct">
+<Abstract>1</Abstract>
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
 <Method name="IsSpaceTowerProduct">
 <Abstract>1</Abstract>
 <FormalSpec>ProductID:%String</FormalSpec>
Index: DOM/PM/impl/ProductTypeAPIimpl.cls.xml
===================================================================
diff -u -r68058 -r68722
--- DOM/PM/impl/ProductTypeAPIimpl.cls.xml	(.../ProductTypeAPIimpl.cls.xml)	(revision 68058)
+++ DOM/PM/impl/ProductTypeAPIimpl.cls.xml	(.../ProductTypeAPIimpl.cls.xml)	(revision 68722)
@@ -36,6 +36,7 @@
 	ElseIf ..IsMDSProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).MDS()}
 	ElseIf ..IsMerivoboxProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).Merivobox()}
 	ElseIf ..IsInkortingProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).Inkorting()}
+	ElseIf ..IsRevegoProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).Revego()}
 	ElseIf ..IsOrgaluxProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).Orgalux()}
 	ElseIf ..IsTandemboxProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).Tandembox()}
 	ElseIf ..IsTAORboxProduct(ProductID) { Set ProductType = ##class(DOM.PM.enu.ProductType).TAORbox()}
@@ -137,6 +138,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsRevegoProduct">
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Do ..ControleerOfProductBestaat(ProductID)
+	#dim GenType As %String = $$GENTYP^HAD(ProductID,,1)
+	
+	Quit ($Piece(GenType, "\", 1) = "RVG")
+]]></Implementation>
+</Method>
+
 <Method name="ControleerOfProductBestaat">
 <FormalSpec>ProductID:%String</FormalSpec>
 <Private>1</Private>