Why is this record being saved?

[Barry Wiseman]

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?


-----------------------------------------------------------------
  Barry Wiseman                              barry at gensoftdes.com
  Genesis Software Designs, Inc.            Voice: (212) 889-9191
  18 E. 41 Street, New York, NY 10017         Fax: (212) 889-1589
-----------------------------------------------------------------