Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml
===================================================================
diff -u -r35783 -r35797
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 35783)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 35797)
@@ -31,6 +31,7 @@
 	Do ..ConvertCorpusWandDikte(Product,WebOrderLijn)
 	Do ..ConvertOpvullijst(Product,WebOrderLijn)
 	Do ..ConvertFrontOndersteuningAantal(Product,WebOrderLijn)
+	Do ..ConvertGreepEnMeenemer(Product,WebOrderLijn)
 	
 	Quit WebOrderLijn
 ]]></Implementation>
@@ -91,6 +92,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConvertGreepEnMeenemer">
+<FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&WebOrderLijn:WS.TBX.EM.OrderLijn]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (Product.HeeftGreepEnMeenemer || Product.HeeftGreep) && $$$Not(Product.IsBinnenlade) {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen binnenlade, maar wel binnenladeopties ingevuld"))
+	}
+	Set WebOrderLijn.ItemBGRP = "Z"
+	If Product.HeeftGreepEnMeenemer {
+		Set WebOrderLijn.ItemBGRP = "M"
+	} ElseIf Product.HeeftGreep {
+		Set WebOrderLijn.ItemBGRP = "G"
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefConvertDataTBX">
 <Private>1</Private>
 <ReturnType>TECH.ObjectUtils.ObjectConvertData</ReturnType>
Index: APPS/EDI/common/dto/v001/LadeTBX.cls.xml
===================================================================
diff -u -r35783 -r35797
--- APPS/EDI/common/dto/v001/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 35783)
+++ APPS/EDI/common/dto/v001/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 35797)
@@ -30,6 +30,14 @@
 <Property name="FrontOndersteuningAantal">
 <Type>TECH.String</Type>
 </Property>
+
+<Property name="HeeftGreep">
+<Type>TECH.String</Type>
+</Property>
+
+<Property name="HeeftGreepEnMeenemer">
+<Type>TECH.String</Type>
+</Property>
 </Class>
 
 
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml
===================================================================
diff -u -r35793 -r35797
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 35793)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 35797)
@@ -203,6 +203,90 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: ProductFeatures: InsideBoxSystem: Geen greep, geen meenemer -&gt; &apos;Z&apos;">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreep = $$$False
+	Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$False
+	Set TeConverterenProduct.IsBinnenlade = $$$True
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"Z")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ProductFeatures: InsideBoxSystem: Geen greep, wel meenemer -&gt; &apos;M&apos;">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreep = $$$False
+	Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$True
+	Set TeConverterenProduct.IsBinnenlade = $$$True
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"M")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ProductFeatures: InsideBoxSystem: Wel greep, wel meenemer -&gt; &apos;M&apos;">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreep = $$$True
+	Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$True
+	Set TeConverterenProduct.IsBinnenlade = $$$True
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"M")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ProductFeatures: InsideBoxSystem: Wel greep, geen meenemer -&gt; &apos;G&apos;">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreep = $$$True
+	Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$False
+	Set TeConverterenProduct.IsBinnenlade = $$$True
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"G")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ProductFeatures: InsideBoxSystem: Greep ingevuld, maar niet IsBinnenlade -&gt; Exception ">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreep = $$$True
+	Set TeConverterenProduct.IsBinnenlade = $$$False
+	
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen binnenlade, maar wel binnenladeopties ingevuld")
+	do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings))
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+]]></Implementation>
+</Method>
+
+<Method name="Test: ProductFeatures: InsideBoxSystem: GreepEnMeenemer ingevuld, maar niet IsBinnenlade -&gt; Exception ">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.HeeftGreepEnMeenemer = $$$True
+	Set TeConverterenProduct.IsBinnenlade = $$$False
+	
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen binnenlade, maar wel binnenladeopties ingevuld")
+	do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings))
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerProduct(TeConverterenProduct)
+]]></Implementation>
+</Method>
+
 <Method name="Test: ProductFeatures - ZijwandverhogingType -&gt; ItemBX">
 <Implementation><![CDATA[
 	#dim TeConverterenProduct = ..GeefTeConverterenProduct()