Index: DOM/PM/enu/TBXGeleiderTechnologie/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXGeleiderTechnologie/Verwerker.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXGeleiderTechnologie/Verwerker.cls.xml	(revision 35814)
@@ -0,0 +1,48 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXGeleiderTechnologie.Verwerker">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+
+<Method name="Verwerk">
+<Final>1</Final>
+<FormalSpec>TBXGeleiderTechnologie:DOM.PM.enu.TBXGeleiderTechnologie</FormalSpec>
+<Implementation><![CDATA[
+	If TBXGeleiderTechnologie = "B" {
+		Do ..VerwerkBLUMOTION()
+	} ElseIf TBXGeleiderTechnologie = "T" {
+		Do ..VerwerkTIPON()
+	} ElseIf TBXGeleiderTechnologie = "TOB" {
+		Do ..VerwerkTIPONBLUMOTION()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXGeleiderTechnologie,"DOM.PM.enu.TBXGeleiderTechnologie",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBLUMOTION">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkTIPON">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkTIPONBLUMOTION">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml
===================================================================
diff -u -r35808 -r35814
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 35808)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 35814)
@@ -28,11 +28,13 @@
 	Set WebOrderLijn.Qty = Aantal
 	
 	Do ..ObjectConverter.Convert(Product,WebOrderLijn,..GeefConvertDataTBX())
+	
 	Do ..ConvertCorpusWandDikte(Product,WebOrderLijn)
 	Do ..ConvertOpvullijst(Product,WebOrderLijn)
 	Do ..ConvertFrontOndersteuningAantal(Product,WebOrderLijn)
 	Do ..ConvertGreepEnMeenemer(Product,WebOrderLijn)
 	Do ..ConvertInschuifElement(Product,WebOrderLijn)
+	;Do ..ConvertGeleiderTechnologie(Product,WebOrderLijn)
 	
 	Quit WebOrderLijn
 ]]></Implementation>
@@ -147,7 +149,8 @@
 	Do ConvertData.Add("Draagkracht","ItemDK")
 	Do ConvertData.Add("HeeftZijstabilisering","ItemSB")
 	Do ConvertData.Add("AntislipMat","ItemASM")
-	Do ConvertData.Add("VerpakkingType","ItemVPK")	
+	Do ConvertData.Add("VerpakkingType","ItemVPK")
+	Do ConvertData.Add("GeleiderTechnologie","ItemBM", "Set Output = $Select(Input = ""B"" : ""I"", 1:Input)")	
 	
 	Quit ConvertData
 ]]></Implementation>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml
===================================================================
diff -u -r35809 -r35814
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 35809)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 35814)
@@ -32,6 +32,7 @@
 	Do $$$AssertEquals(WebOrderLijn.ItemCB,"1000")
 	Do $$$AssertEquals(WebOrderLijn.ItemFB,"S")
 	Do $$$AssertEquals(WebOrderLijn.ItemBX,"Laag")
+	Do $$$AssertEquals(WebOrderLijn.ItemBM,"T")
 ]]></Implementation>
 </Method>
 
@@ -50,6 +51,7 @@
 	Set TeConverterenProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
 	Set TeConverterenProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart()
 	Set TeConverterenProduct.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Reling()
+	Set TeConverterenProduct.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TIPONBLUMOTION()
 	
 	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
 	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
@@ -63,6 +65,7 @@
 	Do $$$AssertEquals(WebOrderLijn.ItemCB,"800")
 	Do $$$AssertEquals(WebOrderLijn.ItemFB,"D")
 	Do $$$AssertEquals(WebOrderLijn.ItemBX,"Reling")
+	Do $$$AssertEquals(WebOrderLijn.ItemBM,"TOB")
 ]]></Implementation>
 </Method>
 
@@ -370,6 +373,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: ProductFeatures: GeleiderTechnologie: Als B, dan I">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).BLUMOTION()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemBM,"I")
+]]></Implementation>
+</Method>
+
 <Method name="Test: ProductFeatures - ZijwandverhogingType -&gt; ItemBX">
 <Implementation><![CDATA[
 	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
@@ -409,6 +424,7 @@
 	Set TeConverterenProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
 	Set TeConverterenProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart()
 	Set TeConverterenProduct.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Laag()
+	Set TeConverterenProduct.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TIPON()
 	Quit TeConverterenProduct
 ]]></Implementation>
 </Method>
Index: DOM/PM/enu/TBXGeleiderTechnologie.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXGeleiderTechnologie.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXGeleiderTechnologie.cls.xml	(revision 35814)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXGeleiderTechnologie">
+<Description>
+Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils</Description>
+<ClassType>datatype</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Enumeration</Super>
+
+<Parameter name="VALUELIST">
+<Default>;B;T;TOB</Default>
+</Parameter>
+
+<Parameter name="DISPLAYLIST">
+<Default>;BLUMOTION;TIP-ON;TIP-ON BLUMOTION</Default>
+</Parameter>
+
+<Method name="BLUMOTION">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXGeleiderTechnologie</ReturnType>
+<Implementation><![CDATA[	Quit "B"
+]]></Implementation>
+</Method>
+
+<Method name="TIPON">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXGeleiderTechnologie</ReturnType>
+<Implementation><![CDATA[	Quit "T"
+]]></Implementation>
+</Method>
+
+<Method name="TIPONBLUMOTION">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXGeleiderTechnologie</ReturnType>
+<Implementation><![CDATA[	Quit "TOB"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXGeleiderTechnologie/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXGeleiderTechnologie/AutoComplete.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXGeleiderTechnologie/AutoComplete.cls.xml	(revision 35814)
@@ -0,0 +1,35 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXGeleiderTechnologie.AutoComplete">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%SerialObject</Super>
+
+<Property name="BLUMOTION">
+<Type>%String</Type>
+<InitialExpression>"B"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="TIPON">
+<Type>%String</Type>
+<InitialExpression>"T"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="TIPONBLUMOTION">
+<Type>%String</Type>
+<InitialExpression>"TOB"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>