HackBase/CORE
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Log schedulers and link them to another log record

Browse Source
This commit is contained in:
Jan Kvetina 2022-01-05 21:45:55 +01:00
parent 9bf82ae162
commit f3545054e2
2 changed files with 45 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
packages/app.spec.sql
View File

@ -1018,26 +1018,22 @@ CREATE OR REPLACE PACKAGE app AS
-- --
-- Log scheduler call and link its logs to this `log_id` -- Link one time scheduled jobs to specific log record (user)
-- Create and start one time scheduler
--
FUNCTION log_scheduler (
--in_log_id logs.log_id%TYPE,
in_job_name VARCHAR2, ------------------ PROCEDURE start_scheduler (
in_statement VARCHAR2 := NULL,
in_comments VARCHAR2 := NULL,
in_priority PLS_INTEGER := NULL
)
RETURN logs.log_id%TYPE;
--
-- ^
-- --
PROCEDURE log_scheduler ( PROCEDURE log_scheduler (
in_log_id logs.log_id%TYPE in_log_id logs.log_id%TYPE,
--in_args ??? in_job_name VARCHAR2
);
--
-- Proper way how to schedule one time jobs
--
PROCEDURE create_one_time_job (
in_job_name VARCHAR2,
in_statement VARCHAR2 := NULL,
in_comments VARCHAR2 := NULL
); );

52
packages/app.sql
View File

@ -2042,35 +2042,45 @@ CREATE OR REPLACE PACKAGE BODY app AS
-- PROCEDURE log_scheduler (
-- Log scheduler call and link its logs to this `log_id` in_log_id logs.log_id%TYPE,
-- Create and start one time scheduler in_job_name VARCHAR2
--
FUNCTION log_scheduler (
--in_log_id logs.log_id%TYPE,
in_job_name VARCHAR2, ------------------ PROCEDURE start_scheduler (
in_statement VARCHAR2 := NULL,
in_comments VARCHAR2 := NULL,
in_priority PLS_INTEGER := NULL
) )
RETURN logs.log_id%TYPE
AS AS
curr_id logs.log_id%TYPE;
BEGIN BEGIN
RETURN NULL; curr_id := app.log__ (
in_flag => app.flag_scheduler,
in_arguments => in_job_name,
in_parent_id => in_log_id
);
END; END;
-- PROCEDURE create_one_time_job (
-- ^ in_job_name VARCHAR2,
-- in_statement VARCHAR2 := NULL,
PROCEDURE log_scheduler ( in_comments VARCHAR2 := NULL
in_log_id logs.log_id%TYPE ) AS
--in_args ??? v_log_id logs.log_id%TYPE;
)
AS
BEGIN BEGIN
NULL; v_log_id := app.log_module(in_job_name, in_statement, in_comments);
--
DBMS_SCHEDULER.CREATE_JOB (
in_job_name,
job_type => 'PLSQL_BLOCK',
job_action => 'BEGIN app.log_scheduler(' || v_log_id || ', ''' || in_job_name || '''); ' || RTRIM(in_statement, ';') || '; app.log_success(); END;',
start_date => NULL,
enabled => TRUE,
auto_drop => TRUE,
comments => v_log_id || '|' || in_comments
);
--
app.log_success(v_log_id);
EXCEPTION
WHEN OTHERS THEN
app.raise_error();
END; END;