游标是这样写的:
begin
declare
v_ProUser varchar2(30000);
v_Count varchar2(30000);
v_bianhao varchar2(20);
v_summary varchar2(2000);
v_unit varchar2(20000);
v_pkid varchar2(100);
Cursor ProUserCursor is
select
a.f_propose_man,
count(*) as vcount
from
t_duban_zhengxie_propose a
group by
a.f_propose_man;
Cursor ProUserPkId is
select c.pk_id
from
t_duban_zhengxie_propose c
where
c.f_propose_man = v_ProUser;
begin
open ProUserCursor;
Loop
Fetch ProUserCursor into v_ProUser,v_Count;
Exit when ProUserCursor%Notfound;
dbms_output.put_line('提案人:'||v_ProUser||' '||v_Count||'件');
dbms_output.put_line('============================================');
dbms_output.put_line('提案号'||' 案 由 '||' '||'单位名称');
dbms_output.put_line('============================================');
begin
open ProUserPkId;
Loop
Fetch ProUserPkId into v_pkid;
Exit When ProUserPkId%Notfound;
select
b.f_bianhao,
b.f_summary,
b.f_undertake_unit
into
v_bianhao,
v_summary,
v_unit
from
t_duban_zhengxie_propose b
where
b.pk_id= v_pkid;
dbms_output.put_line(v_bianhao||' '||v_summary||' '||v_unit);
Fetch ProUserPkId into v_pkid;
end loop;
Close ProUserPkId;
end;
dbms_output.put_line('============================================');
Fetch ProUserCursor into v_ProUser,v_Count;
end loop;
Close ProUserCursor;
end;
end; 这是什么问题?急
begin
declare
v_ProUser varchar2(30000);
v_Count varchar2(30000);
v_bianhao varchar2(20);
v_summary varchar2(2000);
v_unit varchar2(20000);
v_pkid varchar2(100);
Cursor ProUserCursor is
select
a.f_propose_man,
count(*) as vcount
from
t_duban_zhengxie_propose a
group by
a.f_propose_man;
Cursor ProUserPkId is
select c.pk_id
from
t_duban_zhengxie_propose c
where
c.f_propose_man = v_ProUser;
begin
open ProUserCursor;
Loop
Fetch ProUserCursor into v_ProUser,v_Count;
Exit when ProUserCursor%Notfound;
dbms_output.put_line('提案人:'||v_ProUser||' '||v_Count||'件');
dbms_output.put_line('============================================');
dbms_output.put_line('提案号'||' 案 由 '||' '||'单位名称');
dbms_output.put_line('============================================');
begin
open ProUserPkId;
Loop
Fetch ProUserPkId into v_pkid;
Exit When ProUserPkId%Notfound;
select
b.f_bianhao,
b.f_summary,
b.f_undertake_unit
into
v_bianhao,
v_summary,
v_unit
from
t_duban_zhengxie_propose b
where
b.pk_id= v_pkid;
dbms_output.put_line(v_bianhao||' '||v_summary||' '||v_unit);
Fetch ProUserPkId into v_pkid;
end loop;
Close ProUserPkId;
end;
dbms_output.put_line('============================================');
Fetch ProUserCursor into v_ProUser,v_Count;
end loop;
Close ProUserCursor;
end;
end; 这是什么问题?急
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货