[Home] [Help]
PACKAGE BODY: APPS.OPI_EDW_COLLECT_MBI_FACTS_F_C
Source
1 Package Body OPI_EDW_COLLECT_MBI_FACTS_F_C AS
2 /* $Header: OPICFCTB.pls 120.1 2005/06/10 14:38:04 appldev $ */
3 PROCEDURE PUSH (Errbuf in out nocopy Varchar2,
4 Retcode in out nocopy Varchar2,
5 p_from_date IN varchar2,
6 p_to_date IN varchar2,
7 p_fact_name IN VARCHAR2,
8 p_staging_TABLE IN VARCHAR2) IS
9
10 l_fact_name VARCHAR2(30) :=p_fact_name;
11 l_staging_table VARCHAR2(30) :=p_staging_table;
12 l_exception_msg VARCHAR2(2000):=Null;
13 l_from_date DATE := NULL;
14 l_to_date DATE := NULL;
15 BEGIN
16 Errbuf :=NULL;
17 Retcode:=0;
18
19 edw_log.put_line(' ');
20 edw_log.put_line('call EDW_COLLECTION_UTIL ');
21 -- -------------------------------------------
22 -- call edw_collection_util.setup
23 -- -------------------------------------------
24 IF (Not EDW_COLLECTION_UTIL.setup(l_fact_name,
25 l_staging_table,
26 l_staging_table,
27 l_exception_msg)) THEN
28 errbuf := fnd_message.get;
29 Return;
30 END IF;
31 -- -----------------------------------------------------
32 -- figure out the process start/end date
33 -- Append 23:59:59 to the to_date incase it's passed
34 -- -----------------------------------------------------
35
36 l_from_date := To_date(p_from_date,'YYYY/MM/DD HH24:MI:SS');
37 l_to_date := To_date(p_to_date,'YYYY/MM/DD HH24:MI:SS');
38
39 -- Start of code change for bug fix 2140267.
40 -- --------------------------------------------
41 -- Taking care of cases where the input from/to
42 -- date is NULL.
43 -- --------------------------------------------
44
45 l_from_date := nvl(l_from_date,
46 EDW_COLLECTION_UTIL.G_local_last_push_start_date -
47 EDW_COLLECTION_UTIL.g_offset);
48 l_to_date := nvl(l_to_date,
49 EDW_COLLECTION_UTIL.G_local_curr_push_start_date);
50 -- End of code change for bug fix 2140267.
51 IF l_fact_name = 'OPI_EDW_INV_DAILY_STAT_F' THEN
52 edw_log.put_line(' ');
53 -- edw_log.put_line(' Start of Collect Process Inventory Daily Status ');
54 /* OPI_EDW_OPMINV_DAILY_STAT_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date =>to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') , p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS') ); */
55 IF retcode = '2' THEN
56 APP_EXCEPTION.Raise_exception;
57 END IF;
58 edw_log.put_line(' ');
59 -- edw_log.put_line(' End of Collect Process Inventory Daily Status ');
60 edw_log.put_line(' ');
61 edw_log.put_line(' Start of Collect Discrete Inventory Daily Status ');
62 OPI_EDW_INV_DAILY_STAT_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date => to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') ,p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS'));
63 edw_log.put_line(' ');
64 edw_log.put_line(' End of Collect Discrete Inventory Daily Status ');
65 ELSIF l_fact_name = 'OPI_EDW_COGS_F' THEN
66 edw_log.put_line(' ');
67 -- edw_log.put_line(' Start of Collect Process COGS Fact ');
68 /* OPI_EDW_OPMCOGS_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date =>to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') , p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS') ); */
69 IF retcode = '2' THEN
70 APP_EXCEPTION.Raise_exception;
71 END IF;
72 edw_log.put_line(' ');
73 -- edw_log.put_line(' End of Collect COGS Fact');
74 edw_log.put_line(' ');
75 edw_log.put_line(' Start of Collect Discrete COGS Fact ');
76 OPI_EDW_COGS_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date => to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') ,p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS'));
77 edw_log.put_line(' ');
78 edw_log.put_line(' End of Collect Discrete COGS Fact ');
79 ELSIF l_fact_name = 'OPI_EDW_JOB_RSRC_F' THEN
80 edw_log.put_line(' ');
81 -- edw_log.put_line(' Start of Collect Process Job Resource Fact ');
82 /* OPI_EDW_OPM_JOB_RSRC_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date =>to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') , p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS') ); */
83 IF retcode = '2' THEN
84 APP_EXCEPTION.Raise_exception;
85 END IF;
86 edw_log.put_line(' ');
87 -- edw_log.put_line(' End of Collect Job Resource Fact');
88 edw_log.put_line(' ');
89 edw_log.put_line(' Start of Collect Discrete Job Resource Fact ');
90 OPI_EDW_OPI_JOB_RSRC_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date => to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') ,p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS'));
91 edw_log.put_line(' ');
92 edw_log.put_line(' End of Collect Discrete Job Resource Fact ');
93 ELSIF l_fact_name = 'OPI_EDW_JOB_DETAIL_F' THEN
94 edw_log.put_line(' ');
95 -- edw_log.put_line(' Start of Collect Process Job Detail Fact ');
96 /* OPI_EDW_OPM_JOB_DETAIL_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date =>to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') , p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS') ); */
97 IF retcode = '2' THEN
98 APP_EXCEPTION.Raise_exception;
99 END IF;
100 edw_log.put_line(' ');
101 -- edw_log.put_line(' End of Collect Job Detail Fact');
102 edw_log.put_line(' ');
103 edw_log.put_line(' Start of Collect Discrete Job Detail Fact ');
104 OPI_EDW_OPI_JOB_DETAIL_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date => to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') ,p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS'));
105 edw_log.put_line(' ');
106 edw_log.put_line(' End of Collect Discrete Job Detail Fact ');
107 ELSIF l_fact_name = 'OPI_EDW_RES_UTIL_F' THEN
108 edw_log.put_line(' ');
109 -- edw_log.put_line(' Start of Collect Process Resource Utilization Fact ');
110 /* OPI_EDW_OPM_RES_UTIL_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date =>to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') , p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS') ); */
111 IF retcode = '2' THEN
112 APP_EXCEPTION.Raise_exception;
113 END IF;
114 edw_log.put_line(' ');
115 -- edw_log.put_line(' End of Collect Resource Utilization Fact');
116
117 edw_log.put_line(' ');
118 edw_log.put_line(' Start of Collect Discrete Resource Utilization Fact ');
119 OPI_EDW_OPI_RES_UTIL_F_C.PUSH(Errbuf => Errbuf ,Retcode => Retcode , p_from_date => to_char(l_from_date,'YYYY/MM/DD HH24:MI:SS') ,p_to_date => to_char(l_to_date,'YYYY/MM/DD HH24:MI:SS'));
120 edw_log.put_line(' ');
121 edw_log.put_line(' End of Collect Discrete Resource Utilization Fact ');
122 ELSE
123 edw_log.put_line(' ');
124 edw_log.put_line(' Invalid Concurrent Program registration ');
125 END IF;
126 END PUSH;
127 END OPI_EDW_COLLECT_MBI_FACTS_F_C;