Index: APPS/Halux/Planning/impl/ProductInfo.cls.xml
===================================================================
diff -u -r29059 -r73522
--- APPS/Halux/Planning/impl/ProductInfo.cls.xml	(.../ProductInfo.cls.xml)	(revision 29059)
+++ APPS/Halux/Planning/impl/ProductInfo.cls.xml	(.../ProductInfo.cls.xml)	(revision 73522)
@@ -74,11 +74,20 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim StockProbleem As %String = ""
-	Set VoorbereidingService = ##class(APPS.Halux.Voorbereiding.VoorbereidingService).%New()
-	If (VoorbereidingService.ToeleveringLijnHeeftFysiekStockProbleem(..ToeleveringInfoID,..ToeleveringLijnNr))
+	#dim OpmerkingOverStockProbleemToegelaten As %Boolean = $$$True
+	Set VoorbereidingService = ##class(APPS.Halux.Voorbereiding.VoorbereidingService).%New()	
+	
+	If $$$Not(##class(TECH.StringUtils).Equals(..Categorie, ##class(APPS.Halux.common.enu.Categorie).Legrabox(), ##class(APPS.Halux.common.enu.Categorie).Merivobox(), ##class(APPS.Halux.common.enu.Categorie).Tandembox())) {
+		Set OpmerkingOverStockProbleemToegelaten = $$$True
+	} Else {
+		Set OpmerkingOverStockProbleemToegelaten = (##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Halux.PPS.Document.impl.BatchNaarObjective_MESFase") < 2)
+	}
+	
+	If (OpmerkingOverStockProbleemToegelaten && (VoorbereidingService.ToeleveringLijnHeeftFysiekStockProbleem(..ToeleveringInfoID,..ToeleveringLijnNr)))
 	{
 		Set StockProbleem = "!"
 	}
+	
 	Quit StockProbleem
 ]]></Implementation>
 </Method>
@@ -91,8 +100,6 @@
 <IndexLocation>^APPS.Halux.Plan8A9.ProductInfoI</IndexLocation>
 <StreamLocation>^APPS.Halux.Plan8A9.ProductInfoS</StreamLocation>
 <Data name="ProductInfoDefaultData">
-<Structure>listnode</Structure>
-<Subscript/>
 <Value name="1">
 <Value>%%CLASSNAME</Value>
 </Value>