Index: APPS/EC/Winkelkar/impl/WinkelkarControleur.cls.xml
===================================================================
diff -u -r57829 -r58019
--- APPS/EC/Winkelkar/impl/WinkelkarControleur.cls.xml	(.../WinkelkarControleur.cls.xml)	(revision 57829)
+++ APPS/EC/Winkelkar/impl/WinkelkarControleur.cls.xml	(.../WinkelkarControleur.cls.xml)	(revision 58019)
@@ -74,24 +74,32 @@
 	Do ..ControleerInput(..MagKlantVerpakkingTypeBestellen(VerpakkingType), WinkelkarNietBesteld _ " " _ VerpakkingTypeNietToegelaten)
 	
 	#Dim MinimumAantal As %Integer = ..KlantInstellingenService.GeefMinimaleBestelhoeveelheid(..Winkelkar.GeefKlantID(), VerpakkingType)
-	#Dim HeeftMinimumAantal As %Boolean = ..HeeftMinimumAantalVoorVerpakkingType(VerpakkingType, MinimumAantal)
+	#dim LadeVariantZonderMinimumAantalVanVerpakkingType As TECH.String = ..GeefEerstvolgendeLadeVariantZonderMinimumAantalVanVerpakkingType(VerpakkingType, MinimumAantal)
+	#Dim HeeftMinimumAantal As %Boolean = (LadeVariantZonderMinimumAantalVanVerpakkingType = "")
 	
 	If $$$Not(HeeftMinimumAantal) {
-		#Dim Melding As %String = ..MaakMeldingMinimumAantalVanVerpakkingType(MinimumAantal, VerpakkingType, WinkelkarNietBesteld)
+		#dim Melding As %String = ..MaakMeldingMinimumAantalVanVerpakkingType(MinimumAantal, VerpakkingType, LadeVariantZonderMinimumAantalVanVerpakkingType, WinkelkarNietBesteld)
 		Do ..ControleerInput(HeeftMinimumAantal, Melding)
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="MaakMeldingMinimumAantalVanVerpakkingType">
-<FormalSpec>MinimumAantal:%Integer,VerpakkingType:TECH.String,WinkelkarNietBesteld:%String</FormalSpec>
+<FormalSpec>MinimumAantal:%Integer,VerpakkingType:TECH.String,LadeVariant:TECH.String,WinkelkarNietBesteld:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#Dim MinimumAantalVanVerpakkingType As %String = ..Vertaler.GeefVertaling("MinimumAantalVanVerpakkingType")
+	#dim MinimumAantalVanVerpakkingType As %String
 	
+	If (VerpakkingType = "Probox") {
+		Set MinimumAantalVanVerpakkingType = ..Vertaler.GeefVertaling("MinimumAantalVanVerpakkingTypeNietCombineerbaar")
+	} Else {
+		Set MinimumAantalVanVerpakkingType = ..Vertaler.GeefVertaling("MinimumAantalVanVerpakkingTypeCombineerbaar")
+	}
+	
 	Set MinimumAantalVanVerpakkingType = ##class(TECH.StringUtils).Replace(MinimumAantalVanVerpakkingType, "::Aantal::", MinimumAantal)
 	Set MinimumAantalVanVerpakkingType = ##class(TECH.StringUtils).Replace(MinimumAantalVanVerpakkingType, "::VerpakkingType::", VerpakkingType)
+	Set MinimumAantalVanVerpakkingType = ##class(TECH.StringUtils).Replace(MinimumAantalVanVerpakkingType, "::LadeVariant::", LadeVariant)
 	
 	Quit WinkelkarNietBesteld _ " " _ MinimumAantalVanVerpakkingType
 ]]></Implementation>
@@ -145,20 +153,30 @@
 ]]></Implementation>
 </Method>
 
-<Method name="HeeftMinimumAantalVoorVerpakkingType">
+<Method name="GeefEerstvolgendeLadeVariantZonderMinimumAantalVanVerpakkingType">
 <FormalSpec>VerpakkingTypeMetBeperking:%String,MinimumAantalVoorVerpakkingType:%Integer</FormalSpec>
 <Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
+<ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
+	#dim EerstvolgendeLadeVariant As TECH.String = ""
+	
 	#dim AantalVanLBXVerpakkingType As %Integer = ..VerpakkingControleur.GeefAantalVanLBXVerpakkingType(VerpakkingTypeMetBeperking)
 	#dim AantalVanTAORVerpakkingType As %Integer = ..VerpakkingControleur.GeefAantalVanTAORVerpakkingType(VerpakkingTypeMetBeperking)
 	#dim AantalVanTBXVerpakkingType As %Integer = ..VerpakkingControleur.GeefAantalVanTBXVerpakkingType(VerpakkingTypeMetBeperking)
 	
 	#dim HeeftMinimumAantalVoorLbx As %Boolean = ((AantalVanLBXVerpakkingType = 0) || (AantalVanLBXVerpakkingType >= MinimumAantalVoorVerpakkingType)) 
 	#dim HeeftMinimumAantalVoorTax As %Boolean = ((AantalVanTAORVerpakkingType = 0) || (AantalVanTAORVerpakkingType >= MinimumAantalVoorVerpakkingType))
 	#dim HeeftMinimumAantalVoorTbx As %Boolean = ((AantalVanTBXVerpakkingType = 0) || (AantalVanTBXVerpakkingType >= MinimumAantalVoorVerpakkingType))
-		
-	Quit HeeftMinimumAantalVoorLbx && HeeftMinimumAantalVoorTax && HeeftMinimumAantalVoorTbx
+	
+	If ($$$Not(HeeftMinimumAantalVoorLbx)) {
+		Set EerstvolgendeLadeVariant = "LEGRABOX"
+	} ElseIf ($$$Not(HeeftMinimumAantalVoorTax)) {
+		Set EerstvolgendeLadeVariant = "TA'OR BOX"
+	} ElseIf ($$$Not(HeeftMinimumAantalVoorTbx)) {
+		Set EerstvolgendeLadeVariant = "TANDEMBOX"
+	}
+	
+	Quit EerstvolgendeLadeVariant
 ]]></Implementation>
 </Method>