PROCEDURE: SYS.LOAD_UNDO_STAT

Source

1 PROCEDURE load_undo_stat(qlen IN NUMBER, ubks IN NUMBER)
2 IS
3   loadsql varchar2(1024);
4   val     number;
5   cid     number;
6   rows    integer;
7 BEGIN
8   val := ubks * 100000 + qlen + 100;
9   loadsql := 'alter system set "_undo_debug_usage" = ' || val;
10   dbms_output.put_line(loadsql);
11   cid := dbms_sql.open_cursor;
12   dbms_sql.parse(cid, loadsql, dbms_sql.native);
13   rows := dbms_sql.execute(cid);
14   dbms_sql.close_cursor(cid);
15 END load_undo_stat;