Index: vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/SSTTest003UitvoeringVolledig.cls.xml
===================================================================
diff -u -r61860 -r63308
--- vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/SSTTest003UitvoeringVolledig.cls.xml	(.../SSTTest003UitvoeringVolledig.cls.xml)	(revision 61860)
+++ vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/SSTTest003UitvoeringVolledig.cls.xml	(.../SSTTest003UitvoeringVolledig.cls.xml)	(revision 63308)
@@ -20,7 +20,7 @@
 <Method name="GeefVerwachteDetaillijnen">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ##class(TECH.ListUtils).CreateListOfDataTypes("[Sokkel] [DiepteAfkorting]:555x[BreedteAfkorting]:736x[HoogteAfkorting]:180" , "[inclusief uittrekbare SPACE STEP tablet]", "[met antislip oppervlak]", "[voorzien van LBX lade M]", "[sokkel zijkanten in multiplex 18mm]", "[voorzien van 4 stelpoten]", "[2 opvullijsten meegeleverd]", "[SERVO-DRIVE uitwerper voorgemonteerd]", "[incl. Blum netstroomstekker]")
+<Implementation><![CDATA[	quit ##class(TECH.ListUtils).CreateListOfDataTypes("[Sokkel] [DiepteAfkorting]:555x[BreedteAfkorting]:736x[HoogteAfkorting]:180" , "[inclusief uittrekbare SPACE STEP tablet]", "[met antislip oppervlak]", "[voorzien van LBX lade M SW-M]", "[sokkel zijkanten in multiplex 18mm]", "[voorzien van 4 stelpoten]", "[2 opvullijsten meegeleverd]", "[SERVO-DRIVE uitwerper voorgemonteerd]", "[incl. Blum netstroomstekker]")
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/SSTLangtekstCreator.cls.xml
===================================================================
diff -u -r62249 -r63308
--- DOM/PM/impl/SSTLangtekstCreator.cls.xml	(.../SSTLangtekstCreator.cls.xml)	(revision 62249)
+++ DOM/PM/impl/SSTLangtekstCreator.cls.xml	(.../SSTLangtekstCreator.cls.xml)	(revision 63308)
@@ -51,7 +51,7 @@
 	Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("met antislip oppervlak"))	
 	
 	If $$$Not(..IsUitvoeringTablet()) {
-		Do ..VoegToeLangtekstParagraaf(..GeefLadeHoogteParagraaf())
+		Do ..VoegToeLangtekstParagraaf(..GeefLadeHoogteEnKleurParagraaf())
 		Do ..VoegToeLangtekstParagraaf(..GeefZijkantenParagraaf())	
 		Do ..VoegToeLangtekstParagraaf(..GeefStelpotenParagraaf())	
 		Do ..VoegToeLangtekstParagraaf(..GeefSokkelParagraaf())
@@ -113,11 +113,12 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefLadeHoogteParagraaf">
+<Method name="GeefLadeHoogteEnKleurParagraaf">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
 	#dim TekstLadeHoogte As %String = ""
+	#dim TekstLadeKleur As %String = ""
 	
 	If (..IsUitvoeringVolledig()) {
 		Set TekstLadeHoogte = "voorzien van LBX lade"
@@ -129,6 +130,19 @@
 		} ElseIf (..IngegevenKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).K()) {
 			Set TekstLadeHoogte = TekstLadeHoogte_" "_##class(DOM.PM.enu.LBXLadeHoogte).K()
 		}
+		
+		If (..IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Zijdewit()) {
+			Set TekstLadeKleur = TekstLadeKleur_" "_##class(DOM.PM.enu.LBXLadeKleur).Zijdewit()
+		} ElseIf (..IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Oriongrijs()) {
+			Set TekstLadeKleur = TekstLadeKleur_" "_##class(DOM.PM.enu.LBXLadeKleur).Oriongrijs()
+		} ElseIf (..IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Inox()) {
+			Set TekstLadeKleur = TekstLadeKleur_" "_##class(DOM.PM.enu.LBXLadeKleur).Inox()
+		} ElseIf (..IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Terrazwart()) {
+			Set TekstLadeKleur = TekstLadeKleur_" "_##class(DOM.PM.enu.LBXLadeKleur).Terrazwart()
+		} ElseIf (..IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).PolarZilver()) {
+			Set TekstLadeKleur = TekstLadeKleur_" "_##class(DOM.PM.enu.LBXLadeKleur).PolarZilver()
+		}
+		
 	} ElseIf (..IsUitvoeringSokkelEnTablet()) {
 		Set TekstLadeHoogte = "voorzien voor LBX lade"
 		
@@ -141,7 +155,7 @@
 		}
 	}
 	
-	Quit ..Vertaler.GeefVertaling(TekstLadeHoogte)
+	Quit ..Vertaler.GeefVertaling(TekstLadeHoogte_TekstLadeKleur)
 ]]></Implementation>
 </Method>