一个Oracle触发器的示例

CREATE OR REPLACE TRIGGER WoStateChange AFTER UPDATE on csdbuser.T_PD_WorkOrder
for each row declare
para_PlanState csdbuser.t_pd_plan.planstate%type;
para_WoRunCnt int;
BEGIN
--计划状态
select PlanState into para_PlanState from T_PD_Plan where PlanID=:new.planid; --1 工单: 锁定1 -> 下载完毕2
if(:old.wostate='1' and :new.wostate='2') then
if(para_PlanState='1') then
--计划状态由 制定1 变为 下载3
update T_PD_Plan SET PlanState='3' where PlanID=:new.planid;
end if;
--2 工单: 下载完毕2 -> 执行3
elsif (:old.wostate='2' and :new.wostate='3') then
if(para_PlanState='3') then
--计划状态由 下载3 变为 执行4
update T_PD_Plan SET PlanState='4',FactStartTime=sysdate where PlanID=:new.planid;
end if;
--3 工单: 执行3 -> 完成4
elsif (:old.wostate='3' and :new.wostate='4') then
select COUNT(*) into para_WoRunCnt from T_PD_WorkOrder where PlanID=:new.planid and (WOState='1' or WOState='2' or WOState='3');
--计划状态由 执行4 变为 完成5
if(para_PlanState='4' and para_WoRunCnt=0) then
update T_PD_Plan SET PlanState='5',FactEndTime=sysdate where PlanID=:new.planid;
end if;
--4 工单: 锁定1或下载完成2 -> 废弃5
elsif((:old.wostate='1' or :old.wostate='2') and :new.wostate='5') then
select COUNT(*) into para_WoRunCnt from T_PD_WorkOrder where PlanID=:new.planid and (WOState='1' or WOState='2' or WOState='3');
if(para_PlanState='4' and para_WoRunCnt=0) then
--计划状态由 执行4 变为 完成5
update T_PD_Plan SET PlanState='5',FactEndTime=sysdate where PlanID=:new.planid;
end if;
--5 工单: 下载完成2 -> 锁定1
elsif(:old.wostate='2' and :new.wostate='1') then
--获取工单 执行 或 完成 的数量
select COUNT(*) into para_WoRunCnt from T_PD_WorkOrder where PlanID=:new.planid and (WOState='3' or WOState='4');
if(para_WoRunCnt=0) then
--计划没有对应执行或完成的工单，清空计划开始和结束时间
update T_PD_Plan SET PlanState='3',FactStartTime=null,FactEndTime=null where PlanID=:new.planid;
end if;
--获取工单 执行 或 完成 的数量
select COUNT(*) into para_WoRunCnt from T_PD_WorkOrder where PlanID=:new.planid and (WOState='3' or WOState='4' or WOState='2');
if(para_WoRunCnt=0) then
--没有 下载完毕2，运行3，完成4 的工单，计划变为 制定1状态
update T_PD_Plan SET PlanState='1' where PlanID=:new.planid;
end if;
end if;
END WoStateChange;