Index: KREDIET.mac.rou =================================================================== diff -u -r1710 -r1711 --- KREDIET.mac.rou (.../KREDIET.mac.rou) (revision 1710) +++ KREDIET.mac.rou (.../KREDIET.mac.rou) (revision 1711) @@ -16,7 +16,7 @@ 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:Verval<0 MaxDays=9999 + Set:Verval<0 MaxDays=9999 ; Indien vervallen <0 dan geen controle op de maximum vervaldag facturen 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