Index: EWPAL.mac.rou
===================================================================
diff -u -r734 -r921
--- EWPAL.mac.rou	(.../EWPAL.mac.rou)	(revision 734)
+++ EWPAL.mac.rou	(.../EWPAL.mac.rou)	(revision 921)
@@ -20,11 +20,8 @@
  . Write !,$P($G(^KPR(FromPRNr,0),$G(^KPRO(FromPRNr,0),"*ONBEKEND* "_FromPRNr)),D),"->",$P($G(^KPR(ToPRNr,0),$G(^KPRO(ToPRNr,0),"*ONBEKEND* "_ToPRNr)),D)
  . Do
  . . New (FromPRNr,ToPRNr,QU)
- . . // [??]
- . . zn "HALUX"
  . . Set Result=##class(BL.MB.UGLYPicking.Opslag).ChangeProductInEWMS(FromPRNr,ToPRNr,QU)
  . . Write !,"  ",$LG(Result,2),!
- . . zn "ADMIN1"
  Read !,"Einde (Druk op ENTER)",K
  Quit