Index: KREDIET.mac.rou
===================================================================
diff -u -r762 -r1710
--- KREDIET.mac.rou	(.../KREDIET.mac.rou)	(revision 762)
+++ KREDIET.mac.rou	(.../KREDIET.mac.rou)	(revision 1710)
@@ -16,7 +16,8 @@
  Set Files=$G(Files),Show=$G(Show) Set:Files="" Files="OLFD"
  Set WachtW=$G(WachtW)
  Set R=$$CHKLIM(KLNr,Files,,.Hulp),ChkLim=$P(R,D),Limiet=$P(R,D,2),Openst=$P(R,D,3),Verval=$P(R,D,4)
- Set R=$S(Files["D":$$CHKVERVD(KLNr,,.Hulp),1:"")
+ Set:Verval<0 MaxDays=9999
+ Set R=$S(Files["D":$$CHKVERVD(KLNr,.MaxDays,.Hulp),1:"")
  Set ChkOldFD=$P(R,D),MaxDays=$P(R,D,2),OFaktDat=$P(R,D,3),OVervDat=$P(R,D,4),OFANr=$P(R,D,5)
  If Limiet,Limiet<10 Set Waardig=0
  Else  Set Waardig='ChkLim Set:Waardig Waardig='ChkOldFD