Index: Flow/Order/NieuweProductOrderlijn.mac.rou
===================================================================
diff -u -r31202 -r53288
--- Flow/Order/NieuweProductOrderlijn.mac.rou	(.../NieuweProductOrderlijn.mac.rou)	(revision 31202)
+++ Flow/Order/NieuweProductOrderlijn.mac.rou	(.../NieuweProductOrderlijn.mac.rou)	(revision 53288)
@@ -128,7 +128,7 @@
  I 'PSN,UAF,PraStock<1,$P($O(^PRBS("BS",PR,"KIND")),".")="KIND" G OpmToevoegenNietStock
  I 'PSN,UAF,PraStock<1 D OpmNietStockZonderVoorraad G SelectProduct:K="-"
  I 'BackGrnd D ProductIdentificatie
- G OpmGeen7Producten:$E(PID)=7
+ ;G OpmGeen7Producten:$E(PID)=7
  Set IsToevoegingSpiegelProduct = $D(Mirror)
  I UTYP'="T",'$G(MoederB),'$L($G(EDIORDNr)) S R=$$CHKSOPR^FLOW(KC,PR,"order",BackGrnd,IsToevoegingSpiegelProduct) G Exit:'R I R>999 S PR=R G ZoekVervangProduct
  I KC'=$$$KlantHalux,$G(CheckKs),$$IsKSKlant(KC),'$$ISPROD^KS(PR),'$$ISHALUX^PRODUKT2(PR),$E($$SORTKEY^PRODUKT(PR),3,4)'="DE" G Exit:'$$TXTPOP^KS("NOKSPROD","",0,1) ;,Exit:'$$ASK^vhWACHTW("MANAGER",,,0)