hello, I need your help to convert ORACLE triggers to SQL SERVER.
-----------------
create or replace
TRIGGER "COM2010"."TG2_INS_UP_DOCLIGNE"
BEFORE INSERT OR UPDATE ON F_DOCLIGNE
FOR EACH ROW
DECLARE
PDSART NUMBER(5,2);
QTESTOCK NUMBER (24,6);
MONTSTOCK NUMBER (24,6);
DERNPA NUMBER (24,6);
mq1 number(24,6);
qt1 number(24,6);
BEGIN
if (:new.cbcreateur='CSQL')AND (:NEW.DO_TYPE=20) then
BEGIN
:new.DL_TREMEXEP:=0;
:new.DL_TNOMENCL:=0;
:new.DL_QTEBL:=:new.dl_qte;
:new.DL_qtepl:=0;
:new.DL_poidsnet:=0;
:new.DL_pubc:=0;
:new.re_no:=0;
:new.gl_no:=0;
:new.DL_ESCOMPTE:=0;
:new.DL_Typepl:=0;
:new.DL_Taxe2:=0;
:new.DL_Taxe3:=0;
:new.DL_Typetaxe1:=0;
:new.DL_Typetaxe2:=0;
:new.DL_Typetaxe3:=0;
:new.DL_Typetaux1:=0;
:new.DL_Typetaux2:=0;
:new.DL_Typetaux3:=0;
:new.DL_remise01rem_valeur:=0;
:new.DL_remise02rem_valeur:=0;
:new.DL_remise03rem_valeur:=0;
:new.DL_remise01rem_type:=0;
:new.DL_remise02rem_type:=0;
:new.DL_remise03rem_type:=0;
:new.Do_datelivr:=to_date('01/01/00','DD/MM/RR');
:new.DL_datePL:=to_date('01/01/00','DD/MM/RR');
:new.DL_dateBC:=to_date('01/01/00','DD/MM/RR');
:new.DL_frais:=0;
:new.DL_nonlivre:=0;
SELECT AR_POIDSBRUT INTO PDSART FROM F_ARTICLE WHERE AR_REF = :NEW.AR_REF;
:NEW.DL_POIDSBRUT:=:new.dl_qte* PDSART*1000;
:new.dl_montantHT:=:new.dl_qte* :new.dl_prixunitaire;
:new.dl_montantTTC:=:new.dl_qte* :new.dl_prixunitaire;
END;
END IF;
if (:new.do_domaine=0 and :new.do_type=4)and (:new.ar_ref like'EM%') then
begin
mq1:=:new.qt_provisoire;
qt1:=:new.dl_qte;
:new.qte_mqt:=mq1-qt1;
:new.tot_mqt:=(mq1-qt1)* :new.dl_prixunitaire;
end;
end if;
if ( :new.do_domaine=1 and :new.dL_mvtstock=1 AND :new.de_no=2) then
begin
select as_qtesto into qtestock from f_artstock where ar_ref=:new.ar_ref and de_no=2;
select as_montsto into montstock from f_artstock where ar_ref=:new.ar_ref and de_no=2;
if (qtestock<>0 and :new.dl_prixunitaire=0) then
BEGIN
:new.dl_prixunitaire:=montstock/qtestock;
:new.dl_prixru:=montstock/qtestock;
END;
end if;
if (qtestock=0) and (:new.dl_prixunitaire=0) then
begin
select ar_punet into dernpa from f_article where ar_ref=:new.ar_ref;
:new.dl_prixunitaire:=dernpa;
:new.dl_prixru:=dernpa;
end;
end if;
end;
end if;
END;