【发布时间】:2019-10-29 12:28:11
【问题描述】:
我正在尝试解决与包中的存储过程有关的问题并且需要一些指导。
在 SP 内部的某个时刻,一条记录或一组记录被插入到临时表中。我说可能是一组记录,因为插入发生在循环内。当循环退出时,使用从此临时表中的选择设置游标并删除临时表的内容。
这不意味着光标现在将向调用它的应用程序返回空数据集吗?
这是代码;输入是一个或多个项目ID(我修剪了不必要的代码):
PROCEDURE USPGETOUTCOMEBYITEMCOI
(
IPSITEMIDS VARCHAR2,
OPDQUERIEDON OUT TIMESTAMP,
OPIERRORCODE OUT NUMBER,
CUR_OUT OUT GETDATACURSOR
)
IS
LVIERRORCODE NUMBER(38):=0;
LVSQUERY VARCHAR2(4000):='';
V_NEWITEM VARCHAR2(38);
V_NEWITEM2 VARCHAR2(4000);
V_TEMPITEMID VARCHAR2(38);
V_NEWITEMSLIST VARCHAR2(4000) := REPLACE(IPSITEMIDS, '''', '');
V_ORIGINDATE TIMESTAMP;
CURSOR cur IS
SELECT REGEXP_SUBSTR(V_NEWITEMSLIST, '[^,]+', 1, LEVEL) V_NEWITEM2 FROM DUAL CONNECT BY instr(V_NEWITEMSLIST, ',',1, LEVEL -1) > 0;
BEGIN
-- Loop thorugh each ITEM ID and determine outcome, add ITEM ID and OUTCOME to temp table
FOR rec IN cur LOOP
V_NEWITEM := rec.V_NEWITEM2;
....
INSERT INTO TEMPOUTCOME
(
ITEMID,
OUTCOME,
ORIGINDATE
)
VALUES
(
V_TEMPITEMID,
V_OUTCOME,
V_ORIGINDATE
);
COMMIT;
....
END LOOP;
LVSQUERY:='SELECT ITEMID, OUTCOME, ORIGINDATE FROM TEMPOUTCOME WHERE ITEMID IN (' || IPSITEMIDS || ')';
OPEN CUR_OUT FOR LVSQUERY;
OPDQUERIEDON:= SYSTIMESTAMP;
-- Delete from temp table all item IDs used in this session
DELETE FROM TEMPOUTCOME WHERE ITEMID IN (select REGEXP_SUBSTR(IPSITEMIDS, '\''(.*?)\''(?:\,)?', 1, LEVEL, NULL, 1) FROM dual CONNECT BY LEVEL <= REGEXP_COUNT(IPSITEMIDS, '''(?: +)?(\,)(?: +)?''', 1) + 1);
【问题讨论】:
标签: stored-procedures cursor oracle12c