select c_memo scan for updflag = 'U' select bsmemo if seek(c_memo.k_seqno) replace textln with c_memo.textln endif endscan