Index: APPS/Verpakking/DoosAanvuller.cls.xml
===================================================================
diff -u -r70759 -r71574
--- APPS/Verpakking/DoosAanvuller.cls.xml	(.../DoosAanvuller.cls.xml)	(revision 70759)
+++ APPS/Verpakking/DoosAanvuller.cls.xml	(.../DoosAanvuller.cls.xml)	(revision 71574)
@@ -9,7 +9,7 @@
 </Property>
 
 <Method name="VulAanBasisInformatieDoos">
-<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.Doos,&Params:%String,ProductGroep:%String,MachineTechnologie:APPS.Verpakking.enu.MachineTechnologie,BoxDataID:%String="",MachineId:APPS.Verpakking.enu.MachineID]]></FormalSpec>
+<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.Doos,&Params:%String,ProductGroep:%String,MachineTechnologie:APPS.Verpakking.enu.MachineTechnologie,BoxDataID:%String="",MachineId:APPS.Verpakking.enu.MachineID,ProductId:%String=""]]></FormalSpec>
 <Implementation><![CDATA[
 	Set ..MachineTechnologie = MachineTechnologie
 	Set ListOfPackageDesignItems = ##class(%ListOfDataTypes).%New()
@@ -23,7 +23,7 @@
 	} ElseIf (BasisDoos.%Extends("APPS.Verpakking.dto.V1LosseOnderdelen")) {
 		Do ..VulAanV1LosseOnderdelen(.BasisDoos, .Params, ProductGroep)
 	} ElseIf (BasisDoos.%Extends("APPS.Verpakking.dto.VouwErrondDoos")) {
-		Do ..VulAanVouwErrondDoos(.BasisDoos, .Params, ProductGroep, BoxDataID)
+		Do ..VulAanVouwErrondDoos(.BasisDoos, .Params, ProductGroep, BoxDataID, MachineId)
 	} ElseIf (BasisDoos.%Extends("APPS.Verpakking.dto.V1DoosMetDeksel")) {
 		Do ..VulAanV1DoosMetDeksel(.BasisDoos, .Params, ProductGroep)
 	} ElseIf (BasisDoos.%Extends("APPS.Verpakking.dto.V1Flatpack")) {
@@ -46,7 +46,16 @@
 	Set BasisDoos.Height = ##class(TECH.Math).Round(BasisDoos.Height,0)
 	Set BasisDoos.Width = ##class(TECH.Math).Round(BasisDoos.Width,0)
 	
-	If ($$$Not(MachineId = ##class(APPS.Verpakking.enu.MachineID).VH()) && (ProductGroep = "PR")) {
+	Try {
+		//XS karton is voorlopig enkel voor kartonverpakkingen voor lades
+		If (..HeeftXSKartonVoorLades(ProductId)) {
+			Set BasisDoos.LogoPrint = "XS"
+		}
+	} Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+	}
+	
+	If ($$$Not(MachineId = ##class(APPS.Verpakking.enu.MachineID).VH()) && (ProductGroep = "PR") && $$$Not(BasisDoos.LogoPrint = "XS")) {
 		Set BasisDoos.LogoPrint = "TBX DRAWER"
 	}
 	
@@ -58,8 +67,31 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HeeftXSKartonVoorLades">
+<FormalSpec>ProductId:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim HeeftXSKarton As %Boolean = $$$False
+	#dim IsMaatwerkProduct As %Boolean = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().IsMaatwerkProduct(ProductId)	
+	#dim ProductAPI As DOM.PM.ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
+	#dim Product As DOM.PM.impl.MaatwerkProductImpl = ProductAPI.GeefProduct(ProductId)
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = Product.GeefIngegevenKenmerken()
+	#dim IsVariantLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())	
+	
+	If (IsVariantLade) {
+		#dim BerekenSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = Product.GeefBerekeningsSpecificatie()
+		Set KlantinstellingenRepository = ##class(DOM.Halux.AAP.KlantinstellingenRepository).%New()
+		#dim KlantInstellingen As DOM.Halux.AAP.Klantinstellingen = KlantinstellingenRepository.ZoekViaKlantId(BerekenSpecificatie.GeefKlantID())
+		
+		Set HeeftXSKarton = KlantInstellingen.IsBlumXs
+	}
+	
+	Quit HeeftXSKarton
+]]></Implementation>
+</Method>
+
 <Method name="VulAanVouwErrondDoos">
-<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.VouwErrondDoos,&Params:%String,ProductGroep:%String,BoxDataID:%String]]></FormalSpec>
+<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.VouwErrondDoos,&Params:%String,ProductGroep:%String,BoxDataID:%String,MachineId:APPS.Verpakking.enu.MachineID]]></FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	If (ProductGroep = "KAD") {
Index: vhTest/Mock/APPS/Verpakking/DoosAanvuller.cls.xml
===================================================================
diff -u -r70302 -r71574
--- vhTest/Mock/APPS/Verpakking/DoosAanvuller.cls.xml	(.../DoosAanvuller.cls.xml)	(revision 70302)
+++ vhTest/Mock/APPS/Verpakking/DoosAanvuller.cls.xml	(.../DoosAanvuller.cls.xml)	(revision 71574)
@@ -9,8 +9,8 @@
 <Inheritance>right</Inheritance>
 
 <Method name="VulAanBasisInformatieDoos">
-<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.Doos,&Params:%String,ProductGroep:%String,MachineTechnologie:APPS.Verpakking.enu.MachineTechnologie,BoxDataID:%String="",MachineId:APPS.Verpakking.enu.MachineID]]></FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("VulAanBasisInformatieDoos",.BasisDoos,.Params,ProductGroep,MachineTechnologie,BoxDataID,MachineId)
+<FormalSpec><![CDATA[&BasisDoos:APPS.Verpakking.dto.Doos,&Params:%String,ProductGroep:%String,MachineTechnologie:APPS.Verpakking.enu.MachineTechnologie,BoxDataID:%String="",MachineId:APPS.Verpakking.enu.MachineID,ProductId:%String=""]]></FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VulAanBasisInformatieDoos",.BasisDoos,.Params,ProductGroep,MachineTechnologie,BoxDataID,MachineId,ProductId)
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Verpakking/DoosService.cls.xml
===================================================================
diff -u -r70759 -r71574
--- APPS/Verpakking/DoosService.cls.xml	(.../DoosService.cls.xml)	(revision 70759)
+++ APPS/Verpakking/DoosService.cls.xml	(.../DoosService.cls.xml)	(revision 71574)
@@ -99,7 +99,7 @@
 				Set BaseRef = $Piece(BaseRef,".",1,2) //Bij TAOR komt er nog een 3e piece achter, dit zou verder in de flow anders voor fouten zorgen
 				#dim MachineTechnologie As APPS.Verpakking.enu.MachineTechnologie = ..GeefMachineTechnologie(MachineID)
 				#dim Doos As APPS.Verpakking.dto.Doos = ..DoosFactory.MaakDoos(ProductGroep, ReceptNaam)
-				Do ..DoosAanvuller.VulAanBasisInformatieDoos(.Doos, .Params, ProductGroep, MachineTechnologie, BoxDataID, MachineID)
+				Do ..DoosAanvuller.VulAanBasisInformatieDoos(.Doos, .Params, ProductGroep, MachineTechnologie, BoxDataID, MachineID, ProductId)
 				Do ..Optimizer.Optimize(.Doos, ProductGroep, MachineTechnologie, MachineID)
 				
 				Do ..ZetPrioriteit(Prioriteit, MachineTechnologie)
Index: vhUnitTest/APPS/Verpakking/DoosService/Test.cls.xml
===================================================================
diff -u -r70302 -r71574
--- vhUnitTest/APPS/Verpakking/DoosService/Test.cls.xml	(.../Test.cls.xml)	(revision 70302)
+++ vhUnitTest/APPS/Verpakking/DoosService/Test.cls.xml	(.../Test.cls.xml)	(revision 71574)
@@ -36,7 +36,7 @@
 	Set DummyRequest.Box = DummyDoos
 	
 	Do DoosFactoryMock.VerwachtMethodCall("MaakDoos", ProductGroep, ReceptNaam).DanReturn(DummyDoos).ExactAantalKeer(1)
-	Do DoosAanvullerMock.VerwachtMethodCall("VulAanBasisInformatieDoos", DummyDoos, .Params, ProductGroep, MachineTechnologie, "", MachineID).DanDoeNiks().ExactAantalKeer(1)
+	Do DoosAanvullerMock.VerwachtMethodCall("VulAanBasisInformatieDoos", DummyDoos, .Params, ProductGroep, MachineTechnologie, "", MachineID, PRNr).DanDoeNiks().ExactAantalKeer(1)
 	Do OptimizerMock.VerwachtMethodCall("Optimize", DummyDoos, ProductGroep, MachineTechnologie, MachineID).DanReturn(DummyDoos).ExactAantalKeer(1)
 	Do SnijRequestMakerMock.VerwachtMethodCall("MaakSnijRequest", DummyDoos, MachineTechnologie, MachineID, Prioriteit, Aantal, BaseRef).DanReturn(DummyRequest).ExactAantalKeer(1)
 	Do SnijDoosServiceMock.VerwachtMethodCall("SnijDoos", DummyRequest).DanDoeNiks().ExactAantalKeer(1)