Точная выборка возвращает больше, чем запрошенное количество строк в выполнении триггера

Question

Я создаю триггер для auto_generatingprod_id от prod_summery
данная таблица

PROD_ID CHAR(8 BYTE)    No      1   
PRODUCT_TITLE   VARCHAR2(30 BYTE)   No      2   
PRODUCT_SUMMERY VARCHAR2(150 BYTE)  No      3   
INTEREST_TYPE   CHAR(1 BYTE)    No      4   
INTEREST_RATE   NUMBER(4,2) No      5   
SECURITY_REQD   CHAR(1 BYTE)    No      6   
MIN_LOAN_AMT    NUMBER(11,2)    No      7   
MAX_LOAN_AMT    NUMBER(11,2)    No      8   
TERM_MIN    INTERVAL YEAR(2) TO MONTH   No      9   
TERM_MAX    INTERVAL YEAR(2) TO MONTH   No      10  
REPAYMENT_FREQUENCY INTERVAL YEAR(2) TO MONTH   No      11  
REPAYMENT_AMT   NUMBER(11,2)    No      12  
EARLY_REPAY_ALLOWED CHAR(1 BYTE)    No      13  
MIN_AGE_LIMIT   NUMBER(2,0) No      14  
MAX_AGE_LIMIT   NUMBER(2,0) No      15  
RESIDENT    RESIDENT_VARRAY No      16  
PROD_START_DT   DATE    Yes     17  
PROD_END_DT DATE    Yes     18  
PROD_STATUS CHAR(1 BYTE)    No      19  

Спусковой крючок

create or replace TRIGGER LOAN_PROD_ID_TR1 
    BEFORE INSERT ON LOAN_PROD_TAB
   for each row
    DECLARE
      v_length number(2):=LENGTH(:NEW.PRODUCT_SUMMERY)-
         LENGTH(REPLACE(:NEW.PRODUCT_SUMMERY,' ',' '))+1;
         V_W2 VARCHAR2(10);
        V_W3 VARCHAR2(10);
     V_W4 VARCHAR2(10);
      V_W5 VARCHAR2(10);
V_W6 VARCHAR2(10);
 V_CON VARCHAR2(10);
V_CON1 VARCHAR2(10);
V_CON2 VARCHAR2(10);
BEGIN
 IF v_length=1 THEN
 SELECT 'CBIS'||LPAD(:NEW.PRODUCT_SUMMERY,4) INTO :NEW.PROD_ID FROM 
 LOAN_PROD_TAB;
  ELSIF v_length=2 THEN
  V_W2:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,2),1,2);
  V_W3:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)'),1,2);
    SELECT 'CBIS'||LPAD(V_W2,4,V_W3) INTO :NEW.PROD_ID FROM LOAN_PROD_TAB;
    ELSIF v_length=3 THEN
  V_W2:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)($)'),1,1);
   V_W3:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,2),1,2);  
   V_W4:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)'),1,2);
    V_CON:=CONCAT(V_W3,V_W2);
   SELECT 'CBIS'||LPAD(V_W4,4,V_CON) INTO :NEW.PROD_ID FROM LOAN_PROD_TAB;
   ELSIF v_length=4 THEN
    V_W2:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)'),1,1);
     V_W3:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,2),1,1);
   V_W4:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,3),1,1);
   V_W5:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)($)'),1,1);
    V_CON:=CONCAT(V_W2,V_W3);
      V_CON1:=CONCAT(V_W4,V_W5);
    V_CON2:=CONCAT(V_CON,V_CON1);
    SELECT 'CBIS'||LPAD(V_CON2,4) INTO :NEW.PROD_ID FROM LOAN_PROD_TAB;
        ELSE
        V_W2:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)'),1,1);
         V_W3:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,2),1,1);
         V_W4:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,3),1,1);
      V_W5:=SUBSTR(REGEXP_SUBSTR(:NEW.PRODUCT_SUMMERY,'(\S*)(\s)',1,4),1,1);
      V_CON:=CONCAT(V_W2,V_W3);
    V_CON1:=CONCAT(V_W4,V_W5);
    V_CON2:=CONCAT(V_CON,V_CON1);
         SELECT 'CBIS'||LPAD(V_CON2,4) INTO :NEW.PROD_ID FROM LOAN_PROD_TAB;
         END  IF;
     END;

Answer 1

Ваша ошибка вызвана утверждениями выбора, например

SELECT 'CBIS'||LPAD(:NEW.PRODUCT_SUMMERY,4) INTO :NEW.PROD_ID
FROM LOAN_PROD_TAB;

если в таблице более одной записи, вы получите сообщение об ошибке при выборе всего из таблицы.

Вам не нужно делать выбор здесь, вы должны быть в состоянии просто сделать

:NEW.PROD := 'CBIS'||LPAD(:NEW.PRODUCT_SUMMERY,4);

Answer 2

TOO-MANY-ROWS возвращается одним из SELECT заявления. В принципе, неудивительно - ни один из них не содержит WHERE пункт.

С другой стороны, я думаю, что вы не должны использовать SELECT совсем; Триггер находится на LOAN_PROD_TAB, и вы выбираете из него - это приводит к ошибке мутирующей таблицы. Вместо этого вы должны переписать их (пример на основе вашего первого SELECT) в

   :NEW.prod_id := 'CBIS' || LPAD (:NEW.PRODUCT_SUMMERY, 4);

Ах да, еще одна вещь: ради себя, научитесь правильно форматировать код. Использование такого нечитаемого беспорядка - кошмар.