Trigger dbo.L_GLAccount_DTrig

CREATE TRIGGER L_GLAccount_DTrig ON L_GLAccount FOR DELETE AS
/ *
* PREVENT DELETES IF DEPENDENT RECORDS IN ´D_GLJournalItem´
* /
IF (SELECT COUNT(*) FROM deleted, D_GLJournalItem WHERE (deleted.AcctCode = D_GLJournalItem.AcctCode)) > 0
BEGIN
RAISERROR(778411, 16, 1)
ROLLBACK TRANSACTION
END

/ *
* CASCADE DELETES TO ´L_GLAccountOrg´
* /
DELETE L_GLAccountOrg FROM deleted, L_GLAccountOrg WHERE deleted.AcctCode = L_GLAccountOrg.ACCTCODE

/ *
* PREVENT DELETES IF DEPENDENT RECORDS IN ´D_GLSum´
* /
IF (SELECT COUNT(*) FROM deleted, D_GLSum WHERE (deleted.AcctCode = D_GLSum.AcctCode)) > 0
BEGIN
RAISERROR(778442, 16, 1)
ROLLBACK TRANSACTION
END

Updated On: 05.04.01