Why is this record being saved?

[Howard Wolowitz]

----- Original Message ----- 
From: "Barry Wiseman" <barry at gensoftdes.com>
To: "filePro list" <filepro-list at lists.celestial.com>
Sent: Tuesday, March 21, 2006 11:53 AM
Subject: Why is this record being saved?


>I have the following code fragment:
>
> 100  @KEY$::input popup yn "Update cost (y/n) ? ":
> 101  :yn ne "Y":end:
> 102  ::popup update -,"A2":
> 103  :@sk eq "BRKY":clearp; end:
> 104  ::clearp; gosub updcost; goto exit:
>
> In the course of navigating Screen A2, WLF processing is triggered which 
> performs various lookups and calculations, and populates some fields on 
> screen A2 with data. There are no WRITE statements anywhere in this code.
>
> When I press Ctrl-C to cancel out of screen A2, the debugger shows me that 
> line 103 tests true and the END is performed at that point.  Nevertheless, 
> I find that the record has been rewritten, and the modified fields from 
> screen A2 have been saved.
>
> Is this expected behavior?  How can I discard the results of this POPUP 
> UPDATE if the user requests BREAK instead of SAVE?

I'm not sure without testing but try

pushkey "[brky]" ; end

 if the user presses break.

Howie