Is this different for 5.0.14?

[John Esak]

I have a little process that has always worked right... (at least I think it
always has...) on previous versions. Yesterday, someone told me it didn't
work and they are right it is not doing what it used to do. (I haven't just
put back a 5.0.13 and tried it yet... I am just being lazy.)

The process is run by pressing F on a record inside IUA. The form processing
then runs the following code. The problem is the DELETE is not happening
now... and truly, I believe it used to... but after I send this mail, I'll
dredge up and old version and try it myself.  In the meantime... can anyone
else duplicate this behavior? (SCO 5.6, FP 5.0.14 rclerk)

     filePro File: npio
 Processing Table: copyback
    Last Modified: Saturday - Oct 30, 2004 at  2:57 AM
       Documented: Saturday - Oct 30, 2004 at  2:57 AM

         If: @id ne "lisa" and @id ne "maggie" and @id ne "mary" and @id ne
             "root"
    1  Then: show "@Only Mary, Lisa, or Maggie can use this routine.";  end
         If: @qu ne "del"
    2  Then: beep;  show "@Must be in deleted file... for this to work.";
end
    3  Then: input popup q(1,yesno) "Copy this back to active file? (y/n) "
         If: q ne "Y"
    4  Then: end
askQQ    If:
    5  Then: input popup qq(1,allup) "Copy to East or West? E/W"
         If: qq ne "E" and qq ne "W"
    6  Then: goto askQQ
         If: qq eq "E"
    7  Then: ff="npio@"
         If: qq eq "W"
    8  Then: ff="npio at nexwest"
    9  Then: lookup npio=(ff) r=free
   10  Then: copy npio;  write npio
        If:     'this DELETE is not working... Why not?
  11  Then: delete
        If:     'even adding a WRITE doesn't make the delete work...
  12  Then: write
  13  Then: display;  end


[1] - As always, using Bob Stockler's beautiful "pprc" program to format
this code so nicely for emailing pruposes... (or any reason...). [Don't know
_why_ he gives this stuff away for free.]