Question

我在下面给出了相同列的Tow表：

表-1 PAYROLLFILE：

表-2 TEMP_PAYROLLFILE：

我编写了一个PL SQL函数，它将表PAYROLLFILE中的重复行插入TEMP_PAYROLLFILE并从表PAYROLLFILE.So中删除原始行。简而言之，表TEMP_PAYROLLFILE正在保留表PAYROLLFILE中已删除数据的备份。

这是PL SQL功能代码：

FUNCTION Remove_transaction_by_id(employee_id NUMBER)
RETURN CLOB
AS
  cnt INT;
BEGIN
    INSERT INTO temp_payrollfile
    SELECT *
    FROM   payrollfile
    WHERE  empid = employee_id;

    DELETE FROM payrollfile
    WHERE  empid = employee_id;

    SELECT Count(*)
    INTO   cnt
    FROM   payrollfile;

    COMMIT;

    RETURN '<result><status>success</status> <row>'
           ||cnt
           || '</row></result>';
EXCEPTION
  WHEN OTHERS THEN
             RETURN '<result><status>Error</status></result>';
END remove_transaction_by_id;

但是，我希望做更多的事情，我希望在特定时间段之后从表TEMP_PAYROLLFILE 自动删除备份行 具体我需要触发器。我是新手，从来没有做过这种工作。如果有人知道这种技术，那么我真的很感谢你的帮助。请告诉我是否需要进一步的细节。感谢

更新

我已经写了这份工作来清理旧行：它会起作用吗？

BEGIN DBMS_SCHEDULER.CREATE_JOB ( job_name => 'oe.REMOVE_TEMP_PAYROLLFILE_JOB', job_type => 'PLSQL_BLOCK', job_action => 'BEGIN DBMS_STATS.GATHER_TABLE_STATS('oe', 'TEMP_PAYROLLFILE'); delete from TEMP_PAYROLLFILE where RECORDDATE < sysdate-1; END;', start_date => '20-JAN-16 1.00.00AM US/Pacific', repeat_interval => 'FREQ=DAILY', end_date => '25-JAN-16 1.00.00AM US/Pacific', enabled => TRUE, comments => 'Gather table statistics'); END;

Answer 1

这里需要的是定期清理工作。使用DBMS_SCHEDULER您可以配置重复执行此操作的作业：

delete from TEMP_PAYROLLFILE where recorddate < sysdate-60;

删除超过60天的记录。

These是有关如何创建预定作业的一些示例。如下所示，job_action部分接受一个Pl / SQL脚本，您可以在其中放置清理逻辑。

BEGIN
DBMS_SCHEDULER.CREATE_JOB (
   job_name             => 'oe.my_job1',
   job_type             => 'PLSQL_BLOCK',
   job_action           => 'BEGIN DBMS_STATS.GATHER_TABLE_STATS(''oe'',
                            ''sales''); END;',
   start_date           => '15-JUL-08 1.00.00AM US/Pacific',
   repeat_interval      => 'FREQ=DAILY', 
   end_date             => '15-SEP-08 1.00.00AM US/Pacific',
   enabled              =>  TRUE,
   comments             => 'Gather table statistics');
END;
/

Answer 2

创建存储过程以执行删除：

CREATE PROCEDURE remove_Temp_Transacts_by_ID(
  in_employee_id IN NUMBER,
  in_datetime    IN TIMESTAMP
)
AS
BEGIN
  DELETE FROM temp_payrollfile
  WHERE  empid     = in_employee_id
  AND    datetime <= in_datetime;
END;
/

然后在您的函数中包含一个调度来调度作业以便稍后运行该过程：

DBMS_SCHEDULER.CREATE_JOB(
  JOB_NAME   => 'Remove_TTbID__JOB',
  JOB_TYPE   => 'STORED_PROCEDURE',
  JOB_ACTION => 'remove_Temp_Transacts_by_ID'
  START_DATE => ( SYSTIMESTAMP + INTERVAL '2' HOURS ),
  ENABLED    => FALSE,
  COMMENT    => 'One time job to remove temporary payroll file entries'
);

DBMS_SCHEDULER.SET_JOB_ARGUMENT_VALUE(
  JOB_NAME   => 'Remove_TTbID__JOB',
  ARGUMENT_POSITION => 1,
  ARGUMENT_VALUE    => employee_id
);

DBMS_SCHEDULER.SET_JOB_ARGUMENT_VALUE(
  JOB_NAME   => 'Remove_TTbID__JOB',
  ARGUMENT_POSITION => 2,
  ARGUMENT_VALUE    => SYSTIMESTAMP
);

DBMS_SCHEDULER.ENABLE( 'Remove_TTbID__JOB' );

如何在PL SQL中的特定时间后自动删除表行

2 个答案: