运算符不存在整数:refcursor,42883 | Postgres

operator does not exist integer : refcursor, 42883 | Postgres

我必须从 3 table 中删除记录。从第 3 个 table(Parent table) 中删除的条件是只有在没有 child 记录的情况下才应该删除它。我正在使用光标并尝试使用光标从 tables 中删除。我正在尝试执行功能,但我遇到了标题中提到的错误。下面是我的代码:-

CREATE OR REPLACE FUNCTION housekeeping(
   OUT p_message_out CHARACTER VARYING,
   OUT p_sqlstate_out CHARACTER VARYING
   )
   RETURNS RECORD AS 
$BODY$

DECLARE 
v_msg CHARACTER VARYING(160);
v_sqlstate CHARACTER VARYING(6);
v_id INTEGER;
c_del CURSOR FOR SELECT employee_id FROM notification WHERE  sys_time<=CURRENT_TIMESTAMP - INTERVAL '30 Days';
v_del REFCURSOR;

BEGIN

OPEN c_del;
LOOP
FETCH c_del INTO v_del;
EXIT WHEN NOT FOUND;
delete from client where payment_id in(select payment_id from notification where sys_time<=CURRENT_TIMESTAMP - INTERVAL '30 Days');

delete from notification where sys_time<=CURRENT_TIMESTAMP - INTERVAL '30 Days';

select count(*) into v_id from notification where employee_id=v_del;
IF v_id=0 THEN
delete from employee where employee_id=v_del;
END IF;
END LOOP;

v_msg = 'Data deleted successfully.';
v_sqlstate = 1; 

p_message_out = v_msg;
p_sqlstate_out = v_sqlstate;

--Exception handling
EXCEPTION WHEN OTHERS THEN
p_message_out=SQLERRM;
p_sqlstate_out=SQLSTATE;

END;
$BODY$
  LANGUAGE plpgsql VOLATILE SECURITY DEFINER

不需要循环甚至变量来做到这一点。

可以使用关联子查询条件删除末尾的employees

CREATE OR REPLACE FUNCTION housekeeping
   (
     OUT p_message_out CHARACTER VARYING,
     OUT p_sqlstate_out CHARACTER VARYING
   )
   RETURNS RECORD AS 
$BODY$
BEGIN
  delete from client 
  where payment_id in (select payment_id 
                       from notification 
                       where sys_time <= CURRENT_TIMESTAMP - INTERVAL '30 Days');

  delete from notification 
  where sys_time <= CURRENT_TIMESTAMP - INTERVAL '30 Days';

  -- delete all employees for which no notification exists
  delete from employee emp
  where not exists (select *
                    from notification n
                    where n.employee_id = emp.employee_id);

  p_message_out  := 'Data deleted successfully.';
  p_sqlstate_out := 1; 

EXCEPTION WHEN OTHERS THEN
  --Exception handling
  p_message_out := SQLERRM;
  p_sqlstate_out := SQLSTATE;
END;
$BODY$
LANGUAGE plpgsql;