PACKAGE BODY: APPS.PJI_FM_DEBUG

Source

1 package body PJI_FM_DEBUG as
2   /* $Header: PJISF11B.pls 120.0 2005/05/29 12:42:15 appldev noship $ */
3 
4   -- -----------------------------------------------------
5   -- procedure CONC_REQUEST_HOOK
6   -- -----------------------------------------------------
7   procedure CONC_REQUEST_HOOK (p_process in varchar2) is
8 
9   begin
10 
11     --
12     --  Uncomment these execute immediate statements to create database
13     --  trace files for all of the summarization workers.
14     --
15     --
16     -- execute immediate 'alter session set sql_trace TRUE';
17     -- execute immediate 'alter session set timed_statistics=TRUE';
18 
19     if (p_process = PJI_FM_SUM_MAIN.g_process) then
20 
21       -- dispatcher
22 
23       null;
24 
25     elsif (p_process like PJI_FM_SUM_MAIN.g_process || '%') then
26 
27       -- phase 1 worker
28 
29       null;
30 
31     end if;
32 
33     exception when others then null;
34 
35   end CONC_REQUEST_HOOK;
36 
37   -- -----------------------------------------------------
38   -- procedure CLEANUP_HOOK
39   -- -----------------------------------------------------
40   procedure CLEANUP_HOOK (p_process in varchar2) is
41 
42   begin
43 
44     if (p_process = PJI_FM_SUM_MAIN.g_process) then
45 
46       -- dispatcher
47 
48       null;
49 
50     elsif (p_process like PJI_FM_SUM_MAIN.g_process || '%') then
51 
52       -- phase 1 worker
53 
54       null;
55 
56     end if;
57 
58     exception when others then null;
59 
60   end CLEANUP_HOOK;
61 
62 end PJI_FM_DEBUG;