■■创建触发器，SQLSERVER转为ORACLE9I■■

Question

CREATE OR REPACLE TRIGGER AddMaterial 
BEFORE INSERT ON  dbo.tblProgress

Answer 1

CREATE OR REPACLE TRIGGER AddMaterial 
BEFORE INSERT ON  dbo.tblProgress
FOR EACH ROW
declare 
PrjFlag varchar2(20);   
PrjTypeID varchar2(20); --项目类型号
PhaseID varchar2(20);     --阶段号
DataName varchar2(500);  --文件名
DataID NUMBER(10);  --
CURSOR InsertRecord IS
select DataName,DataID 
from sysDataLib 
where PrjTypeID=PrjTypeID 
and PhaseID=PhaseID;
BEGIN 
select Prjflag INTO PrjFlag from Inserted;
PrjTypeID:=SUBSTR(Prjflag,1,1) ;
PhaseID:=(SUBSTR(Prjflag,LENGTH(Prjflag)-1,LENGTH(Prjflag));
OPEN InsertRecord;
LOOP
     FETCH InsertRecord into DataName,DataID;
     EXIT WHEN InsertRecord%NOTFOUND;     insert tblMaterial values(PrjFlag,DataName,0,'','1','',DataID,0);END LOOP;
close InsertRecord;
END;select Prjflag from Inserted