1 Package Body ota_tea_ins as
2 /* $Header: ottea01t.pkb 120.1 2005/06/09 01:16:02 jbharath noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ota_tea_ins.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------------< insert_dml >------------------------------|
12 -- ----------------------------------------------------------------------------
13 -- {Start Of Comments}
14 --
15 -- Description:
16 -- This procedure controls the actual dml insert logic. The functions of this
17 -- procedure are as follows:
18 -- 1) Initialise the object_version_number to 1 if the object_version_number
19 -- is defined as an attribute for this entity.
20 -- 2) To set and unset the g_api_dml status as required (as we are about to
21 -- perform dml).
22 -- 3) To insert the row into the schema.
23 -- 4) To trap any constraint violations that may have occurred.
24 -- 5) To raise any other errors.
25 --
26 -- Pre Conditions:
27 -- This is an internal private procedure which must be called from the ins
28 -- procedure and must have all mandatory arguments set (except the
29 -- object_version_number which is initialised within this procedure).
30 --
31 -- In Arguments:
32 -- A Pl/Sql record structre.
33 --
34 -- Post Success:
35 -- The specified row will be inserted into the schema.
36 --
37 -- Post Failure:
38 -- On the insert dml failure it is important to note that we always reset the
39 -- g_api_dml status to false.
40 -- If a check, unique or parent integrity constraint violation is raised the
41 -- constraint_error procedure will be called.
42 -- If any other error is reported, the error will be raised after the
43 -- g_api_dml status is reset.
44 --
45 -- Developer Implementation Notes:
46 -- None.
47 --
48 -- Access Status:
49 -- Internal Development Use Only.
50 --
51 -- {End Of Comments}
52 -- ----------------------------------------------------------------------------
53 Procedure insert_dml(p_rec in out nocopy ota_tea_shd.g_rec_type) is
54 --
55 l_proc varchar2(72) := g_package||'insert_dml';
56 --
57 Begin
58 hr_utility.set_location('Entering:'||l_proc, 5);
59 --
60 --
61 ota_tea_shd.g_api_dml := true; -- Set the api dml status
62 --
63 -- Insert the row into: ota_event_associations
64 --
65 insert into ota_event_associations
66 ( event_association_id,
67 event_id,
68 customer_id,
69 organization_id,
70 job_id,
71 position_id,
72 comments,
73 tea_information_category,
74 tea_information1,
75 tea_information2,
76 tea_information3,
77 tea_information4,
78 tea_information5,
79 tea_information6,
80 tea_information7,
81 tea_information8,
82 tea_information9,
83 tea_information10,
84 tea_information11,
85 tea_information12,
86 tea_information13,
87 tea_information14,
88 tea_information15,
89 tea_information16,
90 tea_information17,
91 tea_information18,
92 tea_information19,
93 tea_information20
94 )
95 Values
96 ( p_rec.event_association_id,
97 p_rec.event_id,
98 p_rec.customer_id,
99 p_rec.organization_id,
100 p_rec.job_id,
101 p_rec.position_id,
102 p_rec.comments,
103 p_rec.tea_information_category,
104 p_rec.tea_information1,
105 p_rec.tea_information2,
106 p_rec.tea_information3,
107 p_rec.tea_information4,
108 p_rec.tea_information5,
109 p_rec.tea_information6,
110 p_rec.tea_information7,
111 p_rec.tea_information8,
112 p_rec.tea_information9,
113 p_rec.tea_information10,
114 p_rec.tea_information11,
115 p_rec.tea_information12,
116 p_rec.tea_information13,
117 p_rec.tea_information14,
118 p_rec.tea_information15,
119 p_rec.tea_information16,
120 p_rec.tea_information17,
121 p_rec.tea_information18,
122 p_rec.tea_information19,
123 p_rec.tea_information20
124 );
125 --
126 ota_tea_shd.g_api_dml := false; -- Unset the api dml status
127 --
128 hr_utility.set_location(' Leaving:'||l_proc, 10);
129 Exception
130 When hr_api.check_integrity_violated Then
131 -- A check constraint has been violated
132 ota_tea_shd.g_api_dml := false; -- Unset the api dml status
133 ota_tea_shd.constraint_error
134 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
135 When hr_api.parent_integrity_violated Then
136 -- Parent integrity has been violated
137 ota_tea_shd.g_api_dml := false; -- Unset the api dml status
138 ota_tea_shd.constraint_error
139 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140 When hr_api.unique_integrity_violated Then
141 -- Unique integrity has been violated
142 ota_tea_shd.g_api_dml := false; -- Unset the api dml status
143 ota_tea_shd.constraint_error
144 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
145 When Others Then
146 ota_tea_shd.g_api_dml := false; -- Unset the api dml status
147 Raise;
148 End insert_dml;
149 --
150 -- ----------------------------------------------------------------------------
151 -- |------------------------------< pre_insert >------------------------------|
152 -- ----------------------------------------------------------------------------
153 -- {Start Of Comments}
154 --
155 -- Description:
156 -- This private procedure contains any processing which is required before
157 -- the insert dml. Presently, if the entity has a corresponding primary
158 -- key which is maintained by an associating sequence, the primary key for
159 -- the entity will be populated with the next sequence value in
160 -- preparation for the insert dml.
161 --
162 -- Pre Conditions:
163 -- This is an internal procedure which is called from the ins procedure.
164 --
165 -- In Arguments:
166 -- A Pl/Sql record structre.
167 --
168 -- Post Success:
169 -- Processing continues.
170 --
171 -- Post Failure:
172 -- If an error has occurred, an error message and exception will be raised
173 -- but not handled.
174 --
175 -- Developer Implementation Notes:
176 -- Any pre-processing required before the insert dml is issued should be
177 -- coded within this procedure. As stated above, a good example is the
178 -- generation of a primary key number via a corresponding sequence.
179 -- It is important to note that any 3rd party maintenance should be reviewed
180 -- before placing in this procedure.
181 --
182 -- Access Status:
183 -- Internal Development Use Only.
184 --
185 -- {End Of Comments}
186 -- ----------------------------------------------------------------------------
187 Procedure pre_insert(p_rec in out nocopy ota_tea_shd.g_rec_type) is
188 --
189 l_proc varchar2(72) := g_package||'pre_insert';
190 --
191 Cursor C_Sel1 is select ota_event_associations_s.nextval from sys.dual;
192 --
193 Begin
194 hr_utility.set_location('Entering:'||l_proc, 5);
195 --
196 --
197 -- Select the next sequence number
198 --
199 Open C_Sel1;
200 Fetch C_Sel1 Into p_rec.event_association_id;
201 Close C_Sel1;
202 --
203 hr_utility.set_location(' Leaving:'||l_proc, 10);
204 End pre_insert;
205 --
206 -- ----------------------------------------------------------------------------
207 -- |-----------------------------< post_insert >------------------------------|
208 -- ----------------------------------------------------------------------------
209 -- {Start Of Comments}
210 --
211 -- Description:
212 -- This private procedure contains any processing which is required after the
213 -- insert dml.
214 --
215 -- Pre Conditions:
216 -- This is an internal procedure which is called from the ins procedure.
217 --
218 -- In Arguments:
219 -- A Pl/Sql record structre.
220 --
221 -- Post Success:
222 -- Processing continues.
223 --
224 -- Post Failure:
225 -- If an error has occurred, an error message and exception will be raised
226 -- but not handled.
227 --
228 -- Developer Implementation Notes:
229 -- Any post-processing required after the insert dml is issued should be
230 -- coded within this procedure. It is important to note that any 3rd party
231 -- maintenance should be reviewed before placing in this procedure.
232 --
233 -- Access Status:
234 -- Internal Development Use Only.
235 --
236 -- {End Of Comments}
237 -- ----------------------------------------------------------------------------
238 Procedure post_insert ( p_business_group_id in number
239 ,p_validate in boolean
240 ,p_price_basis in varchar2
241 ,p_event_id in number
242 ,p_customer_id in number
243 ,p_booking_id out nocopy number
244 ,p_tdb_object_version_number out nocopy number
245 ,p_booking_status_type_id in number
246 ,p_booking_contact_id in number
247 ,p_contact_address_id in number
248 ,p_delegate_contact_phone in varchar2
249 ,p_delegate_contact_fax in varchar2
250 ,p_internal_booking_flag in varchar2
251 ,p_source_of_booking in varchar2
252 ,p_number_of_places in number
253 ,p_date_booking_placed in date
254 ,p_finance_header_id in number
255 ,p_currency_code in varchar2
256 ,p_standard_amount in number
257 ,p_unitary_amount in number
258 ,p_money_amount in number
259 ,p_booking_deal_id in number
260 ,p_booking_deal_type in varchar2
261 ,p_finance_line_id in out nocopy number
262 ,p_delegate_contact_email in varchar2
263 ) is
264 l_proc varchar2(30) := g_package||'post_insert';
265 l_tfl_ovn number;
266 l_tdb_ovn number;
267 l_booking_id number;
268 begin
269 --
270 hr_utility.set_location('Entering:'||l_proc,5);
271 --
272 ota_event_associations_pkg.maintain_delegate_bookings
273 (p_validate => p_validate
274 ,p_price_basis => p_price_basis
275 ,p_business_group_id => p_business_group_id
276 ,p_event_id => p_event_id
277 ,p_customer_id => p_customer_id
278 ,p_booking_id => l_booking_id
279 ,p_tdb_object_version_number => l_tdb_ovn
280 ,p_booking_status_type_id => p_booking_status_type_id
281 ,p_date_status_changed => null
282 ,p_status_change_comments => null
283 ,p_booking_contact_id => p_booking_contact_id
284 ,p_contact_address_id => p_contact_address_id
285 ,p_delegate_contact_phone => p_delegate_contact_phone
286 ,p_delegate_contact_fax => p_delegate_contact_fax
287 ,p_internal_booking_flag => p_internal_booking_flag
288 ,p_source_of_booking => p_source_of_booking
289 ,p_number_of_places => p_number_of_places
290 ,p_date_booking_placed => p_date_booking_placed
291 ,p_update_finance_line => null
292 ,p_tfl_object_version_number => l_tfl_ovn
293 ,p_finance_header_id => p_finance_header_id
294 ,p_currency_code => p_currency_code
295 ,p_standard_amount => p_standard_amount
296 ,p_unitary_amount => p_unitary_amount
297 ,p_money_amount => p_money_amount
298 ,p_booking_deal_id => p_booking_deal_id
299 ,p_booking_deal_type => p_booking_deal_type
300 ,p_finance_line_id => p_finance_line_id
301 ,p_delegate_contact_email => p_delegate_contact_email
302 );
303 p_booking_id := l_booking_id;
304 p_tdb_object_version_number := l_tdb_ovn;
305 --
306 hr_utility.set_location('Leaving:'||l_proc,10);
307 --
308 end post_insert;
309 --
310 --
311 -- ----------------------------------------------------------------------------
312 -- |---------------------------------< ins >----------------------------------|
313 -- ----------------------------------------------------------------------------
314 Procedure ins
315 (
316 p_rec in out nocopy ota_tea_shd.g_rec_type,
317 p_validate in boolean
318 ,p_association_type in varchar2
319 ,p_business_group_id in number
320 ,p_price_basis in varchar2
321 ,p_booking_id out nocopy number
322 ,p_tdb_object_version_number out nocopy number
323 ,p_booking_status_type_id in number
324 ,p_booking_contact_id in number
325 ,p_contact_address_id in number
326 ,p_delegate_contact_phone in varchar2
327 ,p_delegate_contact_fax in varchar2
328 ,p_internal_booking_flag in varchar2
329 ,p_source_of_booking in varchar2
330 ,p_number_of_places in number
331 ,p_date_booking_placed in date
332 ,p_finance_header_id in number
333 ,p_currency_code in varchar2
334 ,p_standard_amount in number
335 ,p_unitary_amount in number
336 ,p_money_amount in number
337 ,p_booking_deal_id in number
338 ,p_booking_deal_type in varchar2
339 ,p_finance_line_id in out nocopy number
340 ,p_delegate_contact_email in varchar2
341 ) is
342 --
343 l_proc varchar2(72) := g_package||'ins';
344 --
345 Begin
346 hr_utility.set_location('Entering:'||l_proc, 5);
347 --
348 -- Determine if the business process is to be validated.
349 --
350 If p_validate then
351 --
352 -- Issue the savepoint.
353 --
354 SAVEPOINT ins_ota_tea;
355 End If;
356 --
357 -- Call the supporting insert validate operations
358 --
359 ota_tea_bus.insert_validate(p_rec
360 ,p_association_type);
361 --
362 -- Call the supporting pre-insert operation
363 --
364 pre_insert(p_rec);
365 --
366 -- Insert the row
367 --
368 insert_dml(p_rec);
369 --
370 -- Call the supporting post-insert operation
371 --
372 post_insert(
373 p_business_group_id
374 ,p_validate
375 ,p_price_basis
376 ,p_rec.event_id
377 ,p_rec.customer_id
378 ,p_booking_id
379 ,p_tdb_object_version_number
380 ,p_booking_status_type_id
381 ,p_booking_contact_id
382 ,p_contact_address_id
383 ,p_delegate_contact_phone
384 ,p_delegate_contact_fax
385 ,p_internal_booking_flag
386 ,p_source_of_booking
387 ,p_number_of_places
388 ,p_date_booking_placed
389 ,p_finance_header_id
390 ,p_currency_code
391 ,p_standard_amount
392 ,p_unitary_amount
393 ,p_money_amount
394 ,p_booking_deal_id
395 ,p_booking_deal_type
396 ,p_finance_line_id
397 ,p_delegate_contact_email
398 );
399 --
400 -- If we are validating then raise the Validate_Enabled exception
401 --
402 If p_validate then
403 Raise HR_Api.Validate_Enabled;
404 End If;
405 --
406 hr_utility.set_location(' Leaving:'||l_proc, 10);
407 Exception
408 When HR_Api.Validate_Enabled Then
409 --
410 -- As the Validate_Enabled exception has been raised
411 -- we must rollback to the savepoint
412 --
413 ROLLBACK TO ins_ota_tea;
414 end ins;
415 --
416 -- ----------------------------------------------------------------------------
417 -- |---------------------------------< ins >----------------------------------|
418 -- ----------------------------------------------------------------------------
419 --
420 Procedure ins
421 (
422 p_event_association_id out nocopy number,
423 p_event_id in number,
424 p_customer_id in number default null,
425 p_organization_id in number default null,
426 p_job_id in number default null,
427 p_position_id in number default null,
428 p_comments in varchar2 default null,
429 p_tea_information_category in varchar2 default null,
430 p_tea_information1 in varchar2 default null,
431 p_tea_information2 in varchar2 default null,
432 p_tea_information3 in varchar2 default null,
433 p_tea_information4 in varchar2 default null,
434 p_tea_information5 in varchar2 default null,
435 p_tea_information6 in varchar2 default null,
436 p_tea_information7 in varchar2 default null,
437 p_tea_information8 in varchar2 default null,
438 p_tea_information9 in varchar2 default null,
439 p_tea_information10 in varchar2 default null,
440 p_tea_information11 in varchar2 default null,
441 p_tea_information12 in varchar2 default null,
442 p_tea_information13 in varchar2 default null,
443 p_tea_information14 in varchar2 default null,
444 p_tea_information15 in varchar2 default null,
445 p_tea_information16 in varchar2 default null,
446 p_tea_information17 in varchar2 default null,
447 p_tea_information18 in varchar2 default null,
448 p_tea_information19 in varchar2 default null,
449 p_tea_information20 in varchar2 default null,
450 p_validate in boolean default false
451 ,p_association_type in varchar2
452 ,p_business_group_id in number default null
453 ,p_price_basis in varchar2 default null
454 ,p_booking_id out nocopy number
455 ,p_tdb_object_version_number out nocopy number
456 ,p_booking_status_type_id in number default null
457 ,p_booking_contact_id in number default null
458 ,p_contact_address_id in number default null
459 ,p_delegate_contact_phone in varchar2 default null
460 ,p_delegate_contact_fax in varchar2 default null
461 ,p_internal_booking_flag in varchar2 default null
462 ,p_source_of_booking in varchar2 default null
463 ,p_number_of_places in number default null
464 ,p_date_booking_placed in date default null
465 ,p_finance_header_id in number default null
466 ,p_currency_code in varchar2 default null
467 ,p_standard_amount in number default null
468 ,p_unitary_amount in number default null
469 ,p_money_amount in number default null
470 ,p_booking_deal_id in number default null
471 ,p_booking_deal_type in varchar2 default null
472 ,p_finance_line_id in out nocopy number
473 ,p_delegate_contact_email in varchar2
474 ) is
475 --
476 l_rec ota_tea_shd.g_rec_type;
477 l_proc varchar2(72) := g_package||'ins';
478 --
479 Begin
480 hr_utility.set_location('Entering:'||l_proc, 5);
481 --
482 -- Call conversion function to turn arguments into the
483 -- p_rec structure.
484 --
485 l_rec :=
486 ota_tea_shd.convert_args
487 (
488 null,
489 p_event_id,
490 p_customer_id,
491 p_organization_id,
492 p_job_id,
493 p_position_id,
494 p_comments,
495 p_tea_information_category,
496 p_tea_information1,
497 p_tea_information2,
498 p_tea_information3,
499 p_tea_information4,
500 p_tea_information5,
501 p_tea_information6,
502 p_tea_information7,
503 p_tea_information8,
504 p_tea_information9,
505 p_tea_information10,
506 p_tea_information11,
507 p_tea_information12,
508 p_tea_information13,
509 p_tea_information14,
510 p_tea_information15,
511 p_tea_information16,
512 p_tea_information17,
513 p_tea_information18,
514 p_tea_information19,
515 p_tea_information20
516 );
517 --
518 -- Having converted the arguments into the ota_tea_rec
519 -- plsql record structure we call the corresponding record business process.
520 --
521 ins(l_rec, p_validate
522 ,p_association_type
523 ,p_business_group_id
524 ,p_price_basis
525 ,p_booking_id
526 ,p_tdb_object_version_number
527 ,p_booking_status_type_id
528 ,p_booking_contact_id
529 ,p_contact_address_id
530 ,p_delegate_contact_phone
531 ,p_delegate_contact_fax
532 ,p_internal_booking_flag
533 ,p_source_of_booking
534 ,p_number_of_places
535 ,p_date_booking_placed
536 ,p_finance_header_id
537 ,p_currency_code
538 ,p_standard_amount
539 ,p_unitary_amount
540 ,p_money_amount
541 ,p_booking_deal_id
542 ,p_booking_deal_type
543 ,p_finance_line_id
544 ,p_delegate_contact_email
545 );
546 --
547 -- As the primary key argument(s)
548 -- are specified as an OUT's we must set these values.
549 --
550 p_event_association_id := l_rec.event_association_id;
551 --
552 --
553 hr_utility.set_location(' Leaving:'||l_proc, 10);
554 End ins;
555 --
556 Procedure ins
557 (
558 p_event_association_id out nocopy number,
559 p_event_id in number,
560 p_customer_id in number,
561 p_comments in varchar2,
562 p_tea_information_category in varchar2,
563 p_tea_information1 in varchar2,
564 p_tea_information2 in varchar2,
565 p_tea_information3 in varchar2,
566 p_tea_information4 in varchar2,
567 p_tea_information5 in varchar2,
568 p_tea_information6 in varchar2,
569 p_tea_information7 in varchar2,
570 p_tea_information8 in varchar2,
571 p_tea_information9 in varchar2,
572 p_tea_information10 in varchar2,
573 p_tea_information11 in varchar2,
574 p_tea_information12 in varchar2,
575 p_tea_information13 in varchar2,
576 p_tea_information14 in varchar2,
577 p_tea_information15 in varchar2,
578 p_tea_information16 in varchar2,
579 p_tea_information17 in varchar2,
580 p_tea_information18 in varchar2,
581 p_tea_information19 in varchar2,
582 p_tea_information20 in varchar2,
583 p_validate in boolean
584 ,p_business_group_id in number
585 ,p_price_basis in varchar2
586 ,p_booking_id out nocopy number
587 ,p_tdb_object_version_number out nocopy number
588 ,p_booking_status_type_id in number
589 ,p_booking_contact_id in number
590 ,p_contact_address_id in number
591 ,p_delegate_contact_phone in varchar2
592 ,p_delegate_contact_fax in varchar2
593 ,p_internal_booking_flag in varchar2
594 ,p_source_of_booking in varchar2
595 ,p_number_of_places in number
596 ,p_date_booking_placed in date
597 ,p_finance_header_id in number
598 ,p_currency_code in varchar2
599 ,p_standard_amount in number
600 ,p_unitary_amount in number
601 ,p_money_amount in number
602 ,p_booking_deal_id in number
603 ,p_booking_deal_type in varchar2
604 ,p_finance_line_id in out nocopy number
605 ,p_delegate_contact_email in varchar2
606 ) is
607 begin
608 ins(
609 p_event_association_id => p_event_association_id
610 ,p_event_id => p_event_id
611 ,p_customer_id => p_customer_id
612 ,p_organization_id => null
613 ,p_job_id => null
614 ,p_position_id => null
615 ,p_comments => p_comments
616 ,p_tea_information_category => p_tea_information_category
617 ,p_tea_information1 => p_tea_information1
618 ,p_tea_information2 => p_tea_information2
619 ,p_tea_information3 => p_tea_information3
620 ,p_tea_information4 => p_tea_information4
621 ,p_tea_information5 => p_tea_information5
622 ,p_tea_information6 => p_tea_information6
623 ,p_tea_information7 => p_tea_information7
624 ,p_tea_information8 => p_tea_information8
625 ,p_tea_information9 => p_tea_information9
626 ,p_tea_information10 => p_tea_information10
627 ,p_tea_information11 => p_tea_information11
628 ,p_tea_information12 => p_tea_information12
629 ,p_tea_information13 => p_tea_information13
630 ,p_tea_information14 => p_tea_information14
631 ,p_tea_information15 => p_tea_information15
632 ,p_tea_information16 => p_tea_information16
633 ,p_tea_information17 => p_tea_information17
634 ,p_tea_information18 => p_tea_information18
635 ,p_tea_information19 => p_tea_information19
636 ,p_tea_information20 => p_tea_information20
637 ,p_validate => p_validate
638 ,p_association_type => 'C'
639 ,p_business_group_id => p_business_group_id
640 ,p_price_basis => p_price_basis
641 ,p_booking_id => p_booking_id
642 ,p_tdb_object_version_number => p_tdb_object_version_number
643 ,p_booking_status_type_id => p_booking_status_type_id
644 ,p_booking_contact_id => p_booking_contact_id
645 ,p_contact_address_id => p_contact_address_id
646 ,p_delegate_contact_phone => p_delegate_contact_phone
647 ,p_delegate_contact_fax => p_delegate_contact_fax
648 ,p_internal_booking_flag => p_internal_booking_flag
649 ,p_source_of_booking => p_source_of_booking
650 ,p_number_of_places => p_number_of_places
651 ,p_date_booking_placed => p_date_booking_placed
652 ,p_finance_header_id => p_finance_header_id
653 ,p_currency_code => p_currency_code
654 ,p_standard_amount => p_standard_amount
655 ,p_unitary_amount => p_unitary_amount
656 ,p_money_amount => p_money_amount
657 ,p_booking_deal_id => p_booking_deal_id
658 ,p_booking_deal_type => p_booking_deal_type
659 ,p_finance_line_id => p_finance_line_id
660 ,p_delegate_contact_email => p_delegate_contact_email
661 );
662 end ins;
663 --
664 Procedure ins
665 (
666 p_event_association_id out nocopy number,
667 p_event_id in number,
668 p_organization_id in number,
669 p_job_id in number,
670 p_position_id in number,
671 p_comments in varchar2,
672 p_tea_information_category in varchar2,
673 p_tea_information1 in varchar2,
674 p_tea_information2 in varchar2,
675 p_tea_information3 in varchar2,
676 p_tea_information4 in varchar2,
677 p_tea_information5 in varchar2,
678 p_tea_information6 in varchar2,
679 p_tea_information7 in varchar2,
680 p_tea_information8 in varchar2,
681 p_tea_information9 in varchar2,
682 p_tea_information10 in varchar2,
683 p_tea_information11 in varchar2,
684 p_tea_information12 in varchar2,
685 p_tea_information13 in varchar2,
686 p_tea_information14 in varchar2,
687 p_tea_information15 in varchar2,
688 p_tea_information16 in varchar2,
689 p_tea_information17 in varchar2,
690 p_tea_information18 in varchar2,
691 p_tea_information19 in varchar2,
692 p_tea_information20 in varchar2,
693 p_validate in boolean
694 ) is
695 --
696 l_booking_id number;
697 l_tdb_object_version_number number;
698 l_finance_line_id number;
699 --
700 begin
701 ins(
702 p_event_association_id => p_event_association_id
703 ,p_event_id => p_event_id
704 ,p_customer_id => null
705 ,p_organization_id => p_organization_id
706 ,p_job_id => p_job_id
707 ,p_position_id => p_position_id
708 ,p_comments => p_comments
709 ,p_tea_information_category => p_tea_information_category
710 ,p_tea_information1 => p_tea_information1
711 ,p_tea_information2 => p_tea_information2
712 ,p_tea_information3 => p_tea_information3
713 ,p_tea_information4 => p_tea_information4
714 ,p_tea_information5 => p_tea_information5
715 ,p_tea_information6 => p_tea_information6
716 ,p_tea_information7 => p_tea_information7
717 ,p_tea_information8 => p_tea_information8
718 ,p_tea_information9 => p_tea_information9
719 ,p_tea_information10 => p_tea_information10
720 ,p_tea_information11 => p_tea_information11
721 ,p_tea_information12 => p_tea_information12
722 ,p_tea_information13 => p_tea_information13
723 ,p_tea_information14 => p_tea_information14
724 ,p_tea_information15 => p_tea_information15
725 ,p_tea_information16 => p_tea_information16
726 ,p_tea_information17 => p_tea_information17
727 ,p_tea_information18 => p_tea_information18
728 ,p_tea_information19 => p_tea_information19
729 ,p_tea_information20 => p_tea_information20
730 ,p_validate => p_validate
731 ,p_association_type => 'A'
732 ,p_business_group_id => null
733 ,p_price_basis => null
734 ,p_booking_id => l_booking_id
735 ,p_tdb_object_version_number => l_tdb_object_version_number
736 ,p_booking_status_type_id => null
737 ,p_booking_contact_id => null
738 ,p_contact_address_id => null
739 ,p_delegate_contact_phone => null
740 ,p_delegate_contact_fax => null
741 ,p_internal_booking_flag => null
742 ,p_source_of_booking => null
743 ,p_number_of_places => null
744 ,p_date_booking_placed => null
745 ,p_finance_header_id => null
746 ,p_currency_code => null
747 ,p_standard_amount => null
748 ,p_unitary_amount => null
749 ,p_money_amount => null
750 ,p_booking_deal_id => null
751 ,p_booking_deal_type => null
752 ,p_finance_line_id => l_finance_line_id
753 ,p_delegate_contact_email => null
754 );
755 end ins;
756 --
757 end ota_tea_ins;