Index: vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml
===================================================================
diff -u -r38964 -r39207
--- vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 38964)
+++ vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 39207)
@@ -50,7 +50,7 @@
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
 	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
 	
-	Do $$$AssertEquals(VerkoopPrijs,133.29)
+	Do $$$AssertEquals(VerkoopPrijs,135.54)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml
===================================================================
diff -u -r39132 -r39207
--- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39132)
+++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39207)
@@ -97,11 +97,14 @@
 	Set TbxKenmerken.DwarsverdelingAantal = ##class(DOM.PM.enu.TBXDwarsverdeling).Drie()
 	Set TbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
 	Set TbxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TiponBlumotion()
+	Set TbxKenmerken.HeeftOpvullijstLinks = $$$True
+	Set TbxKenmerken.HeeftOpvullijstRechts = $$$True
 	Set TbxKenmerken.IsBinnenbreedte = $$$False
 	Set TbxKenmerken.IsBinnenlade = $$$False
 	Set TbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
 	Set TbxKenmerken.MatKleur =  ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
 	Set TbxKenmerken.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set TbxKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set TbxKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
 	Set TbxKenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
 	Set TbxKenmerken.ZijwandVerhogingRelingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
Index: vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml
===================================================================
diff -u -r39132 -r39207
--- vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 39132)
+++ vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 39207)
@@ -117,11 +117,14 @@
 	Set Kenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TiponBlumotion()
 	Set Kenmerken.HeeftDwarsverdeling = $$$True
 	Set Kenmerken.HeeftMat = $$$True
+	Set Kenmerken.HeeftOpvullijstLinks = $$$True
+	Set Kenmerken.HeeftOpvullijstRechts = $$$True
 	Set Kenmerken.IsBinnenbreedte = $$$False
 	Set Kenmerken.IsBinnenlade = $$$False
 	Set Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
 	Set Kenmerken.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
 	Set Kenmerken.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set Kenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set Kenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
 	Set Kenmerken.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
 	Set Kenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
Index: vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml
===================================================================
diff -u -r39132 -r39207
--- vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 39132)
+++ vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 39207)
@@ -117,12 +117,15 @@
 	Set Resultaat.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
 	Set Resultaat.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TiponBlumotion()
 	Set Resultaat.HeeftDwarsverdeling = $$$True
+	Set Resultaat.HeeftOpvullijstLinks = $$$True
+	Set Resultaat.HeeftOpvullijstRechts = $$$True
 	Set Resultaat.HeeftMat = $$$True
 	Set Resultaat.IsBinnenbreedte = $$$False
 	Set Resultaat.IsBinnenlade = $$$False
 	Set Resultaat.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
 	Set Resultaat.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
 	Set Resultaat.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set Resultaat.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
 	Set Resultaat.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r38964 -r39207
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 38964)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 39207)
@@ -251,15 +251,15 @@
 	Set Kenmerken.ItemKBOms = ""
 	Set Kenmerken.ItemKL = "SW"
 	Set Kenmerken.ItemKLOms = ""
-	Set Kenmerken.ItemKLROPVL = ""
+	Set Kenmerken.ItemKLROPVL = "WI"
 	Set Kenmerken.ItemKV = "ALU.SW"
 	Set Kenmerken.ItemKVOms = ""
 	Set Kenmerken.ItemKX = ""
 	Set Kenmerken.ItemKXOms = ""
 	Set Kenmerken.ItemLD = 400
 	Set Kenmerken.ItemLT = "CM"
 	Set Kenmerken.ItemOLP = ""
-	Set Kenmerken.ItemOPVL = ""
+	Set Kenmerken.ItemOPVL = "L+R"
 	Set Kenmerken.ItemRK = "SW"
 	Set Kenmerken.ItemRKOms = ""
 	Set Kenmerken.ItemRSTL = ""