prompt Generate some load for &1 hours....

DECLARE
  j NUMBER;
  begin_date DATE := SYSDATE;
BEGIN
    WHILE TRUE LOOP
        SELECT SUM(LENGTH(TEXT)) INTO j FROM dba_source;
        DBMS_LOCK.SLEEP(60 * DBMS_RANDOM.VALUE(0,1));
    END LOOP;
END;
/