Free Oracle Tips   HTML Text

BC Oracle tuning

Oracle training

Oracle support

Remote Oracle

Oracle Tips by Burleson

Setting up a Test Environment

CREATE OR REPLACE PROCEDURE my_job_proc (p_text  IN  VARCHAR2) AS
  l_rindex  PLS_INTEGER;
  l_slno    PLS_INTEGER;
  l_total   NUMBER;
  l_obj     PLS_INTEGER;
BEGIN
  SYS.DBMS_SYSTEM.ksdwrt(2, 'MY_JOB_PROC Start: ' || p_text);

  DBMS_APPLICATION_INFO.set_module(
    module_name => 'my_job_proc',
    action_name => p_text || ': Start.');

  l_rindex    := Dbms_Application_Info.Set_Session_Longops_Nohint;
  l_total := 100;
                                  
  FOR i IN 1 .. l_total LOOP
    DBMS_APPLICATION_INFO.set_action(
      action_name => p_text || ': Sleep ' || i || ' of ' || l_total || '.');

    DBMS_APPLICATION_INFO.set_session_longops(
      rindex      => l_rindex,
      slno        => l_slno,

Download your Oracle scripts now: www.oracle-script.com The definitive Oracle Script collection for every Oracle professional DBA