48: procedure clean_hydros
49: is
50: cursor c1( start_id NUMBER ) is
51: select hydrography_id, rowid 52: from csf_md_hydros 53: where hydrography_id >= start_id
54: order by hydrography_id;
55: r1 c1%ROWTYPE;
56:
Line 75: delete from csf_md_hydros where rowid = r1.rowid;
71: exit;
72: end if;
73:
74: if ( min_start_id = r1.hydrography_id ) then 75: delete from csf_md_hydros where rowid = r1.rowid; 76: else
77: min_start_id := r1.hydrography_id;
78: end if;
79: