Index: PRODUKT4.mac.rou
===================================================================
diff -u -r73709 -r74827
--- PRODUKT4.mac.rou	(.../PRODUKT4.mac.rou)	(revision 73709)
+++ PRODUKT4.mac.rou	(.../PRODUKT4.mac.rou)	(revision 74827)
@@ -100,6 +100,7 @@
  Set U2=""
  Set (TotaalH,TotaalK)=0
  For  Set MPRNr=$O(^TO("IP",MPRNr)) Quit:MPRNr=""  Do  ;loop over moederproducten in toeleveringen
+ . Quit:##class(OBJTimpl.CheckObjectiveFase).IsProductieSysteemMES(MPRNr) ; goederen worden verwerkt door MES
  . Quit:'$D(^PRBS("IP",PRNr,MPRNr)) ;Moederproduct bevat bouwsteen niet  
  . Set (FaktorH,FaktorK)=0
  . Set BSKey=""