Index: KLVERZW.mac.rou =================================================================== diff -u -r30139 -r37338 --- KLVERZW.mac.rou (.../KLVERZW.mac.rou) (revision 30139) +++ KLVERZW.mac.rou (.../KLVERZW.mac.rou) (revision 37338) @@ -35,7 +35,6 @@ .If VerzW["DI1"!(VerzW["OD"&(VerzW'=$G(Default)))!(VerzW["DI"&(VerzW'=$G(Default)))!(VerzW["EX"&(VerzW'=$G(Default))) Do ..Quit:'$G(NoCheckLeveringPerDag) ..Set VerzW=$$ODDAG(VerzW,MultSelD,$S(MultSelD:$S(VerzW=$P(OldVerzW,";"):OldVerzW,1:""),1:$S('CalcODDAGIfSP:OldVerzW,1:"")),,CalcODDAGIfSP) - .Set:VerzW=$G(Default) VerzW="" Quit VerzW ; CB(Select,Old,New,Rec) @@ -199,3 +198,5 @@ ; + +