-- File: account_trigs.sql
-- By:   Craig Battis
-- Modified by: Martin White
-- Date: 02-nov-95
--
-- Purpose: To create triggers for creating account balance and account charge
--          date records.  
--
-- Sccs Info:
-- Program: account_trigs.sql
-- Version: 1.4
-- Date:    95/11/14 14:05:27
-- Path:    /u01/home/ribs/sccs/s.account_trigs.sql
-- Whatout: @(#)account_trigs.sql     1.4   95/11/14
--
 
CREATE OR REPLACE TRIGGER trig_rb_accounts
after INSERT OR UPDATE OR DELETE ON snap$_rb_accounts
FOR each ROW
BEGIN
  IF     inserting THEN 
    INSERT INTO rb_account_balances
        (
        ACCOUNT_ID                      ,
     PREVIOUS_BALANCE
        )
        VALUES
        (
        :NEW.ACCOUNT_ID                 ,
        0.0
        );
  ELSIF  updating  THEN NULL;
  ELSIF  deleting  THEN NULL;
END IF;
END;
/
 
CREATE OR REPLACE TRIGGER trig_rb_account_charges
after INSERT OR UPDATE OR DELETE ON snap$_rb_account_charges
FOR each ROW
BEGIN
  IF     inserting THEN 
    INSERT INTO RB_ACCOUNT_CHARGES_DATES
      (
          ACCOUNT_CHARGE_ID
      )
    VALUES
      (
          :NEW.ACCOUNT_CHARGE_ID
      );
  ELSIF  updating  THEN NULL;
  ELSIF  deleting  THEN NULL;
END IF;
END;
/