Index: CHUI/PPS/TBX/LeanBatch.cls.xml
===================================================================
diff -u -r63487 -r64717
--- CHUI/PPS/TBX/LeanBatch.cls.xml	(.../LeanBatch.cls.xml)	(revision 63487)
+++ CHUI/PPS/TBX/LeanBatch.cls.xml	(.../LeanBatch.cls.xml)	(revision 64717)
@@ -523,6 +523,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ProboxOverdoosEtiketStatus">
+<FormalSpec>PrintLijst:%List</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	if ..HaluxBatch.GeefProductieGroep()'=##class(APPS.Halux.common.enu.ProductieGroep).Probox() {
+		Quit ##class(BL.PPS.TBX.enu.PrintStatus).NietPrinten()
+	}
+	If $LF(PrintLijst,"Y") Quit ##class(BL.PPS.TBX.enu.PrintStatus).Geprint()
+	If '$LF(PrintLijst,"Y") Quit ##class(BL.PPS.TBX.enu.PrintStatus).Printen()
+]]></Implementation>
+</Method>
+
 <Method name="TePrintenInVoorbereiding">
 <FormalSpec>PrintLijst:%List</FormalSpec>
 <Private>1</Private>
@@ -558,8 +572,10 @@
 		Set Opties="L;F;O;M;R;I;G;B"_
 	 		$Select(..ChkCommissie():";C",1:"")
 	 	If TePrintenInVoorbereiding '= "" Set Opties=Opties_";"_TePrintenInVoorbereiding
- 		If $$$Not(BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Probox()) {
- 			Set Opties = Opties _$Select(..BevatSFS():";P",1:"")
+ 		If BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Probox() {
+			Set Opties = Opties_$Select(..ProboxOverdoosEtiketStatus(PrintLijst)=##class(BL.PPS.TBX.enu.PrintStatus).Printen():";Y",1:"")
+ 		} Else {
+	 		Set Opties = Opties _$Select(..BevatSFS():";P",1:"")
  		}
 	}
 	For i=1:1:$Length(Opties,";") {