Index: APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml
===================================================================
diff -u -r34691 -r35161
--- APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 34691)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 35161)
@@ -15,6 +15,10 @@
 
 	If (ODSP '= "") {
 		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
+	} ElseIf (TBXLade.GeefAantalHangmappen() > 0) {
+		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
+	} ElseIf (..GeefKlasse(ProductID) = ##class(DOM.PM.enu.TBXKlas).Buro()) {
+		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
 	} ElseIf (..IsBijzonderGroteLade(TBXLade)) {
 		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
 	} ElseIf ((Verpakking = ##class(DOM.PM.enu.TBXVerpakking).KastMetOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).KastZonderOnderdelen())) {
@@ -34,6 +38,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKlasse">
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	/*#dim KenmerkenService As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.ApplicatieContext).Instance().GeefKenmerkAPI().GeefKenmerkenService()
+	Quit KenmerkenService.GeefProductKenmerkenVoorKenmerkGroep(ProductID, "TBX").Kenmerken.*/
+	Quit $LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",ProductID,"KLAS"))
+]]></Implementation>
+</Method>
+
 <Method name="IsBijzonderGroteLade">
 <FormalSpec>TBXLade:DOM.PM.TBXProduct.TBXLade</FormalSpec>
 <Private>1</Private>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r34691 -r35161
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 34691)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 35161)
@@ -54,6 +54,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestHangMapLadeKomtInSpecials">
+<Implementation><![CDATA[
+	#dim LadeStub As vhTest.Mock.DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade()
+	Do LadeStub.IndienMethodCall("GeefAantalHangmappen").DanReturn(2)
+	
+	Do ..AssertProductieGroep(LadeStub, ##class(APPS.Halux.common.enu.ProductieGroep).Specials())
+]]></Implementation>
+</Method>
+
+<Method name="TestBuroLadeKomtInSpecials">
+<Implementation><![CDATA[
+	#dim LadeStub As vhTest.Mock.DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade()
+	Do ##class(Prod.Kenmerk.DataDefinitie).Set( "TBX", ..#ProductID, "KLAS", ##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.PM.enu.TBXKlas).Buro()) )
+
+	Do ..AssertProductieGroep(LadeStub, ##class(APPS.Halux.common.enu.ProductieGroep).Specials())
+	
+	Do ##class(Prod.Kenmerk.DataDefinitie).DeleteKM( "TBX", ..#ProductID, "KLAS" )
+]]></Implementation>
+</Method>
+
 <Method name="aaTestTBXLadeVHoss">
 <Implementation><![CDATA[
 	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).KastMetOnderdelen()
@@ -80,6 +100,7 @@
 	Do TBXLadeStub.IndienMethodCall("GeefOnderdelenSpeciaal").DanReturn(OnderdelenSpeciaal)
 	Do TBXLadeStub.IndienMethodCall("GeefBodemBreedte").DanReturn(BodemBreedte)
 	Do TBXLadeStub.IndienMethodCall("GeefBlumotion").DanReturn(GeleiderTechnologie)
+	Do TBXLadeStub.IndienMethodCall("GeefAantalHangmappen").DanReturn("")
 	
 	Quit TBXLadeStub
 ]]></Implementation>