Index: CHUI/PPS/TBX/LeanBatch.cls.xml
===================================================================
diff -u -r2100 -r2106
--- CHUI/PPS/TBX/LeanBatch.cls.xml	(.../LeanBatch.cls.xml)	(revision 2100)
+++ CHUI/PPS/TBX/LeanBatch.cls.xml	(.../LeanBatch.cls.xml)	(revision 2106)
@@ -558,12 +558,15 @@
 <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="NogTePrintenEtiketten">
+<Method name="TePrintenInVoorbereiding">
 <FormalSpec>PrintLijst:%List</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
@@ -590,16 +593,16 @@
 	Set PrintLijstInfo = ##class(BL.PPS.TBX.PrintLijstInfo).GeefPrintLijstInfo(..HaluxBatch.GeefBatchID())
 	Set PrintLijst = PrintLijstInfo.PrintLijst
 	Set Fase = PrintLijstInfo.Fase
-	Set TePrintenEtiketten = ..NogTePrintenEtiketten(PrintLijst)
+	Set TePrintenInVoorbereiding = ..TePrintenInVoorbereiding(PrintLijst)
 	
 	If BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Plus() { ; ProPlus - Keller
 		Set Opties="Z;E;F;D;B;P;G;X;A"_
 			$select(..TipOnFreesStatus(PrintLijst)'=##class(BL.PPS.TBX.enu.PrintStatus).NietPrinten():";U",1:"")_
 			$select(..SpoelSifonFreesStatus(PrintLijst)'=##class(BL.PPS.TBX.enu.PrintStatus).NietPrinten():";W",1:"")
 	}
 	elseif BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Kast() { ; Kast
-		If TePrintenEtiketten '= "" {
-			Set Opties=TePrintenEtiketten
+		If TePrintenInVoorbereiding '= "" {
+			Set Opties=TePrintenInVoorbereiding
 		}
 		Else {
 			Set Opties="Z;E;F;O;R;D;M;L;K;X;I"_
@@ -608,28 +611,22 @@
 		}
 	}
 	else { ; andere BatchTypes 
-	 	If TePrintenEtiketten '= "" { 
-	 		set Opties=TePrintenEtiketten
+	 	If TePrintenInVoorbereiding '= "" { 
+	 		set Opties=TePrintenInVoorbereiding
 	 	}
 	 	else {
 			set Opties="Z;E;L;F;O;M;R;I;G"_
 		 		$select(..BevatSFS():";P",1:"")_
 		 		$select(..ChkCommissie():";C",1:"")_
 		 		$select(..ChkBodems():";B",1:"")
-		 		
-		 	if BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Probox() {
-				set Opties = Opties_$select(..ProboxOverdoosEtiketStatus(PrintLijst)'=##class(BL.PPS.TBX.enu.PrintStatus).NietPrinten():";Y",1:"")
-			
+		 	
+				set Opties = Opties_$select(..ProboxOverdoosEtiketStatus(PrintLijst)=##class(BL.PPS.TBX.enu.PrintStatus).Printen():";Y",1:"")
+		}
 	}
-		
-	 	}
-	}
-	
 	For i=1:1:$L(Opties,";") {
 		If $LF(PrintLijst,$Piece(Opties,";",i)) Set $Piece(Opties,";",i)=""
 		If $Piece(Opties,";",i)="P"&($LF(PrintLijst,"PE")!$LF(PrintLijst,"PA")) Set $Piece(Opties,";",i)=""
 	}
-	
 	Quit Opties
 ]]></Implementation>
 </Method>