Index: vhTest/Mock/APPS/EDI/common/impl/ProductConverter.cls.xml
===================================================================
diff -u -r36971 -r46400
--- vhTest/Mock/APPS/EDI/common/impl/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 36971)
+++ vhTest/Mock/APPS/EDI/common/impl/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 46400)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.EDI.common.impl.ProductConverter">
 <Description>
 Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
-Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
-Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.EDI.common.impl.ProductConverter,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml
===================================================================
diff -u -r46161 -r46400
--- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 46161)
+++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 46400)
@@ -210,6 +210,7 @@
 	Do ..ConverterData.Add("VerpakkingType","VerpakkingType","set Output = ##class(DOM.PM.enu.LBXVerpakkingType).V1()")
 	Do ..ConverterData.Add("VoorwandTypeVanCBinnenlade","VoorwandTypeVanCBinnenlade", "Set Output = $Case(Input, ""L"":""GlasLaag"", ""H"":""GlasHoog"", ""R"":""Reling"", :Input)")
 	Do ..ConverterData.Add("VoorwandTypeVanMBinnenlade","VoorwandTypeVanMBinnenlade", "Set Output = $Case(Input, ""G"":""Glas"", ""M"":""Metaal"", :Input)")
+	Do ..ConverterData.Add("VoorwandTypeVanKBinnenlade","VoorwandTypeVanKBinnenlade", "Set Output = $Case(Input, ""M"":""Metaal"", :Input)")
 	
 	Quit ..ConverterData
 ]]></Implementation>
Index: EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenLBX.cls.xml
===================================================================
diff -u -r41475 -r46400
--- EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenLBX.cls.xml	(.../LadeEigenschappenLBX.cls.xml)	(revision 41475)
+++ EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenLBX.cls.xml	(.../LadeEigenschappenLBX.cls.xml)	(revision 46400)
@@ -126,6 +126,11 @@
 <Parameter name="XMLNAME" value="FrontTypeFromInsideBoxSystemM"/>
 </Property>
 
+<Property name="VoorwandTypeVanKBinnenlade">
+<Type>%String</Type>
+<Parameter name="XMLNAME" value="FrontTypeFromInsideBoxSystemK"/>
+</Property>
+
 <Property name="HeeftDwarsverdeling">
 <Type>%Boolean</Type>
 <Parameter name="XMLNAME" value="HasCrossGallery"/>
@@ -297,6 +302,9 @@
 <Value name="35">
 <Value>ProductieWijze</Value>
 </Value>
+<Value name="36">
+<Value>VoorwandTypeVanKBinnenlade</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: APPS/EDI/common/impl/ProductConverter.cls.xml
===================================================================
diff -u -r38199 -r46400
--- APPS/EDI/common/impl/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 38199)
+++ APPS/EDI/common/impl/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 46400)
@@ -224,6 +224,7 @@
 	Do ConvertData.Add("ZijwandType","ZijWandType")
 	Do ConvertData.Add("VoorwandTypeVanCBinnenlade","VoorWandTypeVanCBinnenlade")
 	Do ConvertData.Add("VoorwandTypeVanMBinnenlade","VoorWandTypeVanMBinnenlade")
+	Do ConvertData.Add("VoorwandTypeVanKBinnenlade","VoorWandTypeVanKBinnenlade")
 	Do ConvertData.Add("HeeftDwarsverdeling",)
 	Do ConvertData.Add("AantalDwarsverdelingen","AantalDwarsverdelingen","Set Output = $Select(Input > 0 : Input, 1:"""")")   ; APPS.PM.enu.LBXAantalDwarsverdelingen
 	Do ConvertData.Add("UitsparingDataAantalUitsparingen","UitsparingDataAantalUitsparingen","Set Output = $Case(Input, 1:""Enkel"", 2:""Dubbel"", 0:"""", :Input)")   ; DOM.PM.enu.AantalUitsparingen
Index: APPS/EDI/common/dto/v001/LadeLBX.cls.xml
===================================================================
diff -u -r31917 -r46400
--- APPS/EDI/common/dto/v001/LadeLBX.cls.xml	(.../LadeLBX.cls.xml)	(revision 31917)
+++ APPS/EDI/common/dto/v001/LadeLBX.cls.xml	(.../LadeLBX.cls.xml)	(revision 46400)
@@ -23,6 +23,10 @@
 <Type>TECH.String</Type>
 </Property>
 
+<Property name="VoorwandTypeVanKBinnenlade">
+<Type>TECH.String</Type>
+</Property>
+
 <Property name="HeeftDwarsverdeling">
 <Type>%Boolean</Type>
 </Property>