PROCEDURE autoissuereturns (pagenum IN NUMBER, pagesize IN NUMBER)
AS
businessdate DATE;
tinid VARCHAR (50);
CURSOR vv02cur
IS
SELECT cr01_tin_id, cr12_accounts_number, cr01_calendar_type
FROM (SELECT a.*, ROWNUM rn
FROM vv02_accounts_tin a)
WHERE rn BETWEEN (pagenum - 1) * pagesize + 1 AND pagenum * pagesize;
OPEN vv02cur;
LOOP
FETCH vv02cur
INTO tinid, accountid, calendartype;
EXIT WHEN vv02cur%NOTFOUND;
if taxtype <> '01'
then
isautoissue (accountid, taxyear, businessdate, calendartype, 1);
isautoissue (accountid, taxyear, businessdate, calendartype, 2);
isautoissue (accountid, taxyear, businessdate, calendartype, 3);
end if;
END LOOP;
CLOSE vv02cur;
END autoissuereturns;
oracle 存储过程实例-3
猜你喜欢
转载自swearyd7.iteye.com/blog/1740510
今日推荐
周排行