Index: EWORDS6.mac.rou
===================================================================
diff -u -r48810 -r49859
--- EWORDS6.mac.rou	(.../EWORDS6.mac.rou)	(revision 48810)
+++ EWORDS6.mac.rou	(.../EWORDS6.mac.rou)	(revision 49859)
@@ -705,10 +705,7 @@
  
  ; Orgaluxcode orders steeds afzonderlijk?
 Orgalux(ORDNr,CumulORDNr)
- New CumulOrgalux
- Set CumulOrgalux='$$ISORGAL^FLOW("O",ORDNr)
- Set:CumulOrgalux CumulOrgalux='$$ISORGAL^FLOW("O",CumulORDNr)
- Quit CumulOrgalux
+ Quit $$$Not(##class(BL.Legacy.EWORDS6).%New().BevatOrderOrgalux(ORDNr))
 
 TaorIndeling(ORDNr,CumulORDNr)
  New CumulTaorIndeling