[Home] [Help]
PACKAGE BODY: APPS.EDW_HR_REC_ACT_M_C
Source
1 Package Body EDW_HR_REC_ACT_M_C AS
2 /* $Header: hrieprec.pkb 120.1 2005/06/07 06:02:25 anmajumd noship $ */
3 G_PUSH_DATE_RANGE1 Date:=Null;
4 G_PUSH_DATE_RANGE2 Date:=Null;
5 g_row_count Number:=0;
6 g_exception_msg varchar2(2000):=Null;
7
8
9 Procedure Push(Errbuf in out NOCOPY Varchar2,
10 Retcode in out NOCOPY Varchar2,
11 p_from_date IN VARCHAR2,
12 p_to_date IN VARCHAR2) IS
13 l_dimension_name Varchar2(30) :='EDW_HR_REC_ACT_M' ;
14 l_temp_date Date:=Null;
15 l_rows_inserted Number:=0;
16 l_duration Number:=0;
17 l_exception_msg Varchar2(2000):=Null;
18
19 -- -------------------------------------------
20 -- Put any additional developer variables here
21 -- -------------------------------------------
22 Begin
23 Errbuf :=NULL;
24 Retcode:=0;
25 IF (Not EDW_COLLECTION_UTIL.setup(l_dimension_name)) THEN
26 errbuf := fnd_message.get;
27 Return;
28 END IF;
29
30 IF (p_from_date IS NULL) THEN
31 EDW_HR_REC_ACT_M_C.g_push_date_range1 := EDW_COLLECTION_UTIL.G_local_last_push_start_date -
32 EDW_COLLECTION_UTIL.g_offset;
33 ELSE
34 EDW_HR_REC_ACT_M_C.g_push_date_range1 := to_date(p_from_date, 'YYYY/MM/DD HH24:MI:SS');
35 END IF;
36
37 IF (p_to_date IS NULL) THEN
38 EDW_HR_REC_ACT_M_C.g_push_date_range2 := EDW_COLLECTION_UTIL.G_local_curr_push_start_date;
39 ELSE
40 EDW_HR_REC_ACT_M_C.g_push_date_range2 := to_date(p_to_date, 'YYYY/MM/DD HH24:MI:SS');
41 END IF;
42
43
44 edw_log.put_line( 'The collection range is from '||
45 to_char(EDW_HR_REC_ACT_M_C.g_push_date_range1,'MM/DD/YYYY HH24:MI:SS')||' to '||
46 to_char(EDW_HR_REC_ACT_M_C.g_push_date_range2,'MM/DD/YYYY HH24:MI:SS'));
47 edw_log.put_line(' ');
48
49 -- -----------------------------------------------------------------------------
50 -- Start of Collection , Developer Customizable Section
51 -- -----------------------------------------------------------------------------
52
53 edw_log.put_line(' ');
54 edw_log.put_line('Pushing data');
55
56 l_temp_date := sysdate;
57
58
59 Push_EDW_HR_RACT_ACTIVITY_LSTG(EDW_HR_REC_ACT_M_C.g_push_date_range1, EDW_HR_REC_ACT_M_C.g_push_date_range2);
60 Push_EDW_HR_RACT_ACT_TYPE_LSTG(EDW_HR_REC_ACT_M_C.g_push_date_range1, EDW_HR_REC_ACT_M_C.g_push_date_range2);
61
62
63 l_duration := sysdate - l_temp_date;
64
65 edw_log.put_line('Total rows inserted : '||g_row_count);
66 edw_log.put_line('Process Time: '||edw_log.duration(l_duration));
67 edw_log.put_line(' ');
68 -- ---------------------------------------------------------------------------
69 -- END OF Collection , Developer Customizable Section
70 -- ---------------------------------------------------------------------------
71 EDW_COLLECTION_UTIL.wrapup(TRUE, g_row_count, null, g_push_date_range1, g_push_date_range2 );
72 commit;
73
74 Exception When others then
75 Errbuf:=sqlerrm;
76 Retcode:=sqlcode;
77 l_exception_msg := Retcode || ':' || Errbuf;
78 EDW_HR_REC_ACT_M_C.g_exception_msg := l_exception_msg;
79 rollback;
80 EDW_COLLECTION_UTIL.wrapup(FALSE, 0, EDW_HR_REC_ACT_M_C.g_exception_msg, g_push_date_range1, g_push_date_range2);
81
82 commit;
83 End;
84
85
86 Procedure Push_EDW_HR_RACT_ACTIVITY_LSTG(p_from_date IN date, p_to_date IN DATE) IS
87 l_date1 DATE;
88 l_date2 DATE;
89 l_rows_inserted NUMBER :=0;
90 BEGIN
91 edw_log.put_line('Starting Push_EDW_HR_RACT_ACTIVITY_LSTG');
92 l_date1 := p_from_date;
93 l_date2 := p_to_date;
94 Insert Into
95 EDW_HR_RACT_ACTIVITY_LSTG@EDW_APPS_TO_WH(
96 ACTIVITY_TYPE_FK,
97 NAME,
98 EXTERNAL_CONTACT,
99 INSTANCE,
100 BUSINESS_GROUP_ID,
101 ACTIVITY_COST,
102 ACTIVITY_PLANNED_COST,
103 START_DATE,
104 END_DATE,
105 CLOSING_DATE,
106 LAST_UPDATE_DATE,
107 CREATION_DATE,
108 USER_ATTRIBUTE1,
109 USER_ATTRIBUTE2,
110 USER_ATTRIBUTE3,
111 USER_ATTRIBUTE4,
112 USER_ATTRIBUTE5,
113 REC_ACTIVITY_DP,
114 REC_ACTIVITY_ID,
115 REC_ACTIVITY_PK,
116 OPERATION_CODE,
117 COLLECTION_STATUS)
118 select NVL(ACTIVITY_TYPE_FK, 'NA_EDW'),
119 NAME,
120 EXTERNAL_CONTACT,
121 INSTANCE,
122 BUSINESS_GROUP_ID,
123 ACTIVITY_COST,
124 ACTIVITY_PLANNED_COST,
125 START_DATE,
126 END_DATE,
127 CLOSING_DATE,
128 LAST_UPDATE_DATE,
129 CREATION_DATE,
130 USER_ATTRIBUTE1,
131 USER_ATTRIBUTE2,
132 USER_ATTRIBUTE3,
133 USER_ATTRIBUTE4,
134 USER_ATTRIBUTE5,
135 REC_ACTIVITY_DP,
136 REC_ACTIVITY_ID,
137 REC_ACTIVITY_PK,
138 NULL, -- OPERATION_CODE
139 'READY'
140 from EDW_HR_RACT_ACTIVITY_LCV@APPS_TO_APPS
141 where last_update_date between l_date1 and l_date2;
142
143
144 l_rows_inserted := sql%rowcount;
145 EDW_HR_REC_ACT_M_C.g_row_count := EDW_HR_REC_ACT_M_C.g_row_count + l_rows_inserted ;
146 edw_log.put_line('Inserted '||to_char(nvl(sql%rowcount,0))||
147 ' rows into the EDW_HR_RACT_ACTIVITY_LSTG staging table');
148 edw_log.put_line('Commiting records for EDW_HR_RACT_ACTIVITY_LSTG');
149 commit;
150
151 edw_log.put_line('Completed Push_EDW_HR_RACT_ACTIVITY_LSTG');
152 Exception When others then
153 raise;
154 commit;
155 END;
156
157
158 Procedure Push_EDW_HR_RACT_ACT_TYPE_LSTG(p_from_date IN date, p_to_date IN DATE) IS
159 l_date1 DATE;
160 l_date2 DATE;
161 l_rows_inserted NUMBER :=0;
162 BEGIN
163 edw_log.put_line('Starting Push_EDW_HR_RACT_ACT_TYPE_LSTG');
164 l_date1 := p_from_date;
165 l_date2 := p_to_date;
166 Insert Into
167 EDW_HR_RACT_ACT_TYPE_LSTG@EDW_APPS_TO_WH(
168 ACTIVITY_TYPE_PK,
169 ALL_FK,
170 ACTIVITY_TYPE_CODE,
171 NAME,
172 ACTIVITY_TYPE_DP,
173 INSTANCE,
174 LAST_UPDATE_DATE,
175 CREATION_DATE,
176 USER_ATTRIBUTE1,
177 USER_ATTRIBUTE2,
178 USER_ATTRIBUTE3,
179 USER_ATTRIBUTE4,
180 USER_ATTRIBUTE5,
181 OPERATION_CODE,
182 COLLECTION_STATUS)
183 select ACTIVITY_TYPE_PK,
184 NVL(ALL_FK, 'NA_EDW'),
185 ACTIVITY_TYPE_CODE,
186 NAME,
187 ACTIVITY_TYPE_DP,
188 INSTANCE,
189 LAST_UPDATE_DATE,
190 CREATION_DATE,
191 USER_ATTRIBUTE1,
192 USER_ATTRIBUTE2,
193 USER_ATTRIBUTE3,
194 USER_ATTRIBUTE4,
195 USER_ATTRIBUTE5,
196 NULL, -- OPERATION_CODE
197 'READY'
198 from EDW_HR_RACT_ACT_TYPE_LCV@APPS_TO_APPS
199 where last_update_date between l_date1 and l_date2;
200
201
202 l_rows_inserted := sql%rowcount;
203 edw_log.put_line('Inserted '||to_char(nvl(sql%rowcount,0))||
204 ' rows into the staging table');
205 edw_log.put_line('Commiting records for EDW_HR_RACT_ACT_TYPE_LSTG');
206 commit;
207
208 edw_log.put_line('Completed Push_EDW_HR_RACT_ACT_TYPE_LSTG');
209 Exception When others then
210 raise;
211 commit;
212 END;
213 End EDW_HR_REC_ACT_M_C;