liqiu2002
  • 注册日期
  • 发帖数
  • QQ
  • 铜币
  • 威望
  • 贡献值
  • 银元
阅读:1900回复:3

我写的一段SDE中A表的触发器代码,请批评!

楼主#
更多 发布于:2003-09-01 20:43
create or replace trigger ptical_fiber_cable_line_insert
after insert on A739
for each row
declare
v_boolean number:=0;
v_objectid wilson.ptical_fiber_cable_line.pl_id_map%type;
cursor c_ptical_fiber_cable_line is select wilson.ptical_fiber_cable_line.pl_id_map from wilson.ptical_fiber_cable_line;
begin
open c_ptical_fiber_cable_line;
loop
fetch c_ptical_fiber_cable_line into v_objectid;
exit when c_ptical_fiber_cable_line%notfound;
if :new.objectid=v_objectid then
v_boolean:=1;
exit;
end if;
end loop;
close c_ptical_fiber_cable_line;
if v_boolean=1 then
update wilson.ptical_fiber_cable_line set pl_level=:new.级别,pl_mode=:new.所属区局 where wilson.ptical_fiber_cable_line.pl_id_map=:new.objectid;
else
insert into
wilson.ptical_fiber_cable_line(PL_ID_MAP,PL_ID,PL_TITLE,PL_BYNAME,PL_LEVEL,PL_JO_ID,PL_JO_NAME,PL_EP_ID,PL_EP_NAME,PL_TYPE,PL_LENGTH,PL_MODE,PL_SPAN,PL_BUILD_DATE,PL_DREDGE_DATE,PL_PROJECT_OF,PL_DELETE_MARK,PL_SAVE_MARK,PL_MODIFY_MARK,PL_REMARK1,PL_REMARK2,PL_REMARK3) values(:new.objectid,'null','null','null','光缆','null','null','null','null','null',0,'直埋',0,to_date('2003-01-01','yyyy-mm-dd'),to_date('2003-01-01','yyyy-mm-dd'),'null','null','null','null','null','null','null');
end if;
end;
喜欢0 评分0
cafecat
路人甲
路人甲
  • 注册日期2003-07-29
  • 发帖数375
  • QQ
  • 铜币894枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2003-09-03 07:19
这是pl/sql的开发吗?
http://3s2go.blogspot.com/
举报 回复(0) 喜欢(0)     评分
liqiu2002
  • 注册日期
  • 发帖数
  • QQ
  • 铜币
  • 威望
  • 贡献值
  • 银元
2楼#
发布于:2003-09-03 16:14
写Ao程序的时候顺便写了这么个程序,其实AO的开发是离不开底层对SDE的Api的调用的
举报 回复(0) 喜欢(0)     评分
mingkof
路人甲
路人甲
  • 注册日期2006-01-01
  • 发帖数73
  • QQ
  • 铜币408枚
  • 威望0点
  • 贡献值0点
  • 银元0个
3楼#
发布于:2007-09-16 15:49
<P>在哪里啊</P>
举报 回复(0) 喜欢(0)     评分
mingkof
路人甲
路人甲
  • 注册日期2006-01-01
  • 发帖数73
  • QQ
  • 铜币408枚
  • 威望0点
  • 贡献值0点
  • 银元0个
4楼#
发布于:2007-11-26 16:33
<P>没有吗?</P>
举报 回复(0) 喜欢(0)     评分
游客

返回顶部