Index: BL/Legacy/FLOWTOE.cls.xml
===================================================================
diff -u -r58209 -r58400
--- BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 58209)
+++ BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 58400)
@@ -154,7 +154,7 @@
 	#dim ToeleveringLijn As DOM.AKP.ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(ToeleveringLijnNr)
 	#dim ProductId As %String = ToeleveringLijn.GeefProductID()
 	
-	Quit ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().IsLadeVanSpaceTowerProduct(ProductId)
+	Quit ##class(DOM.PM.impl.ProductTypeAPIimpl).%New().IsLadeVanSpaceTowerProduct(ProductId)
 ]]></Implementation>
 </Method>