Index: BL/Flow/Offerte/Offerte.cls.xml
===================================================================
diff -u -r1074 -r1368
--- BL/Flow/Offerte/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 1074)
+++ BL/Flow/Offerte/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 1368)
@@ -71,16 +71,18 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>KlantNr,BeperkStatus</FormalSpec>
 <Implementation><![CDATA[
+	Set LimitDatum=$$CALCDATE^vhDTyp($H,"J",-2)
 	&sql(DECLARE Off CURSOR FOR
-	SELECT ID,Status,Creator
-	INTO ID,Status,Creator
+	SELECT ID,Status,Creator,CreatieTijdStip
+	INTO ID,Status,Creator,CreatieTijdStip
 	FROM Flow_Offerte.Hoofding
 	WHERE Klant=:KlantNr
 	ORDER BY CreatieTijdStip DESC)
  	&sql(OPEN Off)
  	For  &sql(FETCH Off) Quit:(SQLCODE '= 0)  Do
  	. If Status="I",BeperkStatus'="I" Quit  ; In verwerking bij andere gebruiker (BeperkStatus="I" enkel voor ICT)
  	. If $D(BeperkStatus),BeperkStatus'="@",Status'=BeperkStatus Quit
+ 	. If +CreatieTijdStip<LimitDatum Quit ; Toegevoegd PV 06/06/2011
  	. Set Sort=$P($G(^RES("CHUI.Flow.Offerte.Offerte","PI","STATUSHOOFDING","D",$S(Status="":"O",1:Status))),"`")
  	. Set Sort(Sort,ID)=""
 	&sql(CLOSE Off)