/--看一个例子:CREATE OR REPLACE procedure tran_get_money(userid IN VARCHAR2,money IN number) as cursor c1 is select fees from info_admin where user_id=userId; --定义游标 cursor c2 is select money from info_admin where user_id=userId; l_fees number:=0; l_money number:=0; begin open c1; --打开游标 fetch c1 into l_fees; --赋值 open c2; fetch c2 into l_money; money=money*fees; update Account set fees_money=money where user_id = userId; close c1; --关闭游标!!! close c2; end;
/--看一个例子:CREATE OR REPLACE procedure tran_get_money(userid IN VARCHAR2,money IN number) as
cursor c1 is select fees from info_admin where user_id=userId; --定义游标
cursor c2 is select money from info_admin where user_id=userId;
l_fees number:=0;
l_money number:=0;
begin
open c1; --打开游标
fetch c1 into l_fees; --赋值
open c2;
fetch c2 into l_money;
money=money*fees;
update Account set fees_money=money where user_id = userId;
close c1; --关闭游标!!!
close c2;
end;