Ключевое поле для нескольких таблиц

CREATE OR REPLACE TRIGGER DBO.INSERT_ROW
AFTER INSERT
ON DBO.PARAM_QUERY 
REFERENCING NEW AS NEW OLD AS OLD
DECLARE
TYPE curtp IS REF CURSOR;
rd PARAM_QUERY.rid%TYPE;
n_ord PARAM_QUERY.N_ORDER%TYPE;
cur curtp;
BEGIN
OPEN cur FOR
SELECT ROWID
FROM PARAM_QUERY
WHERE rid IS NULL;
FETCH cur INTO rd;
CLOSE cur;
OPEN cur FOR
SELECT LPAD (NVL (MAX (n_order), 0) + 1, 9, '0') maxv FROM PARAM_QUERY;
FETCH cur INTO n_ord;
CLOSE cur;
IF (rd IS NOT NULL)
THEN
UPDATE PARAM_QUERY
SET rid = rd, n_order = n_ord
WHERE rid IS NULL;
INSERT INTO LIN_DATA ld (ld.rid, ld.lin_data, ld.primld)
VALUES (rd, EMPTY_BLOB (), EMPTY_BLOB ());
INSERT INTO PARAM_IZM (rid)
VALUES (rd);
INSERT INTO statistics (rid)
VALUES (rd);
INSERT INTO SMB_ACT (rid)
VALUES (rd);
INSERT INTO abonent (rid)
VALUES (rd);
END IF;
END;
[FONT=Courier][SIZE=2][/SIZE][/FONT]

CREATE TRIGGER TRIGID_GENERAL FOR GENERAL 
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF(NEW.ID IS NULL)THEN
NEW.ID=GEN_ID(GENID,1);
END

INSERT INTO GENERAL
  (BIRTHDAY, HOSPITAL, ID, NAME, SOSTOYANIE)
VALUES
  (:BIRTHDAY, :HOSPITAL, :ID, :NAME, :SOSTOYANIE)

INSERT INTO GENERAL
  (BIRTHDAY, HOSPITAL, NAME, SOSTOYANIE)
VALUES
  (:BIRTHDAY, :HOSPITAL, :NAME, :SOSTOYANIE)

SELECT LPAD (NVL (MAX (n_order), 0) + 1, 9, '0') maxv FROM PARAM_QUERY;