DBA Data[Home] [Help]

PACKAGE BODY: APPS.OTA_TEA_INS

Source


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;