Stanislav Lomany, 11/28/2024 09:50 AM
Download (208 Bytes)
def temp-table tt
field f1 as integer.
def buffer xtt for tt.
create tt.
def var rid as rowid.
tt.f1 = 1.
rid = rowid(tt).
release tt.
find first xtt where rowid(xtt) = rid.
message xtt.f1.