[Home] [Help]
PACKAGE BODY: APPS.CAC_AVLBLTY_EVENTS_PVT
Source
1 PACKAGE BODY CAC_AVLBLTY_EVENTS_PVT AS
2 /* $Header: caccabeb.pls 120.1 2005/07/02 02:17:31 appldev noship $ */
3
4
5 /*******************************************************************************
6 ** Private APIs
7 *******************************************************************************/
8
9
10 FUNCTION getItemKey(p_EventName IN VARCHAR2)
11 RETURN VARCHAR2
12 IS
13 l_key varchar2(240);
14 BEGIN
15 SELECT p_EventName ||'-'|| cac_sr_wf_events_s.NEXTVAL INTO l_key FROM DUAL;
16 RETURN l_key;
17 END getItemKey;
18
19
20 PROCEDURE RAISE_CREATE_SCHEDULE
21 /*******************************************************************************
22 **
23 ** RAISE_CREATE_SCHEDULE
24 **
25 ** Raise business event
26 **
27 *******************************************************************************/
28 ( p_Schedule_Id IN NUMBER -- id of the schedule
29 , p_Schedule_Category IN VARCHAR2
30 , p_Schdl_Start_Date IN DATE
31 , p_Schdl_End_Date IN DATE
32 )
33 IS
34
35 l_ParameterList WF_PARAMETER_LIST_T;
36 l_ItemKey VARCHAR2(240);
37 l_EventName VARCHAR2(240);
38
39 BEGIN
40
41 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.createSchedule';
42
43 --
44 -- Get the item key
45 --
46 l_ItemKey := getItemKey(l_EventName);
47
48 --
49 -- construct the parameter list
50 --
51 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
52 , p_value => TO_CHAR(p_Schedule_Id)
53 , p_parameterlist => l_ParameterList
54 );
55
56 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
57 , p_value => p_Schedule_Category
58 , p_parameterlist => l_ParameterList
59 );
60
61 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
62 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
63 , p_parameterlist => l_ParameterList
64 );
65
66 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
67 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
68 , p_parameterlist => l_ParameterList
69 );
70 --
71 -- Raise the event
72 --
73 WF_EVENT.RAISE3( p_event_name => l_EventName
74 , p_event_key => l_ItemKey
75 , p_event_data => NULL
76 , p_parameter_list => l_ParameterList
77 , p_send_date => SYSDATE
78 );
79
80 --
81 -- Clean up parameter list
82 --
83 l_ParameterList.DELETE;
84
85 END RAISE_CREATE_SCHEDULE;
86
87
88 PROCEDURE RAISE_UPDATE_SCHEDULE
89 /*******************************************************************************
90 **
91 ** RAISE_UPDATE_SCHEDULE
92 **
93 ** Raise business event
94 **
95 *******************************************************************************/
96 ( p_Schedule_Id IN NUMBER -- id of the schedule
97 , p_Schedule_Category IN VARCHAR2
98 , p_Schdl_Start_Date IN DATE
99 , p_Schdl_End_Date IN DATE
100 )
101 IS
102
103 l_ParameterList WF_PARAMETER_LIST_T;
104 l_ItemKey VARCHAR2(240);
105 l_EventName VARCHAR2(240);
106
107 BEGIN
108
109 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.updateSchedule';
110
111 --
112 -- Get the item key
113 --
114 l_ItemKey := getItemKey(l_EventName);
115
116 --
117 -- construct the parameter list
118 --
119 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
120 , p_value => TO_CHAR(p_Schedule_Id)
121 , p_parameterlist => l_ParameterList
122 );
123
124 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
125 , p_value => p_Schedule_Category
126 , p_parameterlist => l_ParameterList
127 );
128
129 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
130 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
131 , p_parameterlist => l_ParameterList
132 );
133
134 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
135 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
136 , p_parameterlist => l_ParameterList
137 );
138 --
139 -- Raise the event
140 --
141 WF_EVENT.RAISE3( p_event_name => l_EventName
142 , p_event_key => l_ItemKey
143 , p_event_data => NULL
144 , p_parameter_list => l_ParameterList
145 , p_send_date => SYSDATE
146 );
147
148 --
149 -- Clean up parameter list
150 --
151 l_ParameterList.DELETE;
152
153 END RAISE_UPDATE_SCHEDULE;
154
155
156 PROCEDURE RAISE_DELETE_SCHEDULE
157 /*******************************************************************************
158 **
159 ** RAISE_DELETE_SCHEDULE
160 **
161 ** Raise business event
162 **
163 *******************************************************************************/
164 ( p_Schedule_Id IN NUMBER -- id of the schedule
165 , p_Schedule_Category IN VARCHAR2
166 , p_Schdl_Start_Date IN DATE
167 , p_Schdl_End_Date IN DATE
168 )
169 IS
170
171 l_ParameterList WF_PARAMETER_LIST_T;
172 l_ItemKey VARCHAR2(240);
173 l_EventName VARCHAR2(240);
174
175 BEGIN
176
177 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.deleteSchedule';
178
179 --
180 -- Get the item key
181 --
182 l_ItemKey := getItemKey(l_EventName);
183
184 --
185 -- construct the parameter list
186 --
187 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
188 , p_value => TO_CHAR(p_Schedule_Id)
189 , p_parameterlist => l_ParameterList
190 );
191
192 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
193 , p_value => p_Schedule_Category
194 , p_parameterlist => l_ParameterList
195 );
196
197 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
198 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
199 , p_parameterlist => l_ParameterList
200 );
201
202 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
203 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
204 , p_parameterlist => l_ParameterList
205 );
206 --
207 -- Raise the event
208 --
209 WF_EVENT.RAISE3( p_event_name => l_EventName
210 , p_event_key => l_ItemKey
211 , p_event_data => NULL
212 , p_parameter_list => l_ParameterList
213 , p_send_date => SYSDATE
214 );
215
216 --
217 -- Clean up parameter list
218 --
219 l_ParameterList.DELETE;
220
221 END RAISE_DELETE_SCHEDULE;
222
223
224 PROCEDURE RAISE_ADD_RESOURCE
225 /*******************************************************************************
226 **
227 ** RAISE_ADD_RESOURCE
228 **
229 ** Raise business event
230 **
231 *******************************************************************************/
232 ( p_Schedule_Id IN NUMBER -- id of the schedule
233 , p_Schedule_Category IN VARCHAR2
234 , p_Schdl_Start_Date IN DATE
235 , p_Schdl_End_Date IN DATE
236 , p_Object_Type IN VARCHAR2
237 , p_Object_Id IN NUMBER
238 , p_Object_Start_Date IN DATE
239 , p_Object_End_Date IN DATE
240 )
241 IS
242
243 l_ParameterList WF_PARAMETER_LIST_T;
244 l_ItemKey VARCHAR2(240);
245 l_EventName VARCHAR2(240);
246
247 BEGIN
248
249 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.addResource';
250
251 --
252 -- Get the item key
253 --
254 l_ItemKey := getItemKey(l_EventName);
255
256 --
257 -- construct the parameter list
258 --
259 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
260 , p_value => TO_CHAR(p_Schedule_Id)
261 , p_parameterlist => l_ParameterList
262 );
263
264 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
265 , p_value => p_Schedule_Category
266 , p_parameterlist => l_ParameterList
267 );
268
269 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
270 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
271 , p_parameterlist => l_ParameterList
272 );
273
274 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
275 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
276 , p_parameterlist => l_ParameterList
277 );
278 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_ID'
279 , p_value => TO_CHAR(p_Object_Id)
280 , p_parameterlist => l_ParameterList
281 );
282
283 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_CODE'
284 , p_value => p_Object_Type
285 , p_parameterlist => l_ParameterList
286 );
287
288 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_START_DATE'
289 , p_value => TO_CHAR(p_Object_Start_Date,'MM/DD/YYYY')
290 , p_parameterlist => l_ParameterList
291 );
292
293 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_END_DATE'
294 , p_value => TO_CHAR(p_Object_End_Date,'MM/DD/YYYY')
295 , p_parameterlist => l_ParameterList
296 );
297 --
298 -- Raise the event
299 --
300 WF_EVENT.RAISE3( p_event_name => l_EventName
301 , p_event_key => l_ItemKey
302 , p_event_data => NULL
303 , p_parameter_list => l_ParameterList
304 , p_send_date => SYSDATE
305 );
306
307 --
308 -- Clean up parameter list
309 --
310 l_ParameterList.DELETE;
311
312 END RAISE_ADD_RESOURCE;
313
314
315 PROCEDURE RAISE_UPDATE_RESOURCE
316 /*******************************************************************************
317 **
318 ** RAISE_UPDATE_RESOURCE
319 **
320 ** Raise business event
321 **
322 *******************************************************************************/
323 ( p_Schedule_Id IN NUMBER -- id of the schedule
324 , p_Schedule_Category IN VARCHAR2
325 , p_Schdl_Start_Date IN DATE
326 , p_Schdl_End_Date IN DATE
327 , p_Object_Type IN VARCHAR2
328 , p_Object_Id IN NUMBER
329 , p_Object_Start_Date IN DATE
330 , p_Object_End_Date IN DATE
331 )
332 IS
333
334 l_ParameterList WF_PARAMETER_LIST_T;
335 l_ItemKey VARCHAR2(240);
336 l_EventName VARCHAR2(240);
337
338 BEGIN
339
340 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.updateResource';
341
342 --
343 -- Get the item key
344 --
345 l_ItemKey := getItemKey(l_EventName);
346
347 --
348 -- construct the parameter list
349 --
350 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
351 , p_value => TO_CHAR(p_Schedule_Id)
352 , p_parameterlist => l_ParameterList
353 );
354
355 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
356 , p_value => p_Schedule_Category
357 , p_parameterlist => l_ParameterList
358 );
359
360 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
361 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
362 , p_parameterlist => l_ParameterList
363 );
364
365 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
366 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
367 , p_parameterlist => l_ParameterList
368 );
369 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_ID'
370 , p_value => TO_CHAR(p_Object_Id)
371 , p_parameterlist => l_ParameterList
372 );
373
374 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_CODE'
375 , p_value => p_Object_Type
376 , p_parameterlist => l_ParameterList
377 );
378
382 );
379 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_START_DATE'
380 , p_value => TO_CHAR(p_Object_Start_Date,'MM/DD/YYYY')
381 , p_parameterlist => l_ParameterList
383
384 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_END_DATE'
385 , p_value => TO_CHAR(p_Object_End_Date,'MM/DD/YYYY')
386 , p_parameterlist => l_ParameterList
387 );
388 --
389 -- Raise the event
390 --
391 WF_EVENT.RAISE3( p_event_name => l_EventName
392 , p_event_key => l_ItemKey
393 , p_event_data => NULL
394 , p_parameter_list => l_ParameterList
395 , p_send_date => SYSDATE
396 );
397
398 --
399 -- Clean up parameter list
400 --
401 l_ParameterList.DELETE;
402
403 END RAISE_UPDATE_RESOURCE;
404
405
406 PROCEDURE RAISE_REMOVE_RESOURCE
407 /*******************************************************************************
408 **
409 ** RAISE_REMOVE_RESOURCE
410 **
411 ** Raise business event
412 **
413 *******************************************************************************/
414 ( p_Schedule_Id IN NUMBER -- id of the schedule
415 , p_Schedule_Category IN VARCHAR2
416 , p_Schdl_Start_Date IN DATE
417 , p_Schdl_End_Date IN DATE
418 , p_Object_Type IN VARCHAR2
419 , p_Object_Id IN NUMBER
420 , p_Object_Start_Date IN DATE
421 , p_Object_End_Date IN DATE
422 )
423 IS
424
425 l_ParameterList WF_PARAMETER_LIST_T;
426 l_ItemKey VARCHAR2(240);
427 l_EventName VARCHAR2(240);
428
429 BEGIN
430
431 l_EventName := 'oracle.apps.jtf.cac.scheduleRep.removeResource';
432
433 --
434 -- Get the item key
435 --
436 l_ItemKey := getItemKey(l_EventName);
437
438 --
439 -- construct the parameter list
440 --
441 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_ID'
442 , p_value => TO_CHAR(p_Schedule_Id)
443 , p_parameterlist => l_ParameterList
444 );
445
446 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_CATEGORY'
447 , p_value => p_Schedule_Category
448 , p_parameterlist => l_ParameterList
449 );
450
451 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_START_DATE'
452 , p_value => TO_CHAR(p_Schdl_Start_Date,'MM/DD/YYYY')
453 , p_parameterlist => l_ParameterList
454 );
455
456 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'SCHEDULE_END_DATE'
457 , p_value => TO_CHAR(p_Schdl_End_Date,'MM/DD/YYYY')
458 , p_parameterlist => l_ParameterList
459 );
460 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_ID'
461 , p_value => TO_CHAR(p_Object_Id)
462 , p_parameterlist => l_ParameterList
463 );
464
465 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_CODE'
466 , p_value => p_Object_Type
467 , p_parameterlist => l_ParameterList
468 );
469
470 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_START_DATE'
471 , p_value => TO_CHAR(p_Object_Start_Date,'MM/DD/YYYY')
472 , p_parameterlist => l_ParameterList
473 );
474
475 WF_EVENT.ADDPARAMETERTOLIST( p_name => 'OBJECT_END_DATE'
476 , p_value => TO_CHAR(p_Object_End_Date,'MM/DD/YYYY')
477 , p_parameterlist => l_ParameterList
478 );
479 --
480 -- Raise the event
481 --
482 WF_EVENT.RAISE3( p_event_name => l_EventName
483 , p_event_key => l_ItemKey
484 , p_event_data => NULL
485 , p_parameter_list => l_ParameterList
486 , p_send_date => SYSDATE
487 );
488
489 --
490 -- Clean up parameter list
491 --
492 l_ParameterList.DELETE;
493
494 END RAISE_REMOVE_RESOURCE;
495
496
497 END CAC_AVLBLTY_EVENTS_PVT;