一道PL/SQL题：一列数字中随机找出几个使得和等于10

很久不怎么碰SQL和PL/SQL了，这方面的能力正在弱化，想做些笔记来帮助速查和回忆

贴一道两年前遇到的PL/SQL题，原题如下

表结构如下：

create table t_money(id int primary key,amount int not null);// id 是序列号，amount是金额

对如下数据进行查询：

+----+--------+
| id | amount |
+----+--------+
| 1 | 2 |
| 2 | 2 |
| 3 | 3 |
| 4 | 5 |
| 5 | 2 |
| 6 | 8 |
| 7 | 1 |
| 8 | 2 |
| 9 | 3 |
| 10 | 3 |
+----+--------+  
从表中选取若干条数据，使得被选出来的几条数据的amount（金额）字段之和等于10，要求存储过程能返回被选取出来的数据的序列号。
算法举例：2+3+5=10 返回序列号：1，3，4   
说明：表中会有多种组合使金额字段相加等于10，此存储过程要求只要能找到任意一种组合就马上成功返回，不需要找其他的组合了。例如上面序列号为 1，3，4 的组合是第一种，能返回它们就行，至于后面的组合不用管。另外，组合没有个数的限制，可以3个组合成10，如算法举例，也可以2个组合，甚至单个组合，即可能表中有一个数据它的金额就是10，当然也可以是N个数字的组合。

答案：

create or replace procedure P_test(sum_num in number)
as
       v_str      varchar2(200):=',';
       v_id       number;
       v_count    number;
       v_tmp      number :=0;
       v_money    number :=0;
       v_length   number:=0;
       v_count1   number;
begin
       
       select count(0) into v_count1 from t_money;
       loop
           select count(0) into v_count from t_money where not instr(v_str,','||id||',')>0 and amount <= sum_num-v_money;
           if v_count = 0  then
           if v_length=v_count1 then
            dbms_output.put_line('error:the input-value is too large');
            return;
           end if; 
             v_str:=',';
             
             v_money:=0;
             
              -- or restart
           end if;

           select id,amount into v_id,v_tmp from 
                  (select id,amount from t_money where not instr(v_str,','||id||',')>0 and amount <= sum_num-v_money order by dbms_random.value)
                where rownum <2;
           v_money := v_money + v_tmp;
           v_str := v_str || v_id ||',';
           v_length:=v_length+1;
           exit when v_money =sum_num;

       end loop;
      
       dbms_output.put_line('id组合: '||substr(v_str,2));
       
       -- Error
end p_test;