Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/Test.cls.xml
===================================================================
diff -u -r40356 -r41770
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/Test.cls.xml	(.../Test.cls.xml)	(revision 40356)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/Test.cls.xml	(.../Test.cls.xml)	(revision 41770)
@@ -33,21 +33,21 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Probox met aantal 4 voor klant andere klant dan optimapack -&gt; exceptie verwacht">
+<Method name="Test: Probox met aantal 3 voor klant andere klant dan optimapack -&gt; exceptie verwacht">
 <Implementation><![CDATA[
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("De winkelkar is niet besteld. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 5 LEGRABOX lades bestellen. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 5 TA'OR BOX lades bestellen. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 5 TANDEMBOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 4 LEGRABOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 4 TA'OR BOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 4 TANDEMBOX lades bestellen. "
 		_"De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk.")
 	
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidUserInputException", Substrings))
-	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 4)
+	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 3)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Probox met aantal 5 voor klant andere klant dan optimapack -&gt; geen exceptie verwacht">
-<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 5)
+<Method name="Test: Probox met aantal 4 voor klant andere klant dan optimapack -&gt; geen exceptie verwacht">
+<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 4)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/Test.cls.xml
===================================================================
diff -u -r39936 -r41770
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/Test.cls.xml	(.../Test.cls.xml)	(revision 39936)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/Test.cls.xml	(.../Test.cls.xml)	(revision 41770)
@@ -33,21 +33,21 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Probox met aantal 4 voor klant andere klant dan optimapack -&gt; exceptie verwacht">
+<Method name="Test: Probox met aantal 3 voor klant andere klant dan optimapack -&gt; exceptie verwacht">
 <Implementation><![CDATA[
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("De winkelkar is niet besteld. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 5 LEGRABOX lades bestellen. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 5 TA'OR BOX lades bestellen. "
-		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 5 TANDEMBOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 4 LEGRABOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 4 TA'OR BOX lades bestellen. "
+		_"Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 4 TANDEMBOX lades bestellen. "
 		_"De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk.")
 	
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidUserInputException", Substrings))
-	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 4)
+	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 3)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Probox met aantal 5 voor klant andere klant dan optimapack -&gt; geen exceptie verwacht">
-<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 5)
+<Method name="Test: Probox met aantal 4 voor klant andere klant dan optimapack -&gt; geen exceptie verwacht">
+<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.VKP.enu.Klant).Keller(), 4)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Duits/TestBase.cls.xml
===================================================================
diff -u -r39935 -r41770
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Duits/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 39935)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Duits/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 41770)
@@ -38,7 +38,7 @@
 <Method name="TestControleerWinkelkarVerpakkingTypeProboxTeWeinigAantal">
 <Implementation><![CDATA[
 	#Dim Exception As TECH.String = "ControleerWinkelkarVerpakkingTypeProboxTeWeinigAantal"
-	#Dim Omschrijving As TECH.String = "Ihre Bestellung wurde noch nicht versandt. Die Verpackungsart 'Probox' ist erst ab einer Menge von 5 Schubkästen möglich."
+	#Dim Omschrijving As TECH.String = "Ihre Bestellung wurde noch nicht versandt. Die Verpackungsart 'Probox' ist erst ab einer Menge von 4 Schubkästen möglich."
 	
 	Do ..AssertInvalidUserInputException(Exception, Omschrijving)
 ]]></Implementation>
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestBase.cls.xml
===================================================================
diff -u -r39936 -r41770
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 39936)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 41770)
@@ -34,7 +34,7 @@
 <Method name="TestControleerWinkelkarVerpakkingTypeProboxTeWeinigAantal">
 <Implementation><![CDATA[
 	#dim Exception As TECH.String = "ControleerWinkelkarVerpakkingTypeProboxTeWeinigAantal"
-	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 5 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 5 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 5 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
+	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 4 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 4 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 4 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
 	
 	Do ..AssertInvalidUserInputException(Exception, Omschrijving)
 ]]></Implementation>
Index: APPS/common/impl/KlantInstellingenService.cls.xml
===================================================================
diff -u -r40356 -r41770
--- APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 40356)
+++ APPS/common/impl/KlantInstellingenService.cls.xml	(.../KlantInstellingenService.cls.xml)	(revision 41770)
@@ -105,7 +105,7 @@
 		} ElseIf KlantID = ##class(DOM.VKP.enu.Klant).Hein() {
 			Set MinimumAantal = 4
 		} Else {
-			Set MinimumAantal = 5
+			Set MinimumAantal = 4
 		}
     } ElseIf (##class(TECH.StringUtils).ToUpper(VerpakkingType) = "PROCOM") {
 		Set MinimumAantal = 6
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestTaorboxEnLegraboxZelfdeVerpakking.cls.xml
===================================================================
diff -u -r39936 -r41770
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestTaorboxEnLegraboxZelfdeVerpakking.cls.xml	(.../TestTaorboxEnLegraboxZelfdeVerpakking.cls.xml)	(revision 39936)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/Nederlands/TestTaorboxEnLegraboxZelfdeVerpakking.cls.xml	(.../TestTaorboxEnLegraboxZelfdeVerpakking.cls.xml)	(revision 41770)
@@ -36,7 +36,7 @@
 <Method name="TestTweeKeerTeWeinigAantal">
 <Implementation><![CDATA[
 	#dim Exception As TECH.String = "ControleerTweeKeerTeWeinigAantal"
-	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 5 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 5 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 5 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
+	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 4 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 4 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 4 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
 	
 	Do ..AssertInvalidUserInputException(Exception, Omschrijving)
 ]]></Implementation>
@@ -50,7 +50,7 @@
 <Method name="TestGenoegAantalEnTeWeinigAantal">
 <Implementation><![CDATA[
 	#dim Exception As TECH.String = "ControleerGenoegAantalEnTeWeinigAantal"
-	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 5 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 5 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 5 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
+	#dim Omschrijving As TECH.String = "De winkelkar is niet besteld. Om gebruik te maken van het verpakkingstype 'Probox' voor LEGRABOX, moet u minstens 4 LEGRABOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TA'OR BOX, moet u minstens 4 TA'OR BOX lades bestellen. Om gebruik te maken van het verpakkingstype 'Probox' voor TANDEMBOX, moet u minstens 4 TANDEMBOX lades bestellen. De combinatie van meerdere ladetypes in een 'Probox' is niet mogelijk."
 	
 	Do ..AssertInvalidUserInputException(Exception, Omschrijving)
 ]]></Implementation>
@@ -60,8 +60,8 @@
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim AantalTaorboxMetProbox As %Integer = 4
-	#dim AantalLegraboxMetProbox As %Integer = 4
+	#dim AantalTaorboxMetProbox As %Integer = 3
+	#dim AantalLegraboxMetProbox As %Integer = 3
 	
 	Quit ..Controleer(AantalTaorboxMetProbox, AantalLegraboxMetProbox)
 ]]></Implementation>