Index: vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/Test.cls.xml
===================================================================
diff -u -r61065 -r69569
--- vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/Test.cls.xml	(.../Test.cls.xml)	(revision 61065)
+++ vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/Test.cls.xml	(.../Test.cls.xml)	(revision 69569)
@@ -8,14 +8,23 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestDraagkrachtCode">
+<Method name="TestDraagkracht60Code">
 <Implementation><![CDATA[
+	// Korttekst gebruikt PPS-kenmerk en dat is door PM gewijzigd naar 70 tijdens uitfasering 60 voor bepaalde LadeDieptes.
 	Set ..TAORKenmerken.Draagkracht = ##class(DOM.PM.enu.TAORDraagkracht).Draagkracht60()
 	
-	Do $$$AssertEquals($Extract(..BepaalKorttekst(), 3, 3), "6")
+	Do $$$AssertEquals($Extract(..BepaalKorttekst(), 3, 3), "7")
 ]]></Implementation>
 </Method>
 
+<Method name="TestDraagkracht70Code">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken.Draagkracht = ##class(DOM.PM.enu.TAORDraagkracht).Draagkracht70()
+	
+	Do $$$AssertEquals($Extract(..BepaalKorttekst(), 3, 3), "7")
+]]></Implementation>
+</Method>
+
 <Method name="TestZijwandHoogte">
 <Implementation><![CDATA[
 	Set ..TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M()
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml
===================================================================
diff -u -r69387 -r69569
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml	(.../TaorboxModel.cls.xml)	(revision 69387)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel.cls.xml	(.../TaorboxModel.cls.xml)	(revision 69569)
@@ -33,7 +33,7 @@
 	Do ..VoegToeEnumeratieKenmerk("FrontEindkapKleur", "Kleur van de eindkap van het front", "AL/ZAL", "Aluminium Look/Zwart Aluminium Look")
 	Do ..VoegToeBooleanKenmerk("IsBinnenlade", "Binnenlade")
 	Do ..VoegToeEnumeratieKenmerk("GlijderType","Geleidertype", "Tandem/Movento", "TANDEM/Movento")
-	Do ..VoegToeEnumeratieKenmerk("Draagkracht", "Draagkracht", "30/40/50/60",, ##class(APPS.PM.enu.DataType).Getal(), "TECH.Enumeration")
+	Do ..VoegToeEnumeratieKenmerk("Draagkracht", "Draagkracht", "30/40/50/60/70",, ##class(APPS.PM.enu.DataType).Getal(), "TECH.Enumeration")
 	Do ..VoegToeEnumeratieKenmerk("Uittrekbaarheid","Uittrekbaarheid", "V/G", "Volledig/Gedeeltelijk")
 	Do ..VoegToeEnumeratieKenmerk("FrontBevestiging", "Frontbevestiging", "E/S/D/ET", "Expando/Schroef/Drevel/ExpandoT")
 	Do ..VoegToeBooleanKenmerk("HeeftZijstabilisering", "Zijstabilisering")