oracle 更新空间数据存储过程语句

[sql]  view plain  copy

1. </pre><pre code_snippet_id="456198" snippet_file_name="blog_20140822_2_1890999" name="code" class="sql">1：更新数据  

[sql]  view plain  copy

1. create or replace procedure UpdatePoly(tablename in nvarchar2,  
2.                                        keyfield in nvarchar2,  
3.                                        keyvalue in nvarchar2,  
4.                                        srid in nvarchar2,  
5.                                        poly in clob) as  
6. strsql varchar2(8000);  
7. begin  
8.  strsql := 'update '|| tablename ||' set shape= sde.st_polygon('''|| poly ||''','||srid||') where '|| keyfield ||'='''|| keyvalue||'''';  

[sql]  view plain  copy

1.  execute immediate strsql;  
2.  commit;  
3. end;  

2：更新空间数据：

[sql]  view plain  copy

1. create or replace procedure UpdatePoly(keyvalue in nvarchar2,  
2.                                        srid in INTEGER,  
3.                                        poly in clob) as  
4.   
5. geom sde.st_geometry;  
6. begin  
7.  geom:=sde.st_polyfromtext(poly,srid);  
8.  update SP_ARCHIVESREDLINE t set t.shape = geom where t.archivesid = keyvalue;  
9. commit;  
10. end;