Abandon changes on request find

From DataFlex Wiki
Jump to navigationJump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

I recently had a customer complain that closing a view will trigger "Abandon Changes?" - but using Find Next/Previous does not. Once I thought about it, I realized this really wasn't just another "OK, they're the customer..." request. 

    Procedure Request_Find Integer mode Integer entUpdtFlag
       Integer iAnswer
       
       If ((HasRecord(Server(Self))) and (Should_Save(Server(Self)))) Begin
            Move (YesNo_Box("Changes Exist. Abandon changes and continue with the find?", "Confirm")) to iAnswer
            If (iAnswer<>MBR_Yes) Procedure_Return
       End
       
       Forward Send Request_Find mode entUpdtFlag
   End_Procedure


taken from: 

https://support.dataaccess.com/Forums/showthread.php?60389-Abandon-Changes-when-finding
Retrieved from "https://dataflex.wiki/index.php?title=Abandon_changes_on_request_find&oldid=3229"