Index: ORGASTAT.mac.rou =================================================================== diff -u -r734 -r1470 --- ORGASTAT.mac.rou (.../ORGASTAT.mac.rou) (revision 734) +++ ORGASTAT.mac.rou (.../ORGASTAT.mac.rou) (revision 1470) @@ -272,7 +272,7 @@ .Set:$P(^KUL(KLNr,"F",BONNr,OLNr),D,17)="KF5" ORDNr=+$P(^KUL(KLNr,"F",BONNr,OLNr),D,5) If 'ORDNr Do .Set OLNr=101 - .Set:$P(^KUL(KLNr,"F",BONNr,OLNr),D,17)="KF5" ORDNr=+$P(^KUL(KLNr,"F",BONNr,OLNr),D,5) + .Set:$P($G(^KUL(KLNr,"F",BONNr,OLNr)),D,17)="KF5" ORDNr=+$P(^KUL(KLNr,"F",BONNr,OLNr),D,5) Quit ORDNr CHKTELB(RecI) ; Nagaan of de groep telbaar is