Index: EWORDS.mac.rou
===================================================================
diff -u -r37124 -r47699
--- EWORDS.mac.rou	(.../EWORDS.mac.rou)	(revision 37124)
+++ EWORDS.mac.rou	(.../EWORDS.mac.rou)	(revision 47699)
@@ -467,6 +467,9 @@
  New R,Ok,Count,VerzW,VerzDat,DOutDate,DOutTime,VerzZ,LevAdr,CONSNr,Send,ORDNr,ORDNrs,Check,Rembours,ChkBeletDone,OLU,LijnRec,ReturnLocal
  Set Ok=0
  If $D(^HULP(%J,KLNr,"M","A")) Do
+ . // Alle onderstaande code 2x uitvoeren: 1x voor ORGALUX, 1x voor niet-ORGALUX.
+ . // De volledige lijst kopi�ren van de M-node naar Mtemp of MVolledig, en daarna uit M de ongewenste killen. En als er niets overschiet, niets doen.
+ . // Merge ^HULP(%J,KLNr,"MVolledig") = ^HULP(%J,KLNr,"M") 
  .Set Ok=$$CHKMUNT(%J,KLNr,$G(NoAsk))
  .If Ok,KLNr'=$$$KlantHalux Do AnderTransport^EWORDS5(%J,KLNr) ; altijd uitvoeren niet afhankelijk van NoAsk param, niet voor Halux.
  .If Ok Set Ok=$G(NoAsk) Set:'Ok Ok=$$^vhTXTPOP("EWORDS","SAVE")
@@ -984,4 +987,3 @@
 
 
 
-