Index: AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml
===================================================================
diff -u -r65693 -r65923
--- AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml	(.../OrderLijnenUpdater.cls.xml)	(revision 65693)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml	(.../OrderLijnenUpdater.cls.xml)	(revision 65923)
@@ -102,9 +102,6 @@
 		#dim LEVNr As %String = $P($G(^KTO1(ToeleveringID)),"\")
 	 	Quit:'LEVNr
 	 	#dim R As %String = ^KTO(LEVNr,ToeleveringID,ToeleveringLijnNr)
-	 	If ((LEVNr = "6332") && ($P(R,"\",27) = "")) {
- 			Set ^THBSpacetower($H,LEVNr,ToeleveringID,ToeleveringLijnNr,"AXimpl_OrderLijnenUpdater") = R
-	 	}
 	 	Set $P(R,"\",28)=NieuwLijnVolgNr
 	 	Set ^KTO(LEVNr,ToeleveringID,ToeleveringLijnNr)=R
 	 	If $D(^KTOK(LEVNr,ToeleveringID,ToeleveringLijnNr)) { 
Index: EWTOE.mac.rou
===================================================================
diff -u -r63636 -r65923
--- EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 63636)
+++ EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 65923)
@@ -185,7 +185,8 @@
  .Set $P(Rec,D,3)=AantBo,$P(Rec,D,15)=$P(Rec,D,15)+1
  .If ORDNr,$D(^KO1(ORDNr,"F")) Do
  ..Set KLNr=$P(^KO1(ORDNr,"F"),D),ORDPRNr=$P(^KOD(KLNr,"F",ORDNr,OLNr),D,2)
- ..Set:ORDPRNr'=TOEPRNr $P(Rec,D,27,28)=D
+ ..If '##class(DOM.PM.impl.ProductTypeAPIimpl).%New().IsLadeVanSpaceTowerProduct(TOEPRNr) Do
+ ...Set:ORDPRNr'=TOEPRNr $P(Rec,D,27,28)=D
  .Set ^KTO(LEVNr,TOENr,TLNr)=Rec
  .Do SWNODE^FLOWTOE(LEVNr,TOENr,TLNr)
  .Do ProductToeleveringLijnGemaakt^FLOWTOE2(LEVNr,TOENr,TLNr)