Bug report: PKEEP

[John Esak]

Ray,

Okay, I had thought you were replying to the bug I submitted today. Here is
the documentation for that one... and it's relationship to the bug I
submitted a couple months ago.  I'll check on the selection set bug you
reference later on today and get back to you.

Thanks.

Here is a tiny table that displays both bugs quite quickly. Just use any
header detail file and 3 or 4 details records in the browse window. @key1
displays the new deleted-last-record-stays-in-browse-window bug, and @key2
displays the bug I told you about a couple months ago. I think they are part
and parcel of how the k value is treated...

     filePro File: test
 Processing Table: input

    1  Then: end
@key1    If:
    2  Then: 'this code displays the deleted-last-record-still-displays bug
    3  Then: ky(5)=""     'change this to ky="" and it works fine
brwD     If:
    4  Then: lookup test2  k=ky   i=a -ex b="(brw=12 xkey=D show=pkeep fill=
             asc)[field1   field2]*1           *2 "
         If: @bk eq "D"
    5  Then: delete test2;  goto brwD
    6  Then: exit
@key2    If:
    7  Then: 'this code displays the no pkeep if k=("") bug
    8  Then: ky=""     'change this to ky="1"
brwV     If:
    9  Then: lookup test2  k=ky   i=a -ex b="(brw=12 xkey=V show=pkeep fill=
             asc)[field1   field2]*1           *2 "
         If: @bk eq "V"
   10  Then: popup -,"1";  show "@";  goto brwV
   11  Then: exit