Запрос в триггере

CREATE OR REPLACE TRIGGER NDB_TR_MMAIL_PAY_UP_REF
  BEFORE INSERT ON PAYORDER
  REFERENCING OLD AS OLD NEW AS NEW
  FOR EACH ROW
  DECLARE
  newusercode VARCHAR2(10);
BEGIN
    IF :NEW.INOPERATION = 1622 THEN
        :NEW.REF_ := 'MMail';
        --Ниже определяем и вставляем код юзера относительно сессии
         
       SELECT newusercode INTO xu$id FROM X$USERS 
                            WHERE xu$novellname  = (SELECT
                                         UPPER (osuser) 
                                         FROM v$session
                                         WHERE USER# =( SELECT UID FROM dual)
                                         AND status = 'ACTIVE'
                                         AND osuser <> 'oracle')
                            AND xu$flags = '1';
         :NEW.USERCODE : = 'newusercode'
    END IF;
END NDB_TR_MMAIL_PAY_UP_REF;

:NEW.USERCODE := 'newusercode';

SELECT newusercode INTO xu$id FROM X$USERS

CREATE OR REPLACE TRIGGER NDB_TR_MMAIL_PAY_UP_REF
  BEFORE INSERT ON PAYORDER
  REFERENCING OLD AS OLD NEW AS NEW
  FOR EACH ROW
  DECLARE
  newusercode NUMBER;
BEGIN
    IF :NEW.INOPERATION = 1622 THEN
        :NEW.REF_ := 'MMail';
        --Ниже определяем и вставляем код юзера относительно сессии
         
       SELECT xu$id INTO newusercode FROM X$USERS 
                            WHERE xu$novellname  = (SELECT
                                         UPPER (osuser) 
                                         FROM v$session
                                         WHERE USER# =( SELECT UID FROM dual)
                                         AND status = 'ACTIVE'
                                         AND osuser <> 'oracle')
                            AND xu$flags = '1';
         IF newusercode IS NOT NULL THEN                   
             :NEW.USERCODE := newusercode;
         END IF;
    END IF;
END NDB_TR_MMAIL_PAY_UP_REF;
/
ALTER TRIGGER NDB_TR_MMAIL_PAY_UP_REF ENABLE;