begin
  for i in (
    select b.object_code_4
         , b.analitic_id
    from v_metapos_saldo b
       , v_metadoc_saldo c
    where b.doc_id = c.id
      and a.obj_id = b.object_code_4
      and c.Number like 'X0-%'  
  ) loop   
  update invent_karta a set 
    a.stoim_bux_id = i.nalitic_id
  where a.obj_id = i.object_code_4  
  end loop;
end;
/

declare
 cursor my_cur is 
    select b.object_code_4
         , b.analitic_id
    from v_metapos_saldo b
       , v_metadoc_saldo c
    where b.doc_id = c.id
      and a.obj_id = b.object_code_4
      and c.Number like 'X0-%' ; 
  
begin
  for i in my_cur loop   
   update invent_karta a set a.stoim_bux_id = i.nalitic_id 
     where a.obj_id = i.object_code_4;  
  end loop;
end;
/