Index: KLBTW.mac.rou
===================================================================
diff -u -r1810 -r1811
--- KLBTW.mac.rou	(.../KLBTW.mac.rou)	(revision 1810)
+++ KLBTW.mac.rou	(.../KLBTW.mac.rou)	(revision 1811)
@@ -28,6 +28,7 @@
  .Set KLNr=$P(^KKL(KLId,0),D)
  .Quit:'$D(^KK1(KLNr))
  .Quit:($P(^KKL(KLId,1),D,11)="Consument")
+ .Quit:($P(^KKL(KLId,1),D,11)="Relatie")
  .Do FETCHKL^UTILI(KLNr)
  .Set Land=$$LAND^vhRtn1($P(B(1),D,8))
  .Quit:Land="BE"