人大金仓触发器

触发器
CREATE OR REPLACE TRIGGER "BDBSQK_TRI"
AFTER INSERT OR DELETE OR UPDATE ON "PUBLIC"."BDBSQK"
FOR EACH ROW
AS

declare
    msg text;
    pk1 VARCHAR(24);
    pk2 VARCHAR(48);
    pk3 VARCHAR(120);

begin
    IF TG_0P=' INSERT'THEN
    select New.BDNM, NEW.BSXH, NEW.DMNM Into pk1, pk2, pk3 from BDBSOK;
    ELSIF TG_OP = "UPDATE" THEN
    select New.BDNM, NEW.BSXH, NEW.DMNM into pk1, pk2, pk3 from BDBSOK;
    ELSE
    pkl:=OLD.BDNM:
    pk2:=OLD.BSXH
    pk3:=OLD.DMNM
    END IF;
    
    msg := 'BDBSQ';||TG_OP||';3;BDNM;'||pk1||';BSXH;'||pk2||';DMNM;'||pk3;
    dbms alert, signal("BDBSOK ALERT", msg);
end;