About Eldus » Software » Trigger dbo.D_GLSum_ITrig

Trigger dbo.D_GLSum_ITrig

CREATE TRIGGER D_GLSum_ITrig ON D_GLSum FOR INSERT AS
/ *
* PREVENT INSERTS IF NO MATCHING KEY IN ´D_Period´
* /
IF (SELECT COUNT(*) FROM inserted) !=
(SELECT COUNT(*) FROM D_Period, inserted WHERE (D_Period.DocPeriod = inserted.DocPeriod))
BEGIN
RAISERROR(778438, 16, 1)
ROLLBACK TRANSACTION
END

/ *
* PREVENT INSERTS IF NO MATCHING KEY IN ´L_Currency´
* /
IF (SELECT COUNT(*) FROM inserted) !=
(SELECT COUNT(*) FROM L_Currency, inserted WHERE (L_Currency.CurrencyCode = inserted.CurrencyCode))
BEGIN
RAISERROR(778441, 16, 1)
ROLLBACK TRANSACTION
END

/ *
* PREVENT INSERTS IF NO MATCHING KEY IN ´L_GLAccount´
* /
IF (SELECT COUNT(*) FROM inserted) !=
(SELECT COUNT(*) FROM L_GLAccount, inserted WHERE (L_GLAccount.AcctCode = inserted.AcctCode))
BEGIN
RAISERROR(778444, 16, 1)
ROLLBACK TRANSACTION
END

/ *
* PREVENT INSERTS IF NO MATCHING KEY IN ´L_GLDept´
* /
IF (SELECT COUNT(*) FROM inserted) !=
(SELECT COUNT(*) FROM L_GLDept, inserted WHERE (L_GLDept.DeptCode = inserted.DeptCode))
BEGIN
RAISERROR(778447, 16, 1)
ROLLBACK TRANSACTION
END

Updated On: 05.04.01