一个看似简单但实现极其复杂的存储过程

表结构如下：

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个数字的组合。
上面对题目的文字说明可能有些啰嗦，我只是想让大家尽可能的明白我的意思，有兴趣的朋友对题意还有疑问的可以联系我。谢谢。
QQ：390000258


下面是一个网友帮我写的存储过程，现在和大家一起分享，如果你有更好的，可以写写。
create or replace procedure P_test(sum_num in number)
as
v_str varchar2(200):=',';
v_str1 varchar2(200):=',';
v_id number;
v_count number;
v_tmp number :=0;
v_money number :=0;
v_length number:=0;
v_count1 number;
begin
for cur1 in 1..100 loop
v_str:=',';
v_str1:=',';
v_tmp:=0;
v_money:=0;
v_length:=0;
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_str1:=',';
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_str1:=v_str1||v_tmp||',';
v_length:=v_length+1;
exit when v_money =sum_num;

end loop;

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


begin
p_test(10);--可以换成任意数字
end;