Stanislav Lomany, 09/14/2019 05:05 PM
Download (206 Bytes)
def temp-table tt field f1 as integer index idx1 f1.
def query q for tt scrolling.
open query q preselect each tt.
create tt. tt.f1 = 1.
query q:create-result-list-entry.
get first q.
message avail(tt).