491: procedure clean_road_segments
492: is
493: cursor c1( start_id NUMBER ) is
494: select road_segment_id, rowid 495: from csf_md_rd_segs 496: where road_segment_id >= start_id
497: order by road_segment_id;
498: r1 c1%ROWTYPE;
499:
Line 519: delete from csf_md_rd_segs where rowid = r1.rowid;
515: exit;
516: end if;
517:
518: if ( min_start_id = r1.road_segment_id ) then 519: delete from csf_md_rd_segs where rowid = r1.rowid; 520: else
521: min_start_id := r1.road_segment_id;
522: end if;
523: