sql 生成唯一隨機數字字符串

 

 

oracle 實現快速批量生成隨機數字字符串：

--表
create table RANDOM_NUMBER_TEMP
(
  ROW_NUM    NUMBER default 0 not null,
  RANDOM_NUM VARCHAR2(30) not null
 
)
--type
type number_array_t is table of number index by binary_integer;
--實現生成唯一隨機數
PROCEDURE INIT_RANDOM_NUMBRE(P_QUANTITY  IN NUMBER,   --生成數量
                             P_LEN       IN NUMBER, --隨機數長度                            
                             STATUS      OUT VARCHAR2,
                             REEOR_MES   OUT VARCHAR2         
   )IS   
    number_array       number_array_t;
    v_number_array_len number ;
    v_random_index     number;
    new_number_array   number_array_t;
    new_num_arr_index  integer :=1;
    
    V_ROW_NUM          integer  := 0;
    V_MAX_INDEX        NUMBER;
    V_EMPTY_COUNT      NUMBER := 0 ;  --檢測到空值的次數
    --n                  integer  :=1 ; --測試用的，統計重至number_array數組次數
    tag_number         NUMBER := 0.25; --允許檢測到空值的比例
    V_MAC_EMPTY_COUNT  number := 100; --允許檢測到空值的次數的最大值
    
   BEGIN   
        STATUS := CONST_TRUE;
         v_number_array_len := POWER(10,P_LEN);
        --生成條數大於隨機數數量最大值。
        if P_QUANTITY>v_number_array_len then
            v_number_array_len := P_QUANTITY;
          -- return 'N';
        end if;
        for k in 0..v_number_array_len-1 loop
           number_array(k+1) := k;
        end loop;
        
        V_MAX_INDEX := number_array.count;
        V_MAC_EMPTY_COUNT :=CEIL(V_MAX_INDEX * tag_number);                                
        loop 
            exit when V_ROW_NUM = P_QUANTITY or number_array.count = 0;--V_ROW_NUM 從0開始
            v_random_index := round(dbms_random.value(0.5,V_MAX_INDEX));         
            
             IF number_array.EXISTS( v_random_index) THEN   
                   V_ROW_NUM := V_ROW_NUM + 1;    
                   INSERT INTO sfc.random_number_temp(ROW_NUM, random_num) VALUES(V_ROW_NUM,LPAD(to_char(number_array(v_random_index)),P_LEN,'0'));                    
                   number_array.DELETE( v_random_index); 
            ELSE
                V_EMPTY_COUNT := V_EMPTY_COUNT +1;
                IF V_EMPTY_COUNT > V_MAC_EMPTY_COUNT THEN
                   if number_array.count <=V_MAX_INDEX then
                     new_num_arr_index :=1;
                     for t in 1..V_MAX_INDEX loop
                           if number_array.EXISTS(t) then
                              new_number_array(new_num_arr_index) := number_array(t);
                              new_num_arr_index := new_num_arr_index + 1;
                           end if;  
                      end loop;      
                    end if;
                  number_array := new_number_array;    
                  new_number_array.delete(); --清空數組              
                  V_MAX_INDEX := number_array.count;
                  V_MAC_EMPTY_COUNT :=CEIL(V_MAX_INDEX * tag_number);--重至取空次數
                  --n := n+1;  
                  V_EMPTY_COUNT := 0;                      
                 END IF; 
            END IF;
        end loop;  
       COMMIT;
    EXCEPTION
      WHEN OTHERS THEN
        STATUS := CONST_FALSE;
        REEOR_MES := SQLCODE || '::' || SUBSTR(SQLERRM, 1, 500);  
   END;

代碼實現：

1.把最小值到最大值依次存入一個臨時數組中。

2.從數組中隨機取出一個值放入表中，並刪除該值。

3.重復步驟2，直到取出空值的次數達到指定的次數，重新生成臨時數組，把臨時數組中的空值去掉，然后再重復步驟2。