Index: APPS/Halux/Planning/impl/BatchService.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 29059)
+++ APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 30702)
@@ -181,32 +181,19 @@
 	Set ProductieService = ##class(APPS.Halux.common.ProductieService).%New()
 	#dim Categorie As APPS.Halux.common.enu.Categorie = ProductieService.GeefCategorieVoorToelevering(Toelevering)
 	#dim Lijnen As list of %String = ..GeefProductieLijnNamen(Categorie)
-	If (Lijnen.Count() = 1)
-	{
+	If (Lijnen.Count() = 1)	{
 		Set Lijn = Lijnen.GetAt(1)
-	}
-	ElseIf (
-		(Categorie = ##class(APPS.Halux.common.enu.Categorie).Tandembox()) 
-		|| (Categorie = ##class(APPS.Halux.common.enu.Categorie).Legrabox())
-		|| (Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox())
-		)
-	{
+	} ElseIf ##class(TECH.StringUtils).Equals(Categorie,##class(APPS.Halux.common.enu.Categorie).Tandembox(),##class(APPS.Halux.common.enu.Categorie).Legrabox(),##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
 		#dim ProductLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefTypeToeleveringLijnIterator(##class(DOM.AKP.enu.ToeleveringLijnType).Product()).Next()
 		#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieService.GeefProductieGroep(Toelevering.GeefKlantID(), ProductLijn.GeefProductID())
-		
-		If (
-				   (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Stuk()) 
-				|| (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Kast())
-			)
-		{
+		If ##class(TECH.StringUtils).Equals(ProductieGroep,##class(APPS.Halux.common.enu.ProductieGroep).Stuk(),##class(APPS.Halux.common.enu.ProductieGroep).Kast()) {
 			Set Lijn = ##class(APPS.Halux.common.enu.ProductieLijn).Een()
-		}
-		Else
-		{
+		} Else {
 			Set Lijn = ##class(APPS.Halux.common.enu.ProductieLijn).Twee()
 		}
 	}
-	Quit Lijn
+	
+	quit Lijn
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/common/impl/ProductieGroepBepalerKAD.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/impl/ProductieGroepBepalerKAD.cls.xml	(.../ProductieGroepBepalerKAD.cls.xml)	(revision 29059)
+++ APPS/Halux/common/impl/ProductieGroepBepalerKAD.cls.xml	(.../ProductieGroepBepalerKAD.cls.xml)	(revision 30702)
@@ -4,9 +4,10 @@
 <Super>APPS.Halux.common.impl.ProductieGroepBepaler</Super>
 
 <Method name="GeefProductieGroep">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[
-	#dim Kaderdeur As DOM.PM.KADProduct.KADKaderdeur = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefKaderdeurProduct(..ProductID)
+	#dim Kaderdeur As DOM.PM.KADProduct.KADKaderdeur = ..ProductTypeAPI.GeefKaderdeurProduct(ProductID)
 	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = "KAD-"_Kaderdeur.GeefProfielType()_"-"_Kaderdeur.GeefProfielAfwerking()
 	if '##class(APPS.Halux.common.enu.ProductieGroep).IsValid(ProductieGroep) {
 		
Index: APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml	(.../ProductieGroepBepalerTAX.cls.xml)	(revision 29059)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml	(.../ProductieGroepBepalerTAX.cls.xml)	(revision 30702)
@@ -1,26 +1,52 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.common.impl.ProductieGroepBepalerTAX">
-<Super>APPS.Halux.common.impl.ProductieGroepBepaler</Super>
+<Super>APPS.Halux.common.impl.ProductieGroepBepaler,DOM.PM.enu.TAORVerpakkingType.Verwerker</Super>
 
+<Property name="ProductieGroep">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="GeefProductieGroep">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[
-	#dim ProductieGroep As %String = ##class(APPS.Halux.common.enu.ProductieGroep).Standaard()
-	
-	#dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMaatwerkProduct(..ProductID)
-	
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken()
-	
-	If (IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()) {
-		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Stuk()
-	} ElseIf (IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).Probox()) {
-		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Probox()
-	}
+	set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Standaard()
+	do ..Verwerk(..ProductTypeAPI.GeefMaatwerkProduct(ProductID).GeefIngegevenKenmerken().VerpakkingType)
+	quit ..ProductieGroep
+]]></Implementation>
+</Method>
 
-	quit ProductieGroep
+<Method name="VerwerkBulkPerOnderdeelGegroepeerd">
+<Private>1</Private>
+<Implementation><![CDATA[	set ..ProductieGroep = "TAX-BOG"
 ]]></Implementation>
 </Method>
+
+<Method name="VerwerkFlatpackV1">
+<Private>1</Private>
+<Implementation><![CDATA[	set ..ProductieGroep = "TAX-FP"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkLosseComponentenInBulk">
+<Private>1</Private>
+<Implementation><![CDATA[	set ..ProductieGroep = "TAX-LC"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkProbox">
+<Private>1</Private>
+<Implementation><![CDATA[	set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Probox()
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkV1">
+<Private>1</Private>
+<Implementation><![CDATA[	set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Stuk()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml	(.../ProductieGroepBepalerLBX.cls.xml)	(revision 29059)
+++ APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml	(.../ProductieGroepBepalerLBX.cls.xml)	(revision 30702)
@@ -4,15 +4,16 @@
 <Super>APPS.Halux.common.impl.ProductieGroepBepaler</Super>
 
 <Method name="GeefProductieGroep">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[
 	#dim ProductieGroep As %String = ##class(APPS.Halux.common.enu.ProductieGroep).Standaard()
 	/// Als versienummer gewist is, heeft PM zeker aan de bouwstenen gewerkt.  Voor LBX is dat een
 	/// aandachtspunt want de productieaansturing gebruikt de bouwstenen niet.
-	If ( ' $$IsVersienummerIngevuld^PRBS(..ProductID)) {
+	If ( ' $$IsVersienummerIngevuld^PRBS(ProductID)) {
 		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).SpecialsPM()
 	} Else {
-		#dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMaatwerkProduct(..ProductID)
+		#dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ..ProductTypeAPI.GeefMaatwerkProduct(ProductID)
 		#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken()
 		If (IngegevenKenmerken.ProductieWijze '= ##class(DOM.PM.enu.LBXProductieWijze).Volledig()) {
 			Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
Index: APPS/Halux/common/enu/ProductieGroep/AutoComplete.cls.xml
===================================================================
diff -u
--- APPS/Halux/common/enu/ProductieGroep/AutoComplete.cls.xml	(revision 0)
+++ APPS/Halux/common/enu/ProductieGroep/AutoComplete.cls.xml	(revision 30702)
@@ -0,0 +1,203 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.common.enu.ProductieGroep.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="BulkPerOnderdeelGegroepeerd">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"TAX-BOG"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="FlatpackV1">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"TAX-FP"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurAlleenGlas">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-VUL-VUL"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurP05xEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-P05-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPB9xEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PB9-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPBAxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PBA-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPBGxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PBG-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPBKxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PBK-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPBRxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PBR-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSAxCR">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSA-CR"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSAxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSA-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSAxIL">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSA-IL"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSSxWE">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSS-WE"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSVxEV">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSV-EV"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSVxIL">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSV-IL"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KaderdeurPSVxWE">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"KAD-PSV-WE"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Kast">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"A"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="LBXSpoelbak">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"LBX-SPOELBAK"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="LBXSpoelbakVHoss">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"LBX-SPOELBAK-VHOSS"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="LosseComponenten">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"TAX-LC"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Pallet">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"P"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Plus">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"+"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Probox">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"X"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Specials">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"Special"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="SpecialsPM">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"SpecialPM"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Standaard">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"Std"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Stuk">
+<Type>APPS.Halux.common.enu.ProductieGroep</Type>
+<InitialExpression>"S"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r29059 -r30702
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 30702)
@@ -61,8 +61,8 @@
 <Implementation><![CDATA[
 	#dim FakeKlantID As DOM.VKP.VanHoeckeKlantID = $$$DummyString
 	#dim Product As DOM.PM.MaatwerkProduct = ##class(DOM.PM.Maatwerk.impl.ProductMaker).%New().MaakProductVanIngegevenKenmerken(IngegevenKenmerken)
-	Set ProductieGroepBepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerLBX).%New(FakeKlantID, Product.GeefPRNr())
-	Do $$$AssertEquals(ProductieGroepBepaler.GeefProductieGroep(),VerwachteProductieGroep)
+	Set ProductieGroepBepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerLBX).%New()
+	Do $$$AssertEquals(ProductieGroepBepaler.GeefProductieGroep(FakeKlantID, Product.GeefPRNr()),VerwachteProductieGroep)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r29059 -r30702
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 30702)
@@ -84,13 +84,13 @@
 	// Assign 
 	#dim DummyKlantID As DOM.VKP.VanHoeckeKlantID = $$$DummyString
 	#dim MockProductID As %String = ..#ProductID
-	Set ProductieGroepBepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(DummyKlantID,MockProductID)
-	
 	#dim ProductTypeAPI As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).MockInstance()
+	Set ProductieGroepBepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(ProductTypeAPI)
+	
 	Do ProductTypeAPI.IndienMethodCall("GeefTandemboxProduct",MockProductID).DanReturn(TBXLade)
 	
 	// Act 
-	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieGroepBepaler.GeefProductieGroep()
+	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieGroepBepaler.GeefProductieGroep(DummyKlantID,MockProductID)
 	
 	// Assert 
 	Do $$$AssertEquals(ProductieGroep,VerwachteProductieGroep)
Index: APPS/Halux/common/impl/ProductieGroepBepaler.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/impl/ProductieGroepBepaler.cls.xml	(.../ProductieGroepBepaler.cls.xml)	(revision 29059)
+++ APPS/Halux/common/impl/ProductieGroepBepaler.cls.xml	(.../ProductieGroepBepaler.cls.xml)	(revision 30702)
@@ -1,32 +1,26 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.common.impl.ProductieGroepBepaler">
-<Super>%RegisteredObject</Super>
+<Super>TECH.RegisteredObject</Super>
 
-<Property name="KlantID">
-<Type>%String</Type>
+<Property name="ProductTypeAPI">
+<Type>DOM.PM.ProductTypeAPI</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="ProductID">
-<Type>%String</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
-<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..KlantID = KlantID
-	set ..ProductID = ProductID
+	set ..ProductTypeAPI =  ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefProductieGroep">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[	quit ##class(APPS.Halux.common.enu.ProductieGroep).Standaard()
 ]]></Implementation>
Index: APPS/Halux/common/enu/ProductieGroep.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/enu/ProductieGroep.cls.xml	(.../ProductieGroep.cls.xml)	(revision 29059)
+++ APPS/Halux/common/enu/ProductieGroep.cls.xml	(.../ProductieGroep.cls.xml)	(revision 30702)
@@ -6,7 +6,7 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>,P,A,S,+,X,Std,Special,SpecialPM,KAD-PSV-EV,KAD-PSV-IL,KAD-PSS-WE,KAD-PSA-EV,KAD-PSA-CR,KAD-PSA-IL,KAD-PSG-EV,KAD-PBG-EV,KAD-PBA-EV,KAD-PBR-EV,KAD-PBK-EV,KAD-PB9-EV,KAD-P05-EV,KAD-PSS-WE,KAD-VUL-VUL,LBX-SPOELBAK,LBX-SPOELBAK-VHOSS</Default>
+<Default>,P,A,S,+,X,Std,Special,SpecialPM,KAD-PSV-EV,KAD-PSV-IL,KAD-PSS-WE,KAD-PSA-EV,KAD-PSA-CR,KAD-PSA-IL,KAD-PSG-EV,KAD-PBG-EV,KAD-PBA-EV,KAD-PBR-EV,KAD-PBK-EV,KAD-PB9-EV,KAD-P05-EV,KAD-PSS-WE,KAD-VUL-VUL,LBX-SPOELBAK,LBX-SPOELBAK-VHOSS,TAX-LC,TAX-FP,TAX-BOG</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
@@ -48,6 +48,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="LosseComponenten">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
+<Implementation><![CDATA[	Quit "TAX-LC"
+]]></Implementation>
+</Method>
+
+<Method name="FlatpackV1">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
+<Implementation><![CDATA[	Quit "TAX-FP"
+]]></Implementation>
+</Method>
+
+<Method name="BulkPerOnderdeelGegroepeerd">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
+<Implementation><![CDATA[	Quit "TAX-BOG"
+]]></Implementation>
+</Method>
+
 <Method name="Standaard">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
Index: APPS/Halux/common/ProductieService.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/ProductieService.cls.xml	(.../ProductieService.cls.xml)	(revision 29059)
+++ APPS/Halux/common/ProductieService.cls.xml	(.../ProductieService.cls.xml)	(revision 30702)
@@ -9,27 +9,28 @@
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[
-	#dim ProductGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepaler = ..GeefProductieGroepBepaler(KlantID,ProductID)
-	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep  = ProductGroepBepaler.GeefProductieGroep()
+	#dim ProductGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepaler = ..GeefProductieGroepBepaler(ProductID)
+	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep  = ProductGroepBepaler.GeefProductieGroep(KlantID,ProductID)
 	Quit ProductieGroep
 ]]></Implementation>
 </Method>
 
 <Method name="GeefProductieGroepBepaler">
-<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
+<FormalSpec>ProductID:%String</FormalSpec>
 <Private>1</Private>
+<ReturnType>APPS.Halux.common.impl.ProductieGroepBepaler</ReturnType>
 <Implementation><![CDATA[
 	#dim Categorie As APPS.Halux.common.enu.Categorie = ..GeefCategorie(ProductID)
 	if Categorie = ##class(APPS.Halux.common.enu.Categorie).Tandembox() {
-		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(KlantID,ProductID)
+		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New()
 	} elseif Categorie = ##class(APPS.Halux.common.enu.Categorie).Kaderdeur() {
-		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerKAD).%New(KlantID,ProductID)
+		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerKAD).%New()
 	} elseif Categorie = ##class(APPS.Halux.common.enu.Categorie).Legrabox() {
-		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerLBX).%New(KlantID,ProductID)
+		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerLBX).%New()
 	} elseif Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox() {
-		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTAX).%New(KlantID,ProductID)
+		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTAX).%New()
 	} else {
-		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepaler).%New(KlantID,ProductID)
+		set Bepaler = ##class(APPS.Halux.common.impl.ProductieGroepBepaler).%New()
 	}
 	quit Bepaler
 ]]></Implementation>
Index: APPS/Halux/common/enu/ProductieGroep/Verwerker.cls.xml
===================================================================
diff -u
--- APPS/Halux/common/enu/ProductieGroep/Verwerker.cls.xml	(revision 0)
+++ APPS/Halux/common/enu/ProductieGroep/Verwerker.cls.xml	(revision 30702)
@@ -0,0 +1,240 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.common.enu.ProductieGroep.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>ProductieGroep:APPS.Halux.common.enu.ProductieGroep</FormalSpec>
+<Implementation><![CDATA[
+	If ProductieGroep = "TAX-BOG" {
+		Do ..VerwerkBulkPerOnderdeelGegroepeerd()
+	} ElseIf ProductieGroep = "TAX-FP" {
+		Do ..VerwerkFlatpackV1()
+	} ElseIf ProductieGroep = "KAD-VUL-VUL" {
+		Do ..VerwerkKaderdeurAlleenGlas()
+	} ElseIf ProductieGroep = "KAD-P05-EV" {
+		Do ..VerwerkKaderdeurP05xEV()
+	} ElseIf ProductieGroep = "KAD-PB9-EV" {
+		Do ..VerwerkKaderdeurPB9xEV()
+	} ElseIf ProductieGroep = "KAD-PBA-EV" {
+		Do ..VerwerkKaderdeurPBAxEV()
+	} ElseIf ProductieGroep = "KAD-PBG-EV" {
+		Do ..VerwerkKaderdeurPBGxEV()
+	} ElseIf ProductieGroep = "KAD-PBK-EV" {
+		Do ..VerwerkKaderdeurPBKxEV()
+	} ElseIf ProductieGroep = "KAD-PBR-EV" {
+		Do ..VerwerkKaderdeurPBRxEV()
+	} ElseIf ProductieGroep = "KAD-PSA-CR" {
+		Do ..VerwerkKaderdeurPSAxCR()
+	} ElseIf ProductieGroep = "KAD-PSA-EV" {
+		Do ..VerwerkKaderdeurPSAxEV()
+	} ElseIf ProductieGroep = "KAD-PSA-IL" {
+		Do ..VerwerkKaderdeurPSAxIL()
+	} ElseIf ProductieGroep = "KAD-PSS-WE" {
+		Do ..VerwerkKaderdeurPSSxWE()
+	} ElseIf ProductieGroep = "KAD-PSV-EV" {
+		Do ..VerwerkKaderdeurPSVxEV()
+	} ElseIf ProductieGroep = "KAD-PSV-IL" {
+		Do ..VerwerkKaderdeurPSVxIL()
+	} ElseIf ProductieGroep = "KAD-PSV-WE" {
+		Do ..VerwerkKaderdeurPSVxWE()
+	} ElseIf ProductieGroep = "A" {
+		Do ..VerwerkKast()
+	} ElseIf ProductieGroep = "LBX-SPOELBAK" {
+		Do ..VerwerkLBXSpoelbak()
+	} ElseIf ProductieGroep = "LBX-SPOELBAK-VHOSS" {
+		Do ..VerwerkLBXSpoelbakVHoss()
+	} ElseIf ProductieGroep = "TAX-LC" {
+		Do ..VerwerkLosseComponenten()
+	} ElseIf ProductieGroep = "P" {
+		Do ..VerwerkPallet()
+	} ElseIf ProductieGroep = "+" {
+		Do ..VerwerkPlus()
+	} ElseIf ProductieGroep = "X" {
+		Do ..VerwerkProbox()
+	} ElseIf ProductieGroep = "Special" {
+		Do ..VerwerkSpecials()
+	} ElseIf ProductieGroep = "SpecialPM" {
+		Do ..VerwerkSpecialsPM()
+	} ElseIf ProductieGroep = "Std" {
+		Do ..VerwerkStandaard()
+	} ElseIf ProductieGroep = "S" {
+		Do ..VerwerkStuk()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(ProductieGroep,"APPS.Halux.common.enu.ProductieGroep")
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBulkPerOnderdeelGegroepeerd">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkFlatpackV1">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurAlleenGlas">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurP05xEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPB9xEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPBAxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPBGxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPBKxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPBRxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSAxCR">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSAxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSAxIL">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSSxWE">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSVxEV">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSVxIL">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKaderdeurPSVxWE">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKast">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkLBXSpoelbak">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkLBXSpoelbakVHoss">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkLosseComponenten">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkPallet">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkPlus">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkProbox">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkSpecials">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkSpecialsPM">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStandaard">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStuk">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml
===================================================================
diff -u -r29059 -r30702
--- APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 29059)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 30702)
@@ -4,11 +4,12 @@
 <Super>APPS.Halux.common.impl.ProductieGroepBepaler</Super>
 
 <Method name="GeefProductieGroep">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.ProductieGroep</ReturnType>
 <Implementation><![CDATA[
 	#dim ProductieGroep As %String = ""
 	
-	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefTandemboxProduct(..ProductID)
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..ProductTypeAPI.GeefTandemboxProduct(ProductID)
 	#dim Verpakking As DOM.PM.enu.TBXVerpakking = TBXLade.GeefVerpakking()
 	#dim ODSP As %String = TBXLade.GeefOnderdelenSpeciaal()
 
@@ -18,7 +19,7 @@
 		Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
 	} ElseIf ((Verpakking = ##class(DOM.PM.enu.TBXVerpakking).KastMetOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).KastZonderOnderdelen())) {
 		set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Pallet()
-		If (..IsKastKlant()) {
+		If (..IsKastKlant(KlantID)) {
 			Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Kast()
 		}
 	} ElseIf ((Verpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).CommissieMetOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).CommissieZonderOnderdelen())) {
@@ -42,10 +43,11 @@
 </Method>
 
 <Method name="IsKastKlant">
+<FormalSpec>KlantID:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(..KlantID)
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantID)
 	#dim KlantOrderInstellingen As DOM.VKP.KlantOrderInstellingen= Klant.GeefKlantOrderInstellingen()
 	quit KlantOrderInstellingen.MagVHossBestellen()
 ]]></Implementation>
Index: vhTest/Mock/APPS/Halux/common/ProductieService.cls.xml
===================================================================
diff -u -r29059 -r30702
--- vhTest/Mock/APPS/Halux/common/ProductieService.cls.xml	(.../ProductieService.cls.xml)	(revision 29059)
+++ vhTest/Mock/APPS/Halux/common/ProductieService.cls.xml	(.../ProductieService.cls.xml)	(revision 30702)
@@ -8,13 +8,6 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.Halux.common.ProductieService,Tools.Mock.MockClassBase</Super>
 
-<Method name="GeefBesteldStatus">
-<FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBesteldStatus",Toelevering)
-]]></Implementation>
-</Method>
-
 <Method name="GeefCategorie">
 <FormalSpec>ProductID:DOM.common.ProductID</FormalSpec>
 <ReturnType>APPS.Halux.common.enu.Categorie</ReturnType>
@@ -29,27 +22,13 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefGeleverdStatus">
-<FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefGeleverdStatus",Toelevering)
-]]></Implementation>
-</Method>
-
 <Method name="GeefGlasBestellingStatussen">
 <FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefGlasBestellingStatussen",Toelevering)
 ]]></Implementation>
 </Method>
 
-<Method name="GeefHerbesteldStatus">
-<FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefHerbesteldStatus",Toelevering)
-]]></Implementation>
-</Method>
-
 <Method name="GeefKaderdeurProductLijnen">
 <FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
@@ -78,24 +57,12 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefProductieGroepBepaler">
-<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,ProductID:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("GeefProductieGroepBepaler",KlantID,ProductID)
-]]></Implementation>
-</Method>
-
 <Method name="GeefProductieLijnen">
 <FormalSpec>ProductieGroep:APPS.Halux.common.enu.ProductieGroep</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductieLijnen",ProductieGroep)
 ]]></Implementation>
 </Method>
-
-<Method name="VoegToeIndienNietLeeg">
-<FormalSpec>String:%String,List:%ListOfDataTypes</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("VoegToeIndienNietLeeg",String,List)
-]]></Implementation>
-</Method>
 </Class>