Check for scheduled jobs running on Database
The script displays scheduled jobs that are currently executing. 
 
SET ECHO OFF
SET PAGES 80
SET LINES 80
SET TRIMSPOOL ON
SET FEEDBACK ON

REM
REM || Title : show_running_jobs.sql
REM ||
REM ||


/*
.
Running Jobs ....
.
*/

TTITLE -
CENTER 'List Running Jobs' SKIP 2

COL sess FORMAT 99 HEADING 'Ses'
COL jid FORMAT 999 HEADING 'Id'
COL subu FORMAT A10 HEADING 'Submitter' trunc
COL secd FORMAT A10 HEADING 'Security' trunc
COL proc FORMAT A20 HEADING 'Job' word_wrapped
COL lsd FORMAT A5 HEADING 'Last|Ok|Date'
COL lst FORMAT A5 HEADING 'This|Run|Date'
COL nrt FORMAT A5 HEADING 'This|Run|Time'
COL fail FORMAT 99 HEADING 'Err'
Col ok FORMAT A2 HEADING 'OK'

SELECT djr.sid sess,
djr.job jid,
dj.log_user subu,
dj.priv_user secd,
dj.what proc,
TO_CHAR (djr.last_date, 'MM/DD') lsd,
SUBSTR (djr.last_sec, 1, 5) lst,
TO_CHAR (djr.this_date, 'MM/DD') nrd,
SUBSTR (djr.this_sec, 1, 5) nrt,
djr.failures fail
FROM sys.dba_jobs dj,
sys.dba_jobs_running djr
WHERE djr.job = dj.job

SPOOL jobs_running
/
SPOOL OFF

/*
.
Scheduled Jobs ....
.
*/

 

TTITLE -
CENTER 'Scheduled Jobs' SKIP 2

SELECT dj.job jid,
dj.log_user subu,
dj.priv_user secd,
dj.what proc,
TO_CHAR (dj.last_date, 'MM/DD') lsd,
SUBSTR (dj.last_sec, 1, 5) lst,
TO_CHAR (dj.this_date, 'MM/DD') nrd,
SUBSTR (dj.this_sec, 1, 5) nrt,
dj.failures fail,
DECODE(broken,'Y','N','Y') ok
FROM sys.dba_jobs dj

SPOOL sched_jobs
/
SPOOL OFF

TTITLE OFF
This script is provided for educational purposes only. The script has been tested and appears to work as intended. However, you should always test any script before relying on it. No responsibility will be accepted for Lost or damage that may occur from it's use.