...So I wrote this function that makes from noeditable cursor editable cursor:
function r2rw(aCursor)
local i, cFname, nSize, cType, cField
select * from &aCursor into cursor tmp_cursor
select &aCursor
use in &aCursor
create cursor &aCursor(xdc I)
select "tmp_cursor"
for i=1...