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