求助，下面的UPDATE语句执行效率很低

请帮忙优化update urm_head a           set (urm_status,seal_no)               =(select 17 urm_status,conta_seal seal_no                   from bws_hgdsc.edi_i_db_app_seal d,urm_list e                  where a.urm_no      =  e.urm_no                    and d.conta_no    =  a.conta_id_1                    and d.validity_id =  e.form_id                    and d.chk_status  =  '2'                    and instr(d.from_dock||d.to_dock,'CMML') = 0                    and d.seq_edinum  =  rec_hi.seq_edinum)         where exists (                      select 1                        from bws_hgdsc.edi_i_db_app_seal b,urm_list c                       where a.urm_no      =  c.urm_no                         and b.conta_no    =  a.conta_id_1                         and b.validity_id =  c.form_id                         and b.chk_status  =  '2'                         and instr(b.from_dock||b.to_dock,'CMML') = 0                         and b.seq_edinum  =  rec_hi.seq_edinum                     );                update urm_head a           set (urm_status,seal_no)               =(select 17 urm_status,conta_seal seal_no                   from bws_hgdsc.edi_i_db_app_seal f                  where f.conta_no   =  a.conta_id_1                    and f.chk_status = '2'                    and f.from_dock  =  (select g.dock_code from custom_area g where a.start_place   = g.area_code)                    and f.to_dock    =  (select h.dock_code from custom_area h where a.arrival_place = h.area_code)                    and instr(f.from_dock||f.to_dock,'CMML') > 0                    and f.seq_edinum =  rec_hi.seq_edinum                )         where exists (                      select 1                        from bws_hgdsc.edi_i_db_app_seal b                       where b.conta_no   =  a.conta_id_1                         and b.chk_status = '2'                         and b.from_dock  =  (select d.dock_code from custom_area d where a.start_place   = d.area_code)                         and b.to_dock    =  (select e.dock_code from custom_area e where a.arrival_place = e.area_code)                         and instr(b.from_dock||b.to_dock,'CMML') > 0                         and b.seq_edinum =  rec_hi.seq_edinum                     );