[Home] [Help]
PACKAGE BODY: APPS.BOM_BUSINESS_EVENT_PKG
Source
1 package body Bom_Business_Event_PKG as
2 /* $Header: BOMSBESB.pls 120.9 2007/10/04 14:01:06 grastogi ship $ */
3 /*==========================================================================+
4 | Copyright (c) 1993 Oracle Corporation Belmont, California, USA |
5 | All rights reserved. |
6 +===========================================================================+
7 | |
8 | File Name : BOMSBESS.pls |
9 | DESCRIPTION : Package for raising various BOM Business Events |
10 | User of this API would use one of the defined constants |
11 | and call the raise event with the necessary parameters |
12 | Any Event that requires parameters must first call the |
13 | first call the Add_Parameter_To_List and then call the |
14 | raise_Event method. wf_parameter_list_t can be initialized |
15 | as <variable> := wf_parameter_list_t() |
16 | History: |
17 |-------- |
18 | 02-Sept-2003 Rahul Chitko Initial Creation |
19 +==========================================================================*/
20
21
22 /*
23 ** Procedure: Raise_Event
24 ** Purpose : Enables a Business Event to be raised. Any action within the realm of product structure
25 ** can use this api to raise a pre-defined event, with the necessary parameters.
26 ** Parameter: Event_Name - should ideally be one of the pre-defined constants. please refer to the spec.
27 ** Event_Key - a unique identifier for this event, something like sysdate.
28 ** Parameter List - this is a name/value pair of parameters that will be passed to the event.
29 */
30 PROCEDURE Raise_Event( p_Event_Name IN VARCHAR2
31 , p_Event_Key IN VARCHAR2
32 , p_Parameter_List IN OUT NOCOPY wf_parameter_list_t
33 )
34 IS
35 BEGIN
36 wf_event.raise( p_Event_Name => p_Event_Name
37 , p_Event_Key => p_Event_Key
38 , p_parameters => p_Parameter_List
39 );
40
41 p_Parameter_List.DELETE;
42 END Raise_Event;
43
44 /*
45 ** Procedure: Add_Parameter_To_List
46 ** Purpose : This is a wrappper procedure on top of what workflow provides. This indirection
47 ** is created only to serve as a better extensibility.
48 ** Parameter: p_Parameter_Name - name of the parameter
49 ** p_value - value of the parameter
50 ** parameter_list - returns the new parameter list
51 */
52 PROCEDURE Add_Parameter_To_List( p_Parameter_Name IN VARCHAR2
53 , p_Value IN VARCHAR2
54 , p_parameter_List IN OUT NOCOPY wf_parameter_list_t
55 )
56 IS
57 BEGIN
58
59 wf_event.AddParameterToList( p_name => p_Parameter_Name
60 , p_value => p_Value
61 , p_ParameterList => p_parameter_List
62 );
63
64 END Add_Parameter_To_List;
65
66
67 /* Utility procedures */
68
69 PROCEDURE Raise_Item_Event
70 ( p_organization_id IN NUMBER
71 ,p_inventory_item_id IN NUMBER
72 ,p_item_name IN VARCHAR2
73 ,p_item_description IN VARCHAR2
74 ,p_Event_Name IN VARCHAR2)
75 IS
76 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
77 BEGIN
78 Bom_Business_Event_PKG.Add_Parameter_To_List
79 ( p_parameter_name => 'INVENTORY_ITEM_ID'
80 ,p_value => p_inventory_item_id
81 ,p_parameter_list => l_parameter_list);
82
83 Bom_Business_Event_PKG.Add_Parameter_To_List
84 (p_parameter_name => 'ORGANIZATION_ID'
85 ,p_value => p_organization_id
86 ,p_parameter_list => l_parameter_list);
87
88 Bom_Business_Event_PKG.Add_Parameter_To_List
89 (p_parameter_name => 'ITEM_NAME'
90 ,p_value => p_item_name
91 ,p_parameter_list => l_parameter_list);
92
93 Bom_Business_Event_PKG.Add_Parameter_To_List
94 (p_parameter_name => 'ITEM_DESCRIPTION'
95 ,p_value => p_item_description
96 ,p_parameter_list => l_parameter_list);
97
98 --bug:5245403 Create a file with time precision of fraction of seconds to avoid
99 --overwrite in case of multiple events firing within a second.
100 Bom_Business_Event_PKG.Raise_event
101 ( p_Event_Name => p_Event_Name
102 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
103 ,p_parameter_list => l_parameter_list);
104
105 END Raise_Item_Event;
106
107 PROCEDURE Raise_Bill_Event
108 ( p_pk1_value IN VARCHAR2
109 ,p_pk2_value IN VARCHAR2
110 ,p_obj_name IN VARCHAR2
111 ,p_structure_name IN VARCHAR2
112 ,p_organization_id IN NUMBER
113 ,p_structure_comment IN VARCHAR2
114 ,p_Event_Name IN VARCHAR2)
115 IS
116 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
117
118 BEGIN
119
120 Bom_Business_Event_PKG.Add_Parameter_To_List
121 ( p_parameter_name => 'OBJ_NAME'
122 ,p_value => p_obj_name
123 ,p_parameter_list => l_parameter_list);
124
125 Bom_Business_Event_PKG.Add_Parameter_To_List
126 (p_parameter_name => 'PK1_VALUE'
127 ,p_value => p_pk1_value
128 ,p_parameter_list => l_parameter_list);
129
130 Bom_Business_Event_PKG.Add_Parameter_To_List
131 (p_parameter_name => 'PK2_VALUE'
132 ,p_value => p_pk2_value
133 ,p_parameter_list => l_parameter_list);
134
135 Bom_Business_Event_PKG.Add_Parameter_To_List
136 (p_parameter_name => 'STRUCTURE_NAME'
137 ,p_value => nvl(p_structure_name,'PRIMARY')
138 ,p_parameter_list => l_parameter_list);
139
140 Bom_Business_Event_PKG.Add_Parameter_To_List
141 (p_parameter_name => 'ORGANIZATION_ID'
142 ,p_value => p_organization_id
143 ,p_parameter_list => l_parameter_list);
144
145 Bom_Business_Event_PKG.Raise_event
146 ( p_Event_Name => p_Event_Name
147 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
148 ,p_parameter_list => l_parameter_list);
149 END;
150
151 PROCEDURE Raise_Component_Event
152 ( p_bill_sequence_Id IN NUMBER
153 ,p_pk1_value IN VARCHAR2
154 ,p_pk2_value IN VARCHAR2
155 ,p_obj_name IN VARCHAR2
156 ,p_organization_id IN NUMBER
157 ,p_comp_item_name IN VARCHAR2
158 ,p_comp_description IN VARCHAR2
159 ,p_Event_Name IN VARCHAR2)
160 IS
161
162 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
163
164 BEGIN
165
166 Bom_Business_Event_PKG.Add_Parameter_To_List
167 ( p_parameter_name => 'OBJ_NAME'
168 ,p_value => p_obj_name
169 ,p_parameter_list => l_parameter_list);
170
171 Bom_Business_Event_PKG.Add_Parameter_To_List
172 (p_parameter_name => 'PK1_VALUE'
173 ,p_value => p_pk1_value
174 ,p_parameter_list => l_parameter_list);
175
176 Bom_Business_Event_PKG.Add_Parameter_To_List
177 (p_parameter_name => 'PK2_VALUE'
178 ,p_value => p_pk2_value
179 ,p_parameter_list => l_parameter_list);
180
181 Bom_Business_Event_PKG.Add_Parameter_To_List
182 (p_parameter_name => 'BILL_SEQUENCE_ID'
183 ,p_value => p_bill_sequence_id
184 ,p_parameter_list => l_parameter_list);
185
186 Bom_Business_Event_PKG.Add_Parameter_To_List
187 (p_parameter_name => 'ORGANIZATION_ID'
188 ,p_value => p_organization_id
189 ,p_parameter_list => l_parameter_list);
190
191 Bom_Business_Event_PKG.Add_Parameter_To_List
192 (p_parameter_name => 'COMPONENT_ITEM_NAME'
193 ,p_value => p_comp_item_name
194 ,p_parameter_list => l_parameter_list);
195
196 Bom_Business_Event_PKG.Add_Parameter_To_List
197 (p_parameter_name => 'COMPONENT_ITEM_DESCRIPTION'
198 ,p_value => p_comp_description
199 ,p_parameter_list => l_parameter_list);
200
201 Bom_Business_Event_PKG.Raise_event
202 ( p_Event_Name => p_Event_Name
203 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
204 ,p_parameter_list => l_parameter_list);
205 END;
206
207
208
209 -- Modified to add WHO columns
210 PROCEDURE Raise_Bill_Event --4306013
211 (p_Event_Load_Type IN VARCHAR2
212 ,p_Request_Identifier IN NUMBER
213 ,p_Batch_Identifier IN NUMBER
214 ,p_Event_Entity_Name IN VARCHAR2
215 ,p_Event_Entity_Parent_Id IN NUMBER
216 ,p_Event_Name IN VARCHAR2
217 ,p_last_update_date IN DATE DEFAULT SYSDATE
218 ,p_last_updated_by IN NUMBER DEFAULT NULL
219 ,p_creation_date IN DATE DEFAULT SYSDATE
220 ,p_created_by IN NUMBER DEFAULT NULL
221 ,p_last_update_login IN NUMBER DEFAULT NULL
222 )
223 IS
224 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
225 l_common_bill_sequence_id NUMBER;
226 BEGIN
227 SELECT common_bill_sequence_id INTO l_common_bill_sequence_id
228 FROM bom_structures_b
229 WHERE bill_sequence_id = p_Event_Entity_Parent_Id;
230
231 Bom_Business_Event_PKG.Add_Parameter_To_List
232 ( p_parameter_name => 'COMMON_BILL_SEQUENCE_ID'
233 ,p_value => l_common_bill_sequence_id
234 ,p_parameter_list => l_parameter_list);
235
236 Bom_Business_Event_PKG.Add_Parameter_To_List
237 ( p_parameter_name => 'EVENT_TYPE'
238 ,p_value => p_Event_Load_Type
239 ,p_parameter_list => l_parameter_list);
240
241 Bom_Business_Event_PKG.Add_Parameter_To_List
242 (p_parameter_name => 'REQUEST_IDENTIFIER'
243 ,p_value => p_Request_Identifier
244 ,p_parameter_list => l_parameter_list);
245
246 Bom_Business_Event_PKG.Add_Parameter_To_List
247 (p_parameter_name => 'BATCH_IDENTIFIER'
248 ,p_value => p_Batch_Identifier
249 ,p_parameter_list => l_parameter_list);
250
251 Bom_Business_Event_PKG.Add_Parameter_To_List
252 (p_parameter_name => 'EVENT_ENTITY_NAME'
253 ,p_value => p_Event_Entity_Name
254 ,p_parameter_list => l_parameter_list);
255
256 Bom_Business_Event_PKG.Add_Parameter_To_List
257 (p_parameter_name => 'EVENT_ENTITY_PARENT_ID'
258 ,p_value => p_Event_Entity_Parent_Id
259 ,p_parameter_list => l_parameter_list);
260
261 Bom_Business_Event_PKG.Add_Parameter_To_List
262 (p_parameter_name => 'LAST_UPDATE_DATE'
263 ,p_value => to_char(p_last_update_date,'dd-mon-yyyy hh24:mi:ss')
264 ,p_parameter_list => l_parameter_list);
265
266 Bom_Business_Event_PKG.Add_Parameter_To_List
267 (p_parameter_name => 'LAST_UPDATED_BY'
268 ,p_value => p_last_updated_by
269 ,p_parameter_list => l_parameter_list);
270
271 IF (p_creation_date IS NOT NULL)
272 THEN
273 Bom_Business_Event_PKG.Add_Parameter_To_List
274 (p_parameter_name => 'CREATION_DATE'
275 ,p_value => to_char(p_creation_date,'dd-mon-yyyy hh24:mi:ss')
276 ,p_parameter_list => l_parameter_list);
277
278 Bom_Business_Event_PKG.Add_Parameter_To_List
279 (p_parameter_name => 'CREATED_BY'
280 ,p_value => p_created_by
281 ,p_parameter_list => l_parameter_list);
282 END IF;
283
284 Bom_Business_Event_PKG.Raise_event
285 ( p_Event_Name => p_Event_Name
286 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
287 ,p_parameter_list => l_parameter_list);
288 END Raise_Bill_Event;
289
290 -- Modified to add WHO columns
291 PROCEDURE Raise_Bill_Event --4306013
292 ( p_Event_Load_Type IN VARCHAR2
293 ,p_Request_Identifier IN NUMBER
294 ,p_Batch_Identifier IN NUMBER
295 ,p_Event_Entity_Name IN VARCHAR2
296 ,p_Event_Name IN VARCHAR2
297 ,p_last_update_date IN DATE DEFAULT SYSDATE
298 ,p_last_updated_by IN NUMBER DEFAULT NULL
299 ,p_creation_date IN DATE DEFAULT SYSDATE
300 ,p_created_by IN NUMBER DEFAULT NULL
301 ,p_last_update_login IN NUMBER DEFAULT NULL
302 )
303 IS
304 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
305 BEGIN
306 Bom_Business_Event_PKG.Add_Parameter_To_List
307 ( p_parameter_name => 'EVENT_TYPE'
308 ,p_value => p_Event_Load_Type
309 ,p_parameter_list => l_parameter_list);
310
311 Bom_Business_Event_PKG.Add_Parameter_To_List
312 (p_parameter_name => 'REQUEST_IDENTIFIER'
313 ,p_value => p_Request_Identifier
314 ,p_parameter_list => l_parameter_list);
315
316 Bom_Business_Event_PKG.Add_Parameter_To_List
317 (p_parameter_name => 'BATCH_IDENTIFIER'
318 ,p_value => p_Batch_Identifier
319 ,p_parameter_list => l_parameter_list);
320
321 Bom_Business_Event_PKG.Add_Parameter_To_List
322 (p_parameter_name => 'EVENT_ENTITY_NAME'
323 ,p_value => p_Event_Entity_Name
324 ,p_parameter_list => l_parameter_list);
325
326 Bom_Business_Event_PKG.Add_Parameter_To_List
327 (p_parameter_name => 'LAST_UPDATE_DATE'
328 ,p_value => to_char(p_last_update_date,'dd-mon-yyyy hh24:mi:ss')
329 ,p_parameter_list => l_parameter_list);
330
331 Bom_Business_Event_PKG.Add_Parameter_To_List
332 (p_parameter_name => 'LAST_UPDATED_BY'
333 ,p_value => p_last_updated_by
334 ,p_parameter_list => l_parameter_list);
335
336 IF (p_creation_date IS NOT NULL)
337 THEN
338 Bom_Business_Event_PKG.Add_Parameter_To_List
339 (p_parameter_name => 'CREATION_DATE'
340 ,p_value => to_char(p_creation_date,'dd-mon-yyyy hh24:mi:ss')
341 ,p_parameter_list => l_parameter_list);
342
343 Bom_Business_Event_PKG.Add_Parameter_To_List
344 (p_parameter_name => 'CREATED_BY'
345 ,p_value => p_created_by
346 ,p_parameter_list => l_parameter_list);
347 END IF;
348
349
350 Bom_Business_Event_PKG.Raise_event
351 ( p_Event_Name => p_Event_Name
352 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
353 ,p_parameter_list => l_parameter_list);
354 END Raise_Bill_Event;
355
356
360 p_pk2_value IN VARCHAR2,
357 -- Modified to add WHO columns
358 PROCEDURE Raise_Bill_Event
359 ( p_pk1_value IN VARCHAR2,
361 p_obj_name IN VARCHAR2,
362 p_structure_name IN VARCHAR2,
363 p_organization_id IN NUMBER,
364 p_structure_comment IN VARCHAR2,
365 p_Event_Load_Type IN VARCHAR2,
366 p_Event_Entity_Name IN VARCHAR2,
367 p_Event_Entity_Parent_Id IN NUMBER,
368 p_Event_Name IN VARCHAR2,
369 p_last_update_date IN DATE DEFAULT SYSDATE,
370 p_last_updated_by IN NUMBER DEFAULT NULL,
371 p_creation_date IN DATE DEFAULT SYSDATE,
372 p_created_by IN NUMBER DEFAULT NULL,
373 p_last_update_login IN NUMBER DEFAULT NULL,
374 p_component_seq_id IN NUMBER DEFAULT NULL
375 )
376
377 IS
378 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
379 l_common_bill_sequence_id NUMBER;
380 BEGIN
381
382 SELECT common_bill_sequence_id INTO l_common_bill_sequence_id
383 FROM bom_structures_b
384 WHERE bill_sequence_id = p_Event_Entity_Parent_Id;
385
386 Bom_Business_Event_PKG.Add_Parameter_To_List
387 ( p_parameter_name => 'COMMON_BILL_SEQUENCE_ID'
388 ,p_value => l_common_bill_sequence_id
389 ,p_parameter_list => l_parameter_list);
390
391 Bom_Business_Event_PKG.Add_Parameter_To_List
392 ( p_parameter_name => 'OBJ_NAME'
393 ,p_value => p_obj_name
394 ,p_parameter_list => l_parameter_list);
395
396 Bom_Business_Event_PKG.Add_Parameter_To_List
397 (p_parameter_name => 'PK1_VALUE'
398 ,p_value => p_pk1_value
399 ,p_parameter_list => l_parameter_list);
400
401 Bom_Business_Event_PKG.Add_Parameter_To_List
402 (p_parameter_name => 'PK2_VALUE'
403 ,p_value => p_pk2_value
404 ,p_parameter_list => l_parameter_list);
405
406 Bom_Business_Event_PKG.Add_Parameter_To_List
407 (p_parameter_name => 'STRUCTURE_NAME'
408 ,p_value => nvl(p_structure_name,'PRIMARY')
409 ,p_parameter_list => l_parameter_list);
410
411 Bom_Business_Event_PKG.Add_Parameter_To_List
412 (p_parameter_name => 'ORGANIZATION_ID'
413 ,p_value => p_organization_id
414 ,p_parameter_list => l_parameter_list);
415
416 Bom_Business_Event_PKG.Add_Parameter_To_List
417 ( p_parameter_name => 'EVENT_TYPE'
418 ,p_value => p_Event_Load_Type
419 ,p_parameter_list => l_parameter_list);
420
421 Bom_Business_Event_PKG.Add_Parameter_To_List
422 (p_parameter_name => 'EVENT_ENTITY_NAME'
423 ,p_value => p_Event_Entity_Name
424 ,p_parameter_list => l_parameter_list);
425
426 Bom_Business_Event_PKG.Add_Parameter_To_List
427 (p_parameter_name => 'EVENT_ENTITY_PARENT_ID'
428 ,p_value => p_Event_Entity_Parent_Id
429 ,p_parameter_list => l_parameter_list);
430
431 IF(p_component_seq_id IS NOT NULL)
432 THEN
433 Bom_Business_Event_PKG.Add_Parameter_To_List
434 (p_parameter_name => 'COMPONENT_SEQUENCE_ID'
435 ,p_value => p_component_seq_id
436 ,p_parameter_list => l_parameter_list);
437 END IF;
438
439 Bom_Business_Event_PKG.Add_Parameter_To_List
440 (p_parameter_name => 'LAST_UPDATE_DATE'
441 ,p_value => to_char(p_last_update_date,'dd-mon-yyyy hh24:mi:ss')
442 ,p_parameter_list => l_parameter_list);
443
444 Bom_Business_Event_PKG.Add_Parameter_To_List
445 (p_parameter_name => 'LAST_UPDATED_BY'
446 ,p_value => p_last_updated_by
447 ,p_parameter_list => l_parameter_list);
448
449 IF (p_creation_date IS NOT NULL)
450 THEN
451 Bom_Business_Event_PKG.Add_Parameter_To_List
455
452 (p_parameter_name => 'CREATION_DATE'
453 ,p_value => to_char(p_creation_date,'dd-mon-yyyy hh24:mi:ss')
454 ,p_parameter_list => l_parameter_list);
456 Bom_Business_Event_PKG.Add_Parameter_To_List
457 (p_parameter_name => 'CREATED_BY'
458 ,p_value => p_created_by
459 ,p_parameter_list => l_parameter_list);
460 END IF;
461
462 Bom_Business_Event_PKG.Raise_event
463 ( p_Event_Name => p_Event_Name
464 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
465 ,p_parameter_list => l_parameter_list);
466 END;
467
468
469
470 PROCEDURE Raise_Component_Event --4306013
471 (p_Event_Load_Type IN VARCHAR2
472 ,p_Request_Identifier IN NUMBER
473 ,p_Batch_Identifier IN NUMBER
474 ,p_Event_Entity_Name IN VARCHAR2
475 ,p_Event_Entity_Parent_Id IN NUMBER
476 ,p_Event_Name IN VARCHAR2)
477 IS
478 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
479 BEGIN
480
481 Bom_Business_Event_PKG.Add_Parameter_To_List
482 ( p_parameter_name => 'EVENT_TYPE'
483 ,p_value => p_Event_Load_Type
484 ,p_parameter_list => l_parameter_list);
485
486 Bom_Business_Event_PKG.Add_Parameter_To_List
487 (p_parameter_name => 'REQUEST_IDENTIFIER'
488 ,p_value => p_Request_Identifier
489 ,p_parameter_list => l_parameter_list);
490
491 Bom_Business_Event_PKG.Add_Parameter_To_List
492 (p_parameter_name => 'BATCH_IDENTIFIER'
493 ,p_value => p_Batch_Identifier
494 ,p_parameter_list => l_parameter_list);
495
496 Bom_Business_Event_PKG.Add_Parameter_To_List
497 (p_parameter_name => 'EVENT_ENTITY_NAME'
498 ,p_value => p_Event_Entity_Name
499 ,p_parameter_list => l_parameter_list);
500
501 Bom_Business_Event_PKG.Add_Parameter_To_List
502 (p_parameter_name => 'EVENT_ENTITY_PARENT_ID'
503 ,p_value => p_Event_Entity_Parent_Id
504 ,p_parameter_list => l_parameter_list);
505
506 Bom_Business_Event_PKG.Raise_event
507 ( p_Event_Name => p_Event_Name
508 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
509 ,p_parameter_list => l_parameter_list);
510 END Raise_Component_Event;
511
512
513 -- Modified to add WHO columns
514 PROCEDURE Raise_Component_Event --4306013
515 ( p_Event_Load_Type IN VARCHAR2
516 ,p_Request_Identifier IN NUMBER
517 ,p_Batch_Identifier IN NUMBER
518 ,p_Event_Entity_Name IN VARCHAR2
519 ,p_Event_Name IN VARCHAR2
520 ,p_last_update_date IN DATE DEFAULT SYSDATE
521 ,p_last_updated_by IN NUMBER DEFAULT NULL
522 ,p_creation_date IN DATE DEFAULT SYSDATE
523 ,p_created_by IN NUMBER DEFAULT NULL
524 ,p_last_update_login IN NUMBER DEFAULT NULL
525 )
526 IS
527 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
528 BEGIN
529
530 Bom_Business_Event_PKG.Add_Parameter_To_List
531 ( p_parameter_name => 'EVENT_TYPE'
532 ,p_value => p_Event_Load_Type
533 ,p_parameter_list => l_parameter_list);
534
535 Bom_Business_Event_PKG.Add_Parameter_To_List
536 (p_parameter_name => 'REQUEST_IDENTIFIER'
537 ,p_value => p_Request_Identifier
538 ,p_parameter_list => l_parameter_list);
539
540 Bom_Business_Event_PKG.Add_Parameter_To_List
541 (p_parameter_name => 'BATCH_IDENTIFIER'
542 ,p_value => p_Batch_Identifier
543 ,p_parameter_list => l_parameter_list);
544
545 Bom_Business_Event_PKG.Add_Parameter_To_List
546 (p_parameter_name => 'EVENT_ENTITY_NAME'
547 ,p_value => p_Event_Entity_Name
548 ,p_parameter_list => l_parameter_list);
549
550 Bom_Business_Event_PKG.Add_Parameter_To_List
551 (p_parameter_name => 'LAST_UPDATE_DATE'
552 ,p_value => to_char(p_last_update_date,'dd-mon-yyyy hh24:mi:ss')
553 ,p_parameter_list => l_parameter_list);
554
555
556 Bom_Business_Event_PKG.Add_Parameter_To_List
557 (p_parameter_name => 'LAST_UPDATED_BY'
558 ,p_value => p_last_updated_by
559 ,p_parameter_list => l_parameter_list);
560
561 IF (p_creation_date IS NOT NULL)
562 THEN
563 Bom_Business_Event_PKG.Add_Parameter_To_List
564 (p_parameter_name => 'CREATION_DATE'
565 ,p_value => to_char(p_creation_date,'dd-mon-yyyy hh24:mi:ss')
566 ,p_parameter_list => l_parameter_list);
567
568 Bom_Business_Event_PKG.Add_Parameter_To_List
572 END IF;
569 (p_parameter_name => 'CREATED_BY'
570 ,p_value => p_created_by
571 ,p_parameter_list => l_parameter_list);
573
574
575 Bom_Business_Event_PKG.Raise_event
576 ( p_Event_Name => p_Event_Name
577 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
578 ,p_parameter_list => l_parameter_list);
579 END Raise_Component_Event;
580
581
582 /* ************************************************************************************** */
583
584 -- Modified to add WHO columns
585 PROCEDURE Raise_Component_Event
586 ( p_bill_sequence_Id IN NUMBER,
587 p_pk1_value IN VARCHAR2,
588 p_pk2_value IN VARCHAR2,
589 p_obj_name IN VARCHAR2,
590 p_organization_id IN NUMBER,
591 p_comp_item_name IN VARCHAR2,
592 p_comp_description in VARCHAR2,
593 p_Event_Load_Type IN VARCHAR2,
594 p_Event_Entity_Name IN VARCHAR2,
595 p_Event_Entity_Parent_Id IN NUMBER,
596 p_Event_Name IN VARCHAR2,
597 p_last_update_date IN DATE DEFAULT SYSDATE,
598 p_last_updated_by IN NUMBER DEFAULT NULL,
599 p_creation_date IN DATE DEFAULT SYSDATE,
600 p_created_by IN NUMBER DEFAULT NULL,
601 p_last_update_login IN NUMBER DEFAULT NULL
602 )
603
604 IS
605 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
606 BEGIN
607
608 Bom_Business_Event_PKG.Add_Parameter_To_List
609 ( p_parameter_name => 'OBJ_NAME'
610 ,p_value => p_obj_name
611 ,p_parameter_list => l_parameter_list);
612
613 Bom_Business_Event_PKG.Add_Parameter_To_List
614 (p_parameter_name => 'PK1_VALUE'
615 ,p_value => p_pk1_value
616 ,p_parameter_list => l_parameter_list);
617
618 Bom_Business_Event_PKG.Add_Parameter_To_List
619 (p_parameter_name => 'PK2_VALUE'
620 ,p_value => p_pk2_value
621 ,p_parameter_list => l_parameter_list);
622
623 Bom_Business_Event_PKG.Add_Parameter_To_List
624 (p_parameter_name => 'BILL_SEQUENCE_ID'
625 ,p_value => p_bill_sequence_id
626 ,p_parameter_list => l_parameter_list);
627
628 Bom_Business_Event_PKG.Add_Parameter_To_List
629 (p_parameter_name => 'ORGANIZATION_ID'
630 ,p_value => p_organization_id
631 ,p_parameter_list => l_parameter_list);
632
633 Bom_Business_Event_PKG.Add_Parameter_To_List
634 (p_parameter_name => 'COMPONENT_ITEM_NAME'
635 ,p_value => p_comp_item_name
636 ,p_parameter_list => l_parameter_list);
637
638 /* bug 5324805
639 Bom_Business_Event_PKG.Add_Parameter_To_List
640 (p_parameter_name => 'COMPONENT_ITEM_DESCRIPTION'
641 ,p_value => p_comp_description
642 ,p_parameter_list => l_parameter_list); */
643
644 Bom_Business_Event_PKG.Add_Parameter_To_List
645 ( p_parameter_name => 'EVENT_TYPE'
646 ,p_value => p_Event_Load_Type
647 ,p_parameter_list => l_parameter_list);
648
649 Bom_Business_Event_PKG.Add_Parameter_To_List
650 (p_parameter_name => 'EVENT_ENTITY_NAME'
651 ,p_value => p_Event_Entity_Name
652 ,p_parameter_list => l_parameter_list);
653
654 Bom_Business_Event_PKG.Add_Parameter_To_List
655 (p_parameter_name => 'EVENT_ENTITY_PARENT_ID'
656 ,p_value => p_Event_Entity_Parent_Id
657 ,p_parameter_list => l_parameter_list);
658
659 Bom_Business_Event_PKG.Add_Parameter_To_List
660 (p_parameter_name => 'LAST_UPDATE_DATE'
661 ,p_value => to_char(p_last_update_date,'dd-mon-yyyy hh24:mi:ss')
662 ,p_parameter_list => l_parameter_list);
663
664 Bom_Business_Event_PKG.Add_Parameter_To_List
665 (p_parameter_name => 'LAST_UPDATED_BY'
666 ,p_value => p_last_updated_by
667 ,p_parameter_list => l_parameter_list);
668
669 IF (p_creation_date IS NOT NULL)
670 THEN
671 Bom_Business_Event_PKG.Add_Parameter_To_List
672 (p_parameter_name => 'CREATION_DATE'
673 ,p_value => to_char(p_creation_date,'dd-mon-yyyy hh24:mi:ss')
674 ,p_parameter_list => l_parameter_list);
675
676 Bom_Business_Event_PKG.Add_Parameter_To_List
677 (p_parameter_name => 'CREATED_BY'
678 ,p_value => p_created_by
679 ,p_parameter_list => l_parameter_list);
680 END IF;
681
682
683 Bom_Business_Event_PKG.Raise_event
684 ( p_Event_Name => p_Event_Name
685 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
686 ,p_parameter_list => l_parameter_list);
687 END;
688
689
690 /* ************************************************************************************** */
691
692 PROCEDURE Raise_Bill_Event --4306013
693 (p_Request_Identifier IN NUMBER
697 BEGIN
694 ,p_Event_Name IN VARCHAR2)
695 IS
696 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
698
699 Bom_Business_Event_PKG.Add_Parameter_To_List
700 (p_parameter_name => 'REQUEST_IDENTIFIER'
701 ,p_value => p_Request_Identifier
702 ,p_parameter_list => l_parameter_list);
703
704 Bom_Business_Event_PKG.Raise_event
705 ( p_Event_Name => p_Event_Name
706 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
707 ,p_parameter_list => l_parameter_list);
708 END Raise_Bill_Event;
709
710 -- Bug 5244896
711 PROCEDURE raise_str_cpy_complete_event
712 ( p_copy_request_id IN NUMBER )
713 IS
714 l_parameter_list wf_parameter_list_t := wf_parameter_list_t();
715 BEGIN
716 bom_business_event_pkg.add_parameter_to_list
717 (p_parameter_name => 'COPY_REQUEST_ID'
718 ,p_value => p_copy_request_id
719 ,p_parameter_list => l_parameter_list
720 );
721 bom_business_event_pkg.raise_event
722 ( p_Event_Name => G_STRUCTURE_CPY_COMPLETE_EVENT
723 ,p_Event_Key => to_char(systimestamp, 'dd-mon-yyyy hh24:mi:ss:ff')
724 ,p_parameter_list => l_parameter_list
725 );
726 END raise_str_cpy_complete_event;
727
728 END Bom_Business_Event_PKG;