Index: DOM/PM/Maatwerk/Calc/HF/impl/HalffabSpecKenmerkenAanpasser.cls.xml
===================================================================
diff -u -r69384 -r69385
--- DOM/PM/Maatwerk/Calc/HF/impl/HalffabSpecKenmerkenAanpasser.cls.xml	(.../HalffabSpecKenmerkenAanpasser.cls.xml)	(revision 69384)
+++ DOM/PM/Maatwerk/Calc/HF/impl/HalffabSpecKenmerkenAanpasser.cls.xml	(.../HalffabSpecKenmerkenAanpasser.cls.xml)	(revision 69385)
@@ -59,6 +59,10 @@
 	If (..Context.GeefBerekingWijze() = ##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).PrijsBerekening())  {
 		Set TAORKenmerken.Concept = ##class(DOM.PM.enu.TAORConcept).Valinge() 
 	}
+	
+	If (TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef() || TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel()) {
+		Set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Movento()
+	}
 ]]></Implementation>
 </Method>