Index: vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml
===================================================================
diff -u -r62796 -r62797
--- vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 62796)
+++ vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 62797)
@@ -118,9 +118,34 @@
 
 <Method name="Test: Posities 12 tot en met 19 zijn de LadeDimensie links gelijnd">
 <Implementation><![CDATA[
+	// Standaard gedrag:
 	Set ..MVXKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500
 	Set ..MVXKenmerken.InterneBreedte = 564
 	Do ..AssertPositiesInKorttekst("500x564 ", 12, 19)
+	
+	// Standaard gedrag:
+	Set ..MVXKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500
+	Set ..MVXKenmerken.InterneBreedte = 1008
+	Do ..AssertPositiesInKorttekst("500x1008", 12, 19)
+	
+	// Missende input brengt de locatie van andere codes niet in het gedrang:
+	Set ..MVXKenmerken.LadeDiepte = ""
+	Set ..MVXKenmerken.InterneBreedte = 564
+	Do ..AssertPositiesInKorttekst("MV7ESI S38Jx564    X     ", 1, 25)
+	
+	Set ..MVXKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500
+	Set ..MVXKenmerken.InterneBreedte = ""
+	Do ..AssertPositiesInKorttekst("MV7ESI S38J500x    X     ", 1, 25)
+	
+	// Een spatie als input brengt de locatie van de andere codes niet in het gedrang:
+	Set ..MVXKenmerken.LadeDiepte = " "
+	Set ..MVXKenmerken.InterneBreedte = 564 // Property is type TECH.Numeric. Kan dus niet een spatie zijn.
+	Do ..AssertPositiesInKorttekst("MV7ESI S38J x564   X     ", 1, 25)
+	
+	// Foute input brengt de locatie van de andere codes niet in het gedrang:
+	Set ..MVXKenmerken.LadeDiepte = ..#RandomInput
+	Set ..MVXKenmerken.InterneBreedte = 564 // Property is type TECH.Numeric. Kan dus geen RandomInput zijn.
+	Do ..AssertPositiesInKorttekst("MV7ESI S38Jr#6P)&xxX     ", 1, 25)
 ]]></Implementation>
 </Method>