for p1 in (select acc_nbr from zhj_0821_qqzl ) loop
v_acc_nbr:=p1.acc_nbr;
select serv_id into v_serv_id from tb_cm_serv where acc_nbr=v_acc_nbr and state='B0A' and rownum=1;
[B] for p2 in (select msinfo_id fromtb_cm_msobject where obj_id=v_serv_id and state='B0A') loop[/B]
select disc_id into v_disc_id from tb_cm_msinfo where msinfo_id=p2.msinfo_id;
select disc_name into v_disc_name from tb_ms_disc_info where disc_id= v_disc_id;
v_disc_name_all:=v_disc_name_all||' , '||v_disc_name;
end loop;
update zhj_0821_qqzl set disc_name = v_disc_name_all where acc_nbr=v_acc_nbr;
v_disc_name_all:='';
[B] for p2 in (select msinfo_id fromtb_cm_msobject where obj_id=v_serv_id and state='B0A') loop[/B] 在执行时占用很多时间，请问大家，有什么好的办法没有？
