def var i as int. def temp-table x field y as int index key as primary y. do i = 1 to 10: create x. y = i. end. /* repeat preselect each x: find next x. */ for each x: update y. end.