Index: KS.mac.rou =================================================================== diff -u -r734 -r1605 --- KS.mac.rou (.../KS.mac.rou) (revision 734) +++ KS.mac.rou (.../KS.mac.rou) (revision 1605) @@ -22,7 +22,7 @@ Set ChkHand=$G(ChkHand) Set Regio=$P(^KKL(^KK1(KLNr),0),D,20),IsHandel=$$IsHandelInclPassief^KLANT5(KLNr) Set:'ChkHand IsHandel="" - Quit "\0\9\11\12\13\14\15\16\17\18\19\21\22\23\24\25\26\27\28\29\30\40\41\42\43\"[(D_+Regio_D)!IsHandel + Quit "\0\9\10\11\12\13\14\15\16\17\18\19\21\22\23\24\25\26\27\28\29\30\40\41\42\43\"[(D_+Regio_D)!IsHandel ; Test is KS-klant en KS-produkt ISKLPR(KLNr,PRNr,ChkHand,NoSa)