Index: Derde/Klant/BeheerLeveringsAdres.mac.rou =================================================================== diff -u -r29059 -r38054 --- Derde/Klant/BeheerLeveringsAdres.mac.rou (.../BeheerLeveringsAdres.mac.rou) (revision 29059) +++ Derde/Klant/BeheerLeveringsAdres.mac.rou (.../BeheerLeveringsAdres.mac.rou) (revision 38054) @@ -41,8 +41,8 @@ GeefOorsprong S FP=2203+F60 W @F,@F1,"LEVERINGSADRES :" - w !?2,".[] = manueel [] = andere klant als leveringsadres",!?2,"*[] = manueel via andere klant" - S FP=2220+F60 W @F,@F0 R K S KCM=K I "*"'[K G GeefOorsprongZ:"-.,"[K&$L(K),GeefOorsprong:K'="" + w !?2,".[] = manueel ",!?2,"*[] = manueel via andere klant" + S FP=2220+F60 W @F,@F0 R K S KCM=K I "*"'=K G GeefOorsprongZ:"-.,"[K&$L(K),GeefOorsprong GeefOorsprongB D E^cA612 S K=$$SELECT^KLANT6(),FP=2101 W @F,@F1 G GeefOorsprong:'K S K=^KK1(K) G GeefOorsprongB:K=KI1 S B(0)=^KKL(K,0) @@ -135,3 +135,4 @@ . If 'LevCount,'BezCount Set U3="neen" . Else Set U3="ja ("_LevCount_"/"_BezCount_")" Quit +