Index: BL/Legacy/FLOWTOE.cls.xml
===================================================================
diff -u -r57686 -r58209
--- BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 57686)
+++ BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 58209)
@@ -151,16 +151,10 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Toelevering:DOM.AKP.Toelevering,ToeleveringLijnNr:%String</FormalSpec>
 <Implementation><![CDATA[
-	#dim IsSpaceTowerProduct As %Boolean = $$$False
-	
 	#dim ToeleveringLijn As DOM.AKP.ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(ToeleveringLijnNr)
-	#dim OrderID As %String = ToeleveringLijn.GeefOrderID()
-	If ($$$HasLength(OrderID)) {
-		#dim OrderLijnProductService As DOM.VKP.Order.impl.OrderLijnProductService = ##class(DOM.VKP.Order.impl.OrderLijnProductService).%New()
-		#dim OrderLijnProductID As DOM.common.ProductID = OrderLijnProductService.GeefProductID(OrderID, ToeleveringLijn.GeefOrderLijnVolgnummer())
-		Set IsSpaceTowerProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().IsSpaceTowerProduct(OrderLijnProductID)
-	}
-	Quit IsSpaceTowerProduct
+	#dim ProductId As %String = ToeleveringLijn.GeefProductID()
+	
+	Quit ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().IsLadeVanSpaceTowerProduct(ProductId)
 ]]></Implementation>
 </Method>