Output of PL/SQL Procedure

Question

Hi,
I have a procedure which is defined as below
CREATE OR REPLACE PROCEDURE PURGEDB
DAYS_IN IN NUMBER
) AS
CURR_DT_TIME varchar2(20);
BEGIN
select (sysdate - DAYS_IN) into CURR_DT_TIME from dual;
delete from a where STRT_DT_TME < CURR_DT_TIME;
delete from b where STRT_DT_TME < CURR_DT_TIME;
delete from c where STRT_DT_TME < CURR_DT_TIME;
delete from d where CRE_DT_TME < CURR_DT_TIME;
delete from e where CRE_DT_TME < CURR_DT_TIME;
commit;
END PURGEDB;
When i execute the above procedure i get the following ouput:
anonymous block completed
Instead of that is there any way i can get the number of rows deleted from each table.
Edited by: 944160 on Jan 28, 2013 12:24 AM

Answer 1

944160 wrote:
Hi,
I have a procedure which is defined as below
Instead of that is there any way i can get the number of rows deleted from each table.
Edited by: 944160 on Jan 28, 2013 12:24 AM
CREATE OR REPLACE PROCEDURE PURGEDB
   DAYS_IN IN NUMBER
) AS
CURR_DT_TIME varchar2(20);
BEGIN
select (sysdate - DAYS_IN) into CURR_DT_TIME from dual;
delete from a where STRT_DT_TME < CURR_DT_TIME;
dbms_output.put_line('Deleted ' || sql%rowcount || ' from Table A.');
delete from b where STRT_DT_TME < CURR_DT_TIME;
dbms_output.put_line('Deleted ' || sql%rowcount || ' from Table B.');
delete from c where STRT_DT_TME < CURR_DT_TIME;
dbms_output.put_line('Deleted ' || sql%rowcount || ' from Table C.');
delete from d where CRE_DT_TME < CURR_DT_TIME;
dbms_output.put_line('Deleted ' || sql%rowcount || ' from Table D.');
delete from e where CRE_DT_TME < CURR_DT_TIME;
dbms_output.put_line('Deleted ' || sql%rowcount || ' from Table E.');
commit;
END PURGEDB;