4: procedure clean_adm_bounds
5: is
6: cursor c1( start_id NUMBER ) is
7: select ADMIN_BOUND_ID, rowid 8: from CSF_MD_ADM_BOUNDS 9: where ADMIN_BOUND_ID >= start_id
10: order by ADMIN_BOUND_ID;
11: r1 c1%ROWTYPE;
12:
Line 31: delete from CSF_MD_ADM_BOUNDS where rowid = r1.rowid;
27: exit;
28: end if;
29:
30: if ( min_start_id = r1.ADMIN_BOUND_ID ) then 31: delete from CSF_MD_ADM_BOUNDS where rowid = r1.rowid; 32: else
33: min_start_id := r1.ADMIN_BOUND_ID;
34: end if;
35: