针对你在Oracle 11g中调用对象表成员过程更新记录的需求，这里整理了可行的解决方案，包括你已经找到的单条记录最优实现，以及适配多条记录的批量处理方式：

场景回顾 #

你已经完成了对象类型与对象表的定义，以及测试数据的插入：

create or replace TYPE T_person AS OBJECT (
 name varchar2(20),
 surname varchar2(20),
 MEMBER PROCEDURE Set_Sir
);
/
create or replace TYPE BODY T_person AS
 MEMBER PROCEDURE Set_Sir IS
 BEGIN
 name := 'Sir ' || name;
 END;
END;
/
CREATE TABLE person_obj_table OF t_person;
insert into person_obj_table values (t_person('John', 'Scofield'));

现在需要调用Set_Sir成员过程，给所有名为'John'的人员的name字段添加'Sir'前缀。

单条记录最优解决方案 #

你找到的这个方案非常贴合单条记录的场景，核心逻辑是先取出目标对象实例，调用成员方法修改其属性，再将修改后的对象更新回表中：

declare
 p_pers t_person;
begin
 select t_person(name, surname) into p_pers from PERSON_OBJ_TABLE where NAME = 'John';
 p_pers.set_sir();
 update PERSON_OBJ_TABLE p set p = p_pers where name = 'John';
 commit; -- 记得提交事务确保修改生效
end;
/

注：如果查询可能返回多条记录，这个方法会抛出too_many_rows异常，因此更适合确定只有单条目标记录的场景。

批量处理多条记录的方案 #

如果后续表中出现多条名为'John'的记录，推荐使用游标循环的方式来处理，这样更高效且避免重复编写查询条件：

declare
 -- 定义游标并锁定目标记录，防止并发更新冲突
 cursor c_target_persons is 
  select value(p) as person_obj 
  from person_obj_table p 
  where p.name = 'John' 
  for update;
 v_person t_person;
begin
 -- 遍历游标中的每条符合条件的记录
 for rec in c_target_persons loop
  v_person := rec.person_obj;
  -- 调用成员过程修改对象属性
  v_person.set_sir();
  -- 更新当前游标指向的记录，无需重复写过滤条件
  update person_obj_table p 
  set p = v_person 
  where current of c_target_persons;
 end loop;
 commit; -- 统一提交事务
end;
/

这个方法的优势在于：

• 用for update锁定目标记录，避免并发场景下的数据冲突
• 通过where current of精准定位当前游标记录，简化更新逻辑
• 天然支持批量处理多条符合条件的记录

内容的提问来源于stack exchange，提问作者Fantazzini