TYPE resv_record is RECORD(
c_reserveno treserve.c_reserveno%TYPE,
l_proserialno treserve.l_proserialno%TYPE,
c_custno treserve.c_custno%TYPE );
c_reserveno treserve.c_reserveno%TYPE,
l_proserialno treserve.l_proserialno%TYPE,
c_custno treserve.c_custno%TYPE );
v_reserve resv_record;
TYPE cursor_type is ref cursor;
resv_cursor cursor_type;
open resv_cursor for v_resvsql;
loop
fetch resv_cursor into v_reserve;
EXIT WHEN resv_cursor%NOTFOUND;
--中间自己需要的处理逻辑
select t.c_objno into v_faxingbrokeracco from tsaleprojectitemrelation t where t.c_relationtype='2' and t.l_projectno=v_reserve.l_proserialno;
select t.c_brokeraccount into v_brokeracco from treserve t where t.c_reserveno=v_reserve.c_reserveno;
end loop;