Index: EWORDF.mac.rou
===================================================================
diff -u -r66310 -r66860
--- EWORDF.mac.rou	(.../EWORDF.mac.rou)	(revision 66310)
+++ EWORDF.mac.rou	(.../EWORDF.mac.rou)	(revision 66860)
@@ -1,6 +1,7 @@
 EWORDF ;E'WMS Order feedback [ 11/29/2003  1:29 PM ]
  Q
 OL(C,IsUgly) ; Feedback van E'WMS/UGLY betreffende het orderpicken van een suborderlijn
+
  Set IsUgly=$G(IsUgly,0)
  ; Opgeroepen door EWRECR     
  ; C wordt opgeroepen via .Local
@@ -218,6 +219,7 @@
 PICKEND(C) ; Feedback van E'WMS betreffende einde orderpicking van een ganse consolidatie
  ; Opgeroepen door EWRECR
  ; C wordt opgeroepen via .Local
+ 
  New CONSNr,ORDNr,OLUNr,CONSRec,ORDStat,OLRec,Status,OLStat,SoftV
  If C("STATUS")'="POK" Do  Quit  ; Terugmelding bij het terugtrekken van een order
  .Do ERROR^EWLOG($T(ORDCANC))
@@ -323,6 +325,9 @@
 OLSTAT2 ;"De status van sommige orderlijnen zijn nog niet afgesloten :"_C("VOLGNR")_";"_C("CONSNR")_";"_C("ORDNR")_";"_OLStat
 NOCONS ;"Consolidatie bestaat niet :"_C("VOLGNR")_";"_C("CONSNR")
 VOORTREK ;"Consolidatie wordt vervroegd omdat een deel reeds gepickt wordt :"_C("VOLGNR")_";"_C("CONSNR")_";"_SoftV
+CLOCAL ;"C local : "_$$ArrayToText^vhLib("C",.C)
 
 
 
+
+