Index: PRHF.mac.rou
===================================================================
diff -u -r74848 -r75087
--- PRHF.mac.rou	(.../PRHF.mac.rou)	(revision 74848)
+++ PRHF.mac.rou	(.../PRHF.mac.rou)	(revision 75087)
@@ -1,3 +1,5 @@
+#include Prod.Product
+
 PRHF ;Produkten halffabrikaten [ 11/21/2003  2:08 PM ]
  ;
 HADPR(TOENr,TLUNr,PRNr,AantWMS,RCPODate) 
@@ -12,6 +14,8 @@
  . Do Log("PRBS",HFPRNr,PRNr_"\"_R)
  . Quit:$P(R,D,3)'="H"  ; Geen halffabrikaat
  . Quit:$P(R,D,27)      ; Geen stockaanpassingen voor dit product
+ . Quit:($$$ProductGet(HFPRNr,$$$KlassificatieKey)=##class(DOM.PM.enu.Classificatie).MatHalux()) ;
+ . Quit:($$$ProductGet(HFPRNr,$$$KlassificatieKey)=##class(DOM.PM.enu.Classificatie).VerpakkingHalux())
  . Set FabKey=$$FABKEYT^HADOPV(TOENr,TLUNr)
  . Set ResRec=$G(^HADPR("F",FabKey,"AR",HFCode))
  . Do Log("HADPR",HFPRNr,PRNr_"\"_ResRec)