Index: APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml
===================================================================
diff -u -r41254 -r52231
--- APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml	(.../IngegevenKenmerkVerpakkingVisitor.cls.xml)	(revision 41254)
+++ APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml	(.../IngegevenKenmerkVerpakkingVisitor.cls.xml)	(revision 52231)
@@ -23,6 +23,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LBXVerschillendeVerpakkingsTypes">
+<Type>TECH.FrequentieTabel</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TAORVerschillendeVerpakkingsTypes">
+<Type>TECH.FrequentieTabel</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TBXVerschillendeVerpakkingsTypes">
+<Type>TECH.FrequentieTabel</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="AantalTeGebruikenBijVerwerking">
 <Type>%Integer</Type>
 <Private>1</Private>
@@ -39,6 +54,12 @@
 	Set ..VerpakkingenTAOR = ##class(TECH.FrequentieTabel).%New()
 	Set ..VerpakkingenTBX = ##class(TECH.FrequentieTabel).%New()
 	Set ..VerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
+	
+	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
+		Set ..LBXVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
+		Set ..TAORVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
+		Set ..TBXVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
+	}
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -54,6 +75,11 @@
 <Implementation><![CDATA[
 	Do ..VerpakkingenLBX.VerhoogMetAantal(LBXKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
 	Do ..VerschillendeVerpakkingsTypes.VerhoogMetAantal(LBXKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
+	Do ##class(Tools.Wlip).%New(191).String("VerwerkLBXKenmerken, VerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_LBXKenmerken.VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
+		Do ..LBXVerschillendeVerpakkingsTypes.VerhoogMetAantal(LBXKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
+		Do ##class(Tools.Wlip).%New(191).String("VerwerkLBXKenmerken, LBXVerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_LBXKenmerken.VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	}
 ]]></Implementation>
 </Method>
 
@@ -62,6 +88,11 @@
 <Implementation><![CDATA[
 	Do ..VerpakkingenTAOR.VerhoogMetAantal(TAORKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
 	Do ..VerschillendeVerpakkingsTypes.VerhoogMetAantal(TAORKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
+	Do ##class(Tools.Wlip).%New(191).String("VerwerkTAORKenmerken, VerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_TAORKenmerken.VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
+		Do ..TAORVerschillendeVerpakkingsTypes.VerhoogMetAantal(TAORKenmerken.VerpakkingType,..AantalTeGebruikenBijVerwerking)
+		Do ##class(Tools.Wlip).%New(191).String("VerwerkTAORKenmerken, TAORVerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_TAORKenmerken.VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	}
 ]]></Implementation>
 </Method>
 
@@ -77,12 +108,25 @@
 	
 	Do ..VerpakkingenTBX.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
 	Do ..VerschillendeVerpakkingsTypes.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
+	Do ##class(Tools.Wlip).%New(191).String("VerwerkTBXKenmerken, VerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
+		Do ..TBXVerschillendeVerpakkingsTypes.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
+		Do ##class(Tools.Wlip).%New(191).String("VerwerkTBXKenmerken, TBXVerschillendeVerpakkingsTypes.VerhoogMetAantal, VerpakkingType: '"_VerpakkingType_"' / AantalTeGebruikenBijVerwerking: '"_..AantalTeGebruikenBijVerwerking_"'")
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="GeefAantalVerschillendeVerpakkingTypes">
 <ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit ..VerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()
+<Implementation><![CDATA[
+	#dim Aantal As %Integer = ..VerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()
+	Do ##class(Tools.Wlip).%New(191).String("GeefAantalVerschillendeVerpakkingTypes: '"_Aantal_"'")
+	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
+		Do ##class(Tools.Wlip).%New(191).String("LBXVerschillendeVerpakkingsTypes: '"_..LBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()_"' / TAORVerschillendeVerpakkingsTypes: '"_..TAORVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()_"' / TBXVerschillendeVerpakkingsTypes: '"_..TBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()_"'")
+		Set Aantal = ##class(TECH.Math).Grootste(..LBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems(), ..TAORVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems(), ..TBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems())
+	}
+	Do ##class(Tools.Wlip).%New(191).String("Aantal: '"_Aantal_"'")
+	Quit Aantal //..VerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()
 ]]></Implementation>
 </Method>