Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGenerator.cls.xml
===================================================================
diff -u -r71550 -r71689
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGenerator.cls.xml	(.../AlgemeneKenmerkenOptiesGenerator.cls.xml)	(revision 71550)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGenerator.cls.xml	(.../AlgemeneKenmerkenOptiesGenerator.cls.xml)	(revision 71689)
@@ -57,7 +57,7 @@
 <Implementation><![CDATA[
 	Set LijstAlgemeneOpties = ##class(%ListOfObjects).%New()
 		
-	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-AdminProductNummer", Product.GeefID()))
+	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-Adminproductnummer", Product.GeefID()))
 	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-Afbeeldingcode", ..AfbeeldingService.GeefImageCodeVoorIngegevenKenmerken(Ingegevenkenmerken)))
 	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-Ladecode", Product.GeefLadeCode()))
 	
@@ -90,7 +90,7 @@
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim IsSmalleLade As %Boolean = ..IngegevenKenmerkenTypeApi.IsSmalleLade(IngegevenKenmerken)
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "IsSmalleLade", IsSmalleLade)
+	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Issmallelade", IsSmalleLade)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71584 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71584)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -56,10 +56,10 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 4)
-	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ RolnaamParentItem _ "." _ RolnaamHFItem1, HFItemAantal1)
-	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[01]|QTY|ROL", HFIdentnummer1 _ "|" _ HFItemAantal1 _ "|" _ RolnaamParentItem _ "." _ RolnaamHFItem1)
-	Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ RolnaamParentItem _ "." _ RolnaamHFItem2, HFItemAantal2)
-	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[02]|QTY|ROL", HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ RolnaamParentItem _ "." _ RolnaamHFItem2)
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem1", HFItemAantal1)
+	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[01]|QTY|ROL", HFIdentnummer1 _ "|" _ HFItemAantal1 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem1")
+	Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem2", HFItemAantal2)
+	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[02]|QTY|ROL", HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem2")
 	
 	Do HalffabItemBoomMock.Verifieer()
 	Do ProductMock.Verifieer()
@@ -101,8 +101,8 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 2)
-	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ RolnaamParentItem _ "." _ RolnaamHFItem2, HFItemAantal2)
-	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[01]|QTY|ROL", HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ RolnaamParentItem _ "." _ RolnaamHFItem2)
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem2", HFItemAantal2)
+	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-INPUT[01]|QTY|ROL", HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem2")
 	
 	Do HalffabItemBoomMock.Verifieer()
 	Do ProductMock.Verifieer()
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringAantalRollenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71686 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringAantalRollenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71686)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringAantalRollenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -36,8 +36,8 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock)
 	
 	Do $$$AssertEquals(Resultaat.Size, 2)
-	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "ROL-" _RolnaamParentItem _ "." _ RolnaamHFItem1, AantalProducten * HFItemAantal1)
-	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "ROL-" _RolnaamParentItem _ "." _ RolnaamHFItem2, AantalProducten * HFItemAantal2)
+	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "ROL-" _ "Dummyparentitem" _ "." _ "dummyhfitem1", AantalProducten * HFItemAantal1)
+	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "ROL-" _ "Dummyparentitem" _ "." _ "dummyhfitem2", AantalProducten * HFItemAantal2)
 	
 	Do ToeleveringMock.Verifieer()
 	Do HalffabItemBoomMock.Verifieer()
@@ -78,7 +78,7 @@
 	
 	Do $$$AssertEquals(Resultaat.Size, 1)
 	#dim VerwachtAantalRollen As %Integer = 2 * AantalProducten * HFItemAantal1
-	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "ROL-" _RolnaamParentItem _ "." _ RolnaamHFItem1, VerwachtAantalRollen)
+	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "ROL-" _ "Dummyparentitem" _ "." _ "dummyhfitem1", VerwachtAantalRollen)
 	
 	Do ToeleveringMock.Verifieer()
 	Do HalffabItemBoomMock.Verifieer()
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjectiveLbx/Test.cls.xml
===================================================================
diff -u -r71579 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjectiveLbx/Test.cls.xml	(.../Test.cls.xml)	(revision 71579)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjectiveLbx/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -31,7 +31,7 @@
 
 <Method name="Test: LBX rolnamen &apos;Rug_X&apos;, &apos;Rug_Y&apos; en &apos;Rug_M&apos; worden &apos;RugHout&apos; indien RugWandMateriaal &apos;Hout&apos; is en de toepassing een lade">
 <Implementation><![CDATA[
-	#dim VerwachtteRolNaam As %String = "RugHout"
+	#dim VerwachtteRolNaam As %String = "Rughout"
 	Set ..DomKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()
 	Set ..DomKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade()
 	
@@ -46,15 +46,15 @@
 	Set ..DomKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()
 	Set ..DomKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Spoelbak()
 	
-	Do ..AssertRolnaam("Rug.X", "Rug.X", ..DomKenmerken)
-	Do ..AssertRolnaam("Rug.Y", "Rug.Y", ..DomKenmerken)
-	Do ..AssertRolnaam("Rug.M", "Rug.M", ..DomKenmerken)
+	Do ..AssertRolnaam("Rug.X", "Rug.x", ..DomKenmerken)
+	Do ..AssertRolnaam("Rug.Y", "Rug.y", ..DomKenmerken)
+	Do ..AssertRolnaam("Rug.M", "Rug.m", ..DomKenmerken)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: LBX rolnamen &apos;Rug_X&apos;, &apos;Rug_Y&apos; en &apos;Rug_M&apos; worden &apos;RugStaal&apos; indien RugWandMateriaal &apos;Staal&apos;">
 <Implementation><![CDATA[
-	#dim VerwachtteRolNaam As %String = "RugStaal"
+	#dim VerwachtteRolNaam As %String = "Rugstaal"
 	
 	Set ..DomKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal()
 	Set ..DomKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Spoelbak()
@@ -76,18 +76,18 @@
 
 <Method name="Test: Indien een Rolnaam eindigt op &apos;Links&apos; of &apos;Rechts&apos;, wordt dit eraf gehaald indien de de rol geen &apos;LadeZijkant&apos; is">
 <Implementation><![CDATA[
-	#dim VerwachtteRolNaam As %String = "LbxRolnaam"
+	#dim VerwachtteRolNaam As %String = "Lbxrolnaam"
 	
 	Do ..AssertRolnaam("LbxRolnaam.Links", VerwachtteRolNaam, ..DomKenmerken)
 	Do ..AssertRolnaam("LbxRolnaam.Rechts", VerwachtteRolNaam, ..DomKenmerken)
-	Do ..AssertRolnaam("LadeZijkant.Links", "LadeZijkant.Links", ..DomKenmerken)
-	Do ..AssertRolnaam("LadeZijkant.Rechts", "LadeZijkant.Rechts", ..DomKenmerken)
+	Do ..AssertRolnaam("LadeZijkant.Links", "Ladezijkant.links", ..DomKenmerken)
+	Do ..AssertRolnaam("LadeZijkant.Rechts", "Ladezijkant.rechts", ..DomKenmerken)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: LBX rolnamen met voorvoegsel &apos;Verpakking&apos;, worden teruggegeven zonder voorvoegsel">
 <Implementation><![CDATA[
-	#dim VerwachtteRolNaam As %String = "LbxVerpakkingRolnaam"
+	#dim VerwachtteRolNaam As %String = "Lbxverpakkingrolnaam"
 	
 	Do ..AssertRolnaam("Verpakking.LbxVerpakkingRolnaam", VerwachtteRolNaam, ..DomKenmerken)
 ]]></Implementation>
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml
===================================================================
diff -u -r71591 -r71689
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml	(.../OptieGenerator.cls.xml)	(revision 71591)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml	(.../OptieGenerator.cls.xml)	(revision 71689)
@@ -68,7 +68,7 @@
 	#dim RolNaam As %String = HalffabItem.GeefRol()
 
 	If $$$Not(HalffabItem.ParentItem.GeefRol() = IngegevenKenmerken.GeefVariant()) {
-		Set RolNaam = HalffabItem.ParentItem.GeefRol() _ "." _ RolNaam
+		Set RolNaam = ##class(TECH.StringUtils).ToFirstCase(HalffabItem.ParentItem.GeefRol() _ "." _ RolNaam)
 	}
 	
 	Set Converter = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.Converter.DomRollenNaarObjective).%New()
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71573 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71573)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -67,8 +67,8 @@
 	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-DNA-code", DummyDnaCode)
 	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-PIN", DummyDnaCode)
 	Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-SHORTPIN", "ode")	
-	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-InventTransID", DummyInventTransId)	
-	Do ..AssertOptie(Resultaat.GetAt(5), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-AxConfigId", DummyAxConfigId)	
+	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Inventtransid", DummyInventTransId)	
+	Do ..AssertOptie(Resultaat.GetAt(5), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Axconfigid", DummyAxConfigId)	
 	Do ..AssertOptie(Resultaat.GetAt(6), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Korttekst", DummyKorttekst)	
 	Do ..AssertOptie(Resultaat.GetAt(7), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Langtekst", DummyLangtekst)
 	Do ..AssertOptie(Resultaat.GetAt(8), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Dossiercode", DummyDossierCode)
Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml
===================================================================
diff -u -r71548 -r71689
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 71548)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml	(.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml)	(revision 71689)
@@ -36,7 +36,7 @@
 	#dim AftrekVoorBodemDiepte As %Decimal = ..BodemUtils.GeefAftrekVoorBodemDiepte(IngegevenKenmerken.RugWandMateriaal)
 	#dim BodemHoogte As %Integer = IngegevenKenmerken.LadeDiepte - AftrekVoorBodemDiepte
 	
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "BodemHoogte", BodemHoogte)
+	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Bodemhoogte", BodemHoogte)
 ]]></Implementation>
 </Method>
 
@@ -49,7 +49,7 @@
 	#dim LengteDimensie As DOM.PM.enu.BewerkingDimensie = ##class(DOM.PM.enu.BewerkingDimensie).Lengte()
 	#dim BodemBreedte As %Decimal = BodemItem.GeefBewerkteDimensie(LengteDimensie)
 	
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "BodemBreedte", BodemBreedte)
+	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Bodembreedte", BodemBreedte)
 ]]></Implementation>
 </Method>
 
@@ -70,8 +70,8 @@
 		Set RugHoogteInMm = ..RugUtils.GeefRugHoogteInMm(IngegevenKenmerken.RugHoogte)
 	}
 	
-	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "RugBreedte", RugBreedte))
-	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "RugHoogteInMm", RugHoogteInMm))
+	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Rugbreedte", RugBreedte))
+	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Rughoogteinmm", RugHoogteInMm))
 	
 	Quit LijstOpties
 ]]></Implementation>
@@ -93,7 +93,7 @@
 		Set PlaatmateriaalKleuren = BodemKleurZichtbaar _ "/" _ BodemKleur2de
 	}
 	
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "PlaatmateriaalKleuren", PlaatmateriaalKleuren)
+	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Plaatmateriaalkleuren", PlaatmateriaalKleuren)
 ]]></Implementation>
 </Method>
 
@@ -108,7 +108,7 @@
 		Set StalenRugBreedte = ..RugUtils.GeefStalenRugBreedte(RugItem.GeefHalffab().ProductID)
 	}
 	
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "StalenRugBreedte", StalenRugBreedte)
+	Quit ..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Stalenrugbreedte", StalenRugBreedte)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringProductInfoOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71685 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringProductInfoOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71685)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ToeleveringProductInfoOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -25,9 +25,9 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock)
 	
 	Do $$$AssertEquals(Resultaat.Size, 3)
-	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "AantalSifonLades", 0)
-	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "AantalSpoelbakLades", 0)
-	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "AantalSmalleLades", 0)
+	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "Aantalsifonlades", 0)
+	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "Aantalspoelbaklades", 0)
+	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "Aantalsmallelades", 0)
 	
 	Do ToeleveringMock.Verifieer()
 	Do ProductMock.Verifieer()
@@ -62,9 +62,9 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock)
 	
 	Do $$$AssertEquals(Resultaat.Size, 3)
-	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "AantalSifonLades", 6)
-	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "AantalSpoelbakLades", 0)
-	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "AantalSmalleLades", 0)
+	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "Aantalsifonlades", 6)
+	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "Aantalspoelbaklades", 0)
+	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "Aantalsmallelades", 0)
 	
 	Do ToeleveringMock.Verifieer()
 	Do ProductMock1.Verifieer()
@@ -99,9 +99,9 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock)
 	
 	Do $$$AssertEquals(Resultaat.Size, 3)
-	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "AantalSifonLades", 1)
-	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "AantalSpoelbakLades", 2)
-	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "AantalSmalleLades", 3)
+	Do ..AssertOptie(Resultaat.GetAt(1), "_TOELEVERING", "Aantalsifonlades", 1)
+	Do ..AssertOptie(Resultaat.GetAt(2), "_TOELEVERING", "Aantalspoelbaklades", 2)
+	Do ..AssertOptie(Resultaat.GetAt(3), "_TOELEVERING", "Aantalsmallelades", 3)
 	
 	Do ToeleveringMock.Verifieer()
 	Do ProductMockSifon.Verifieer()
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml
===================================================================
diff -u -r71579 -r71689
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml	(.../DomRollenNaarObjective.cls.xml)	(revision 71579)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml	(.../DomRollenNaarObjective.cls.xml)	(revision 71689)
@@ -27,25 +27,29 @@
 <Method name="VerwerkLBXKenmerken">
 <FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</FormalSpec>
 <Implementation><![CDATA[
-	If ((..Waarde = "Rug.X") || (..Waarde = "Rug.Y") || (..Waarde = "Rug.M")) {
+	Set ..Waarde = ##class(TECH.StringUtils).ToLower(..Waarde)
+	
+	If ((..Waarde = "rug.x") || (..Waarde = "rug.y") || (..Waarde = "rug.m")) {
 		If (LBXKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()) {
 			If ((LBXKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade()) || (LBXKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).SpaceStep())) {
-				Set ..Waarde = "RugHout"
+				Set ..Waarde = "Rughout"
 			}
 		} ElseIf (LBXKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal()) {
-			Set ..Waarde = "RugStaal"
+			Set ..Waarde = "Rugstaal"
 		}
-	} ElseIf ((..Waarde = "Sifonkap.Z1") || (..Waarde = "Sifonkap.Z2")) {
+	} ElseIf ((..Waarde = "sifonkap.z1") || (..Waarde = "sifonkap.z2")) {
 		Set ..Waarde = "Sifonkap"
-	} ElseIf ((##class(TECH.StringUtils).EndsWith(..Waarde, "Links")) || ##class(TECH.StringUtils).EndsWith(..Waarde, "Rechts")) {
-		If ($$$Not(##class(TECH.StringUtils).StartsWith(..Waarde, "LadeZijkant"))) {
+	} ElseIf ((##class(TECH.StringUtils).EndsWith(..Waarde, "links")) || ##class(TECH.StringUtils).EndsWith(..Waarde, "rechts")) {
+		If ($$$Not(##class(TECH.StringUtils).StartsWith(..Waarde, "ladezijkant"))) {
 			Set ..Waarde = ##class(TECH.StringUtils).GetFirstPart(..Waarde, ".")
 		}
-	} ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "Verpakking.")) {
+	} ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "verpakking.")) {
 		Set ..Waarde = ##class(TECH.StringUtils).GetLastPart(..Waarde, ".")
-	} ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "MAT_Standaard")) {
+	} ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "mat_standaard")) {
 		Set ..Waarde = "Mat"
 	}
+	
+	Set ..Waarde = ##class(TECH.StringUtils).ToFirstCase(..Waarde)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71570 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71570)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -34,9 +34,9 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 51)
-	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-AantalDwarsverdelingen", 2)
-	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-BodemKleur", "WI")
-	Do ..AssertOptie(Resultaat.GetAt(10), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-HeeftOpvullijstLinks", "False")	
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Aantaldwarsverdelingen", 2)
+	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Bodemkleur", "WI")
+	Do ..AssertOptie(Resultaat.GetAt(10), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Heeftopvullijstlinks", "False")	
 	
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
@@ -60,8 +60,8 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 71)
-	Do ..AssertOptie(Resultaat.GetAt(52), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Mat.Breedte", 800)
-	Do ..AssertOptie(Resultaat.GetAt(60), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Mat.Kleur", "W")
+	Do ..AssertOptie(Resultaat.GetAt(52), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Mat.breedte", 800)
+	Do ..AssertOptie(Resultaat.GetAt(60), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Mat.kleur", "W")
 	
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
@@ -93,26 +93,26 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 51)
-	Do ..AssertOptie(Resultaat.GetAt(32), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.UitsparingAantal", "Dubbel")
-	Do ..AssertOptie(Resultaat.GetAt(33), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.X.Breedte", 150)
-	Do ..AssertOptie(Resultaat.GetAt(34), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.X.Hoogte", "M")
-	Do ..AssertOptie(Resultaat.GetAt(35), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.X.Materiaal", "Hout")
-	Do ..AssertOptie(Resultaat.GetAt(36), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Y.Breedte", 150)
-	Do ..AssertOptie(Resultaat.GetAt(37), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Y.Hoogte", "M")
-	Do ..AssertOptie(Resultaat.GetAt(38), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Y.Materiaal", "Hout")
-	Do ..AssertOptie(Resultaat.GetAt(39), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.M.Breedte", 140)
-	Do ..AssertOptie(Resultaat.GetAt(40), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.M.Hoogte", "M")
-	Do ..AssertOptie(Resultaat.GetAt(41), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.M.Materiaal", "Hout")
-	Do ..AssertOptie(Resultaat.GetAt(42), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z1.Breedte", 300)
-	Do ..AssertOptie(Resultaat.GetAt(43), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z1.Hoogte", "M")
-	Do ..AssertOptie(Resultaat.GetAt(44), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z1.Diepte", 250)
-	Do ..AssertOptie(Resultaat.GetAt(45), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z1.Vorm", "Recht")
-	Do ..AssertOptie(Resultaat.GetAt(46), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z1.Materiaal", "Staal")
-	Do ..AssertOptie(Resultaat.GetAt(47), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z2.Breedte", 160)
-	Do ..AssertOptie(Resultaat.GetAt(48), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z2.Hoogte", "M")
-	Do ..AssertOptie(Resultaat.GetAt(49), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z2.Diepte", 250)
-	Do ..AssertOptie(Resultaat.GetAt(50), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z2.Vorm", "Recht")
-	Do ..AssertOptie(Resultaat.GetAt(51), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.Z2.Materiaal", "Staal")
+	Do ..AssertOptie(Resultaat.GetAt(32), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.uitsparingaantal", "Dubbel")
+	Do ..AssertOptie(Resultaat.GetAt(33), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.x.breedte", 150)
+	Do ..AssertOptie(Resultaat.GetAt(34), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.x.hoogte", "M")
+	Do ..AssertOptie(Resultaat.GetAt(35), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.x.materiaal", "Hout")
+	Do ..AssertOptie(Resultaat.GetAt(36), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.y.breedte", 150)
+	Do ..AssertOptie(Resultaat.GetAt(37), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.y.hoogte", "M")
+	Do ..AssertOptie(Resultaat.GetAt(38), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.y.materiaal", "Hout")
+	Do ..AssertOptie(Resultaat.GetAt(39), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.m.breedte", 140)
+	Do ..AssertOptie(Resultaat.GetAt(40), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.m.hoogte", "M")
+	Do ..AssertOptie(Resultaat.GetAt(41), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.m.materiaal", "Hout")
+	Do ..AssertOptie(Resultaat.GetAt(42), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z1.breedte", 300)
+	Do ..AssertOptie(Resultaat.GetAt(43), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z1.hoogte", "M")
+	Do ..AssertOptie(Resultaat.GetAt(44), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z1.diepte", 250)
+	Do ..AssertOptie(Resultaat.GetAt(45), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z1.vorm", "Recht")
+	Do ..AssertOptie(Resultaat.GetAt(46), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z1.materiaal", "Staal")
+	Do ..AssertOptie(Resultaat.GetAt(47), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z2.breedte", 160)
+	Do ..AssertOptie(Resultaat.GetAt(48), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z2.hoogte", "M")
+	Do ..AssertOptie(Resultaat.GetAt(49), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z2.diepte", 250)
+	Do ..AssertOptie(Resultaat.GetAt(50), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z2.vorm", "Recht")
+	Do ..AssertOptie(Resultaat.GetAt(51), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Uitsparingdata.z2.materiaal", "Staal")
 	
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml
===================================================================
diff -u -r71573 -r71689
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml	(.../ProductOptiesGenerator.cls.xml)	(revision 71573)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml	(.../ProductOptiesGenerator.cls.xml)	(revision 71689)
@@ -111,8 +111,8 @@
 		}
 	}
 
-	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "InventTransID", AxInventTransId))
-	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "AxConfigId", AxConfigId))
+	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Inventtransid", AxInventTransId))
+	Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ "Axconfigid", AxConfigId))
 	
 	Quit LijstOpties
 ]]></Implementation>
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml
===================================================================
diff -u -r71567 -r71689
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml	(.../IngegevenKenmerkenOptiesGenerator.cls.xml)	(revision 71567)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml	(.../IngegevenKenmerkenOptiesGenerator.cls.xml)	(revision 71689)
@@ -65,11 +65,12 @@
 	Set PropertiesIterator = ##class(TECH.ListIterator).%New(##class(TECH.ClassUtils).GeefProperties(KenmerkenApps.%ClassName(1)))
 	#dim GefilterdePropertiesIterator As TECH.ListIterator = ..ProperyFilter.Filter(PropertiesIterator)
 	While (GefilterdePropertiesIterator.HasNext()) {
-		#dim PropertyNaam As %String = GefilterdePropertiesIterator.Next()	
+		#dim PropertyNaam As %String = GefilterdePropertiesIterator.Next()
 		#dim Waarde As %String = $Property(KenmerkenApps, PropertyNaam)
 		
 		#dim Property As %Dictionary.CompiledProperty = ##class(TECH.CompiledClassUtils).GeefProperty(KenmerkenApps.%ClassName(1), PropertyNaam)
-		Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ PropertyNaam , ..ConverteerWaarde(Waarde, Property.Type)))
+		#dim Naam As %String = "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ PropertyNaam)
+		Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, Naam, ..ConverteerWaarde(Waarde, Property.Type)))
 	}
 	
 	Do ##class(TECH.ListUtils).AppendList(LijstOpties, ..GeefOptiesUitsparingData(KenmerkenApps, SequentieNummerBinnenToelevering, VoorvoegselNaam))
@@ -91,26 +92,26 @@
 		#dim UitsparingData As ECON.PM.Maatwerk.dto.CommonKenmerken.Uitsparingdata = GeconverteerdeEconKenmerken.UitsparingData
 		
 		If ($IsObject(UitsparingData)) {
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.UitsparingAantal", UitsparingData.UitsparingAantal))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.X.Breedte", UitsparingData.X.Breedte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.X.Hoogte", UitsparingData.X.Hoogte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.X.Materiaal", UitsparingData.X.Materiaal))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Y.Breedte", UitsparingData.Y.Breedte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Y.Hoogte", UitsparingData.Y.Hoogte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Y.Materiaal", UitsparingData.Y.Materiaal))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.M.Breedte", UitsparingData.M.Breedte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.M.Hoogte", UitsparingData.M.Hoogte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.M.Materiaal", UitsparingData.M.Materiaal))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z1.Breedte", UitsparingData.Z1.Breedte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z1.Hoogte", UitsparingData.Z1.Hoogte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z1.Diepte", UitsparingData.Z1.Diepte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z1.Vorm", UitsparingData.Z1.Vorm))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z1.Materiaal", UitsparingData.Z1.Materiaal))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z2.Breedte", UitsparingData.Z2.Breedte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z2.Hoogte", UitsparingData.Z2.Hoogte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z2.Diepte", UitsparingData.Z2.Diepte))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z2.Vorm", UitsparingData.Z2.Vorm))
-			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ VoorvoegselNaam _ "Uitsparingdata.Z2.Materiaal", UitsparingData.Z2.Materiaal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.UitsparingAantal"), UitsparingData.UitsparingAantal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.X.Breedte"), UitsparingData.X.Breedte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.X.Hoogte"), UitsparingData.X.Hoogte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.X.Materiaal"), UitsparingData.X.Materiaal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Y.Breedte"), UitsparingData.Y.Breedte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Y.Hoogte"), UitsparingData.Y.Hoogte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Y.Materiaal"), UitsparingData.Y.Materiaal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.M.Breedte"), UitsparingData.M.Breedte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.M.Hoogte"), UitsparingData.M.Hoogte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.M.Materiaal"), UitsparingData.M.Materiaal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z1.Breedte"), UitsparingData.Z1.Breedte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z1.Hoogte"), UitsparingData.Z1.Hoogte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z1.Diepte"), UitsparingData.Z1.Diepte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z1.Vorm"), UitsparingData.Z1.Vorm))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z1.Materiaal"), UitsparingData.Z1.Materiaal))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z2.Breedte"), UitsparingData.Z2.Breedte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z2.Hoogte"), UitsparingData.Z2.Hoogte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z2.Diepte"), UitsparingData.Z2.Diepte))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z2.Vorm"), UitsparingData.Z2.Vorm))
+			Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "Uitsparingdata.Z2.Materiaal"), UitsparingData.Z2.Materiaal))
 		}
 	}
 	
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71591 -r71689
--- vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71591)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71689)
@@ -47,16 +47,16 @@
 	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 10)
-	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-AdminProductNummer", ..#DummyProductId)
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Adminproductnummer", ..#DummyProductId)
 	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Afbeeldingcode", DummyAfbeeldingCode)
 	Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Ladecode", DummyLadeCode)
-	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-IsSmalleLade", $$$False)
-	Do ..AssertOptie(Resultaat.GetAt(5), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-BodemHoogte", 474)
-	Do ..AssertOptie(Resultaat.GetAt(6), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-BodemBreedte", 1)
-	Do ..AssertOptie(Resultaat.GetAt(7), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-RugBreedte", 1)
-	Do ..AssertOptie(Resultaat.GetAt(8), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-RugHoogteInMm", 78.5)
-	Do ..AssertOptie(Resultaat.GetAt(9), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-PlaatmateriaalKleuren", "WI")
-	Do ..AssertOptie(Resultaat.GetAt(10), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-StalenRugBreedte", "null")
+	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Issmallelade", $$$False)
+	Do ..AssertOptie(Resultaat.GetAt(5), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Bodemhoogte", 474)
+	Do ..AssertOptie(Resultaat.GetAt(6), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Bodembreedte", 1)
+	Do ..AssertOptie(Resultaat.GetAt(7), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Rugbreedte", 1)
+	Do ..AssertOptie(Resultaat.GetAt(8), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Rughoogteinmm", 78.5)
+	Do ..AssertOptie(Resultaat.GetAt(9), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Plaatmateriaalkleuren", "WI")
+	Do ..AssertOptie(Resultaat.GetAt(10), "LADE 00" _ ..#SequentieNummerBinnenToelevering, "00" _ ..#SequentieNummerBinnenToelevering _ "-Stalenrugbreedte", "null")
 	
 	Do HalffabItemBoomMock.Verifieer()
 	Do ProductMock.Verifieer()