Perfomance - Experts Help req...

Question

Hello Experts,
I need to tune the below code for performance.
Below is the script which i am running to get records from Store table and cross-checking with Store_History tables and processing records.
Query is taking more time to process.
How can i tune to increase performance.
DECLARE
   CURSOR c_get_dtl_cr8
   IS
      SELECT si.location_rep, si.location_no , si.product_id
        FROM store si
       WHERE si.location_no = 178 AND si.location_rep = 'S' AND si.product_id > 0;
   lv_cnt         NUMBER          := 0;
   lv_error_msg   VARCHAR2 (3267);
   l_err_msg   VARCHAR2 (3267);
BEGIN
   FOR r_get_dtl_cr8 IN c_get_dtl_cr8
   LOOP
      pkg_call.move_history (p_location_rep      => r_get_dtl_cr8.location_rep,
                                         p_location_no         => r_get_dtl_cr8.location_no,
                                         p_product_id      => r_get_dtl_cr8.product_id,
                                         p_ts_start        => (  SYSTIMESTAMP
                                                               - 200
                                         p_ts_end          => SYSTIMESTAMP,
                                         p_mode            => 0,
                                         p_result          => lv_cnt,
                                         p_error_msg       => lv_error_msg
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line
                        (   'Exception been raised in crawler --> SQLCODE-->'
                         || SQLCODE
                         || 'SQLERRM-->'
                         || SQLERRM
   RAISE;
END;pkg_call.move_history
PROCEDURE move_history
      p_location_rep            store.location_rep%TYPE,
      p_location_no         store.location_no%TYPE,
      p_product_id         store.product_id%TYPE,
      p_ts_start           TIMESTAMP,
      p_ts_end             TIMESTAMP,
      p_mode               NUMBER,
      p_result       OUT   NUMBER,
      p_error_msg    OUT   VARCHAR2
  ) IS
CURSOR c_hist IS
       SELECT *
        FROM store_history  sih
       WHERE sih.product_id = p_product_id
              AND sih.location_no = p_location_no
              AND sih.location_rep = p_location_rep
              AND sih.eff_ts BETWEEN p_ts_start AND p_ts_end
         ORDER BY sih.eff_ts ASC, sih.seq_nbr ASC;
   --TYPE g_hist_table IS TABLE OF history%ROWTYPE;
   -- Global Collection of PL/SQL Table for Holding History Records
    l_hist_table g_hist_table ;
  Begin
  dbms_output.put_line('opening cursor');
  p_result := 0 ;
  OPEN c_hist;
  LOOP
      dbms_output.put_line('fetching ..');
      -- Fetch 2000 history records for processing
       FETCH c_hist BULK COLLECT
         INTO  l_hist_table limit 10000;
       FOR i IN 1..l_hist_table.COUNT
       Loop
               Does Collections...     
       End Loop;
       -- Flush out the data from memory and to Databasse
       l_hist_table.delete;
  Exception When Others then
  End move_process_history;

Answer 1

Hello Experts,
Thanks all for your prompt reply.
As per the blog i have modified as below:
1) -- Start of template body --
The following logic has been implemented to check main(TST_STORE) table with the history table(TST_STORE_HIST) and it took 2.5 hrs to execute 38000 records.
This is the SELECT clause statement:
Select 1:
SELECT si.loc_typ_cd, si.loc_nbr, si.prod_id
FROM TST_STORE si
WHERE si.loc_nbr = 178 AND si.loc_typ_cd = 'S' AND si.prod_id > 0;Select 2:
SELECT   *
FROM tst_store_hist sih
WHERE sih.prod_id = p_product_id
AND sih.loc_nbr = p_loc_nbr
AND sih.loc_typ_cd = p_loc_typ_cd
AND sih.eff_ts BETWEEN p_ts_start AND p_ts_end
ORDER BY sih.eff_ts ASC, sih.seq_nbr ASC;The version of the database is 11.1.0.6.0
2) These are the parameters relevant to the optimizer:
SQL> show parameter optimizer
NAME                                 TYPE        VALUE
optimizer_dynamic_sampling           integer     2
optimizer_features_enable            string      10.2.0.4
optimizer_index_caching              integer     0
optimizer_index_cost_adj             integer     100
optimizer_mode                       string      ALL_ROWS
optimizer_secure_view_merging        boolean     TRUE3) SQL> show parameter db_file_multi
NAME                                 TYPE        VALUE
db_file_multiblock_read_count        integer     164)
SQL> show parameter db_block_size
NAME                                 TYPE        VALUE
db_block_size                        integer     81925) SQL> show parameter cursor_sharing
NAME                                 TYPE        VALUE
cursor_sharing                       string      EXACT6)
explain plan for
SELECT si.loc_typ_cd, si.loc_nbr, si.prod_id
FROM tst_store si
WHERE si.loc_nbr = 178 AND si.loc_typ_cd = 'S' AND si.prod_id > 0;
select * from table(dbms_xplan.display);
Plan hash value: 2767608563
| Id  | Operation        | Name           | Rows  | Bytes | Cost (%CPU)| Time     |
|   0 | SELECT STATEMENT |                | 49031 |   574K|   154   (1)| 00:00:01 |
|*  1 |  INDEX RANGE SCAN| TST_STORE_IDX1 | 49031 |   574K|   154   (1)| 00:00:01 |
Predicate Information (identified by operation id):
   1 - access("SI"."LOC_TYP_CD"='S' AND "SI"."LOC_NBR"=178 AND
                 "SI"."PROD_ID">0)
EXPLAIN PLAN FOR
SELECT   *
FROM TST_STORE_hist sih
WHERE sih.prod_id = p_product_id
AND sih.loc_nbr = p_loc_nbr
AND sih.loc_typ_cd = p_loc_typ_cd
ORDER BY sih.eff_ts ASC, sih.seq_nbr ASC;
select * from table(dbms_xplan.display);
Plan hash value: 4212055264
| Id  | Operation                            | Name              | Rows  | Bytes | Cost (%CPU)| Time     | Pstart| Pstop |
|   0 | SELECT STATEMENT                     |                   |     1 |   136 |  1432   (1)| 00:00:09 |       |       |
|   1 |  PARTITION RANGE ALL                 |                   |     1 |   136 |  1432   (1)| 00:00:09 |     1 |1048575|
|   2 |   SORT ORDER BY                      |                   |     1 |   136 |  1432   (1)| 00:00:09 |       |       |
|   3 |    PARTITION HASH SINGLE             |                   |     1 |   136 |  1431   (1)| 00:00:09 |   KEY |   KEY |
|   4 |     TABLE ACCESS BY LOCAL INDEX ROWID| TST_STORE_HIST    |     1 |   136 |  1431   (1)| 00:00:09 |       |       |
|*  5 |      INDEX RANGE SCAN                | TST_STORE_HIST_PK |     1 |       |  1430   (1)| 00:00:09 |       |       |
Predicate Information (identified by operation id):
   5 - access("SIH"."LOC_NBR"=TO_NUMBER(:P_LOC_NBR) AND "SIH"."LOC_TYP_CD"=:P_LOC_TYP_CD AND
                 "SIH"."PROD_ID"=TO_NUMBER(:P_PRODUCT_ID))
                            filter("SIH"."PROD_ID"=TO_NUMBER(:P_PRODUCT_ID))                                                            Now I am running the following code logic:-
===========================================
DECLARE
   CURSOR c_get_info
   IS
      SQL STMT-1(As mentioned above)
BEGIN
   FOR r_get_info IN c_get_info
   LOOP
      pkg_call.history_proc                (p_loc_typ_cd      => r_get_dtl_cr8.loc_typ_cd,
                                         p_loc_nbr         => r_get_dtl_cr8.loc_nbr,
                                         p_product_id      => r_get_dtl_cr8.prod_id,
                                         p_ts_start        => (  SYSTIMESTAMP
                                                               - 200
                                         p_ts_end          => SYSTIMESTAMP,
                                         p_mode            => 0,
                                         p_result          => lv_cnt,
                                         p_error_msg       => lv_error_msg
      IF lv_error_msg IS NOT NULL
      THEN
                    Insert into temporary table
      END IF;
   END LOOP;
END;     
--This procedure is used to crawl through History and Detecting Issues with Data and also Correcting itPROCEDURE     pkg_call.history_proc
PROCEDURE     history_proc(
      p_loc_nbr           -,
      p_loc_typ_cd        -,
      p_product_id        -,
      p_ts_start           TIMESTAMP,
      p_ts_end             TIMESTAMP,
      p_mode               NUMBER,
      p_result       OUT   NUMBER,
      p_error_msg    OUT   VARCHAR2
   IS
      CURSOR c_sih
      IS
        SQL STMT-2(As mentioned above)
   BEGIN
      p_result := 0; 
     OPEN c_sih;
     LOOP
         FETCH c_sih
         BULK COLLECT INTO collection variable(l_sih_table) LIMIT 10000;
                     FOR i IN 1 .. l_sih_table.COUNT
                     LOOP
                         Checking collection values...
                     END LOOP;
         -- Flush out the data from memory and to Databasse
         l_sih_table.DELETE;
      --IF(MOD(P_REC_ENT,1000)=0 THEN
      IF P_MODE ...
      THEN
          -- Separate procedure which Update History table
          update_hs ;
          -- Separate procedure which Merge another new table...
          update_vs;
          -- Separate procedure which Update another table
          update_isr;
      END IF;
     END LOOP;
  END history_proc;               Plz suggest your comments...
Thanks...
Edited by: Linus on Oct 26, 2010 12:58 AM
Edited by: Linus on Oct 26, 2010 5:17 AM