3,499
社区成员
发帖
与我相关
我的任务
分享
cursor c1(v_mcode varchar2, v_ifchk varchar2) is
select *
from a
where (a.mrlmcode = v_mcode or v_mcode is null) and
a.mrlrdate>=to_date(P_SDATE, 'yyyymmdd')
and a.mrlifchk = v_ifchk
order by a.mrlrdate;
view_mrl a%rowtype;
open c1(P_MICODE, P_ISCHK);
loop
fetch c1 into view_mrl;
fetch c1 BULK COLLECT into v_mrlmcode,v_mrlsl,v_mrlrdate,v_mrlprdate,v_mrlifchk
TYPE t_mrlrdate IS TABLE OF a.mrlrdate%TYPE;
v_mrlrdate t_mrlrdate;