[Home] [Help]
PACKAGE BODY: APPS.OTA_TDB_SHD
Source
1 Package Body ota_tdb_shd as
2 /* $Header: ottdb01t.pkb 120.30 2011/02/07 11:01:05 shwnayak ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ota_tdb_shd.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------< return_api_dml_status >-------------------------|
12 -- ----------------------------------------------------------------------------
13 Function return_api_dml_status Return Boolean Is
14 --
15 l_proc varchar2(72) := g_package||'return_api_dml_status';
16 --
17 Begin
21 --
18 hr_utility.set_location('Entering:'||l_proc, 5);
19 --
20 Return (nvl(g_api_dml, false));
22 hr_utility.set_location(' Leaving:'||l_proc, 10);
23 End return_api_dml_status;
24 --
25 -- ----------------------------------------------------------------------------
26 -- |---------------------------< constraint_error >---------------------------|
27 -- ----------------------------------------------------------------------------
28 Procedure constraint_error
29 (p_constraint_name in varchar2) Is
30 --
31 l_proc varchar2(72) := g_package||'constraint_error';
32 --
33 Begin
34 hr_utility.set_location('Entering:'||l_proc, 5);
35 --
36 If (p_constraint_name = 'OTA_DELEGATE_BOOKINGS_FK1') Then
37 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38 hr_utility.set_message_token('PROCEDURE', l_proc);
39 hr_utility.set_message_token('STEP','5');
40 hr_utility.raise_error;
41 ElsIf (p_constraint_name = 'OTA_DELEGATE_BOOKINGS_FK3') Then
42 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43 hr_utility.set_message_token('PROCEDURE', l_proc);
44 hr_utility.set_message_token('STEP','10');
45 hr_utility.raise_error;
46 ElsIf (p_constraint_name = 'OTA_DELEGATE_BOOKINGS_PK') Then
47 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48 hr_utility.set_message_token('PROCEDURE', l_proc);
49 hr_utility.set_message_token('STEP','15');
50 hr_utility.raise_error;
51 ElsIf (p_constraint_name = 'OTA_DELEGATE_BOOKINGS_UK1') Then
52 fnd_message.set_name('OTA','OTA_13886_TDB_LINE_DUPLICATE');
53 fnd_message.raise_error;
54 ElsIf (p_constraint_name = 'OTA_TDB_INTERNAL_BOOKING_F_CHK') Then
55 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
56 hr_utility.set_message_token('PROCEDURE', l_proc);
57 hr_utility.set_message_token('STEP','20');
58 hr_utility.raise_error;
59 ElsIf (p_constraint_name = 'OTA_TDB_SUCCESSFUL_ATTENDA_CHK') Then
60 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
61 hr_utility.set_message_token('PROCEDURE', l_proc);
62 hr_utility.set_message_token('STEP','25');
63 hr_utility.raise_error;
64 Elsif (p_constraint_name = 'OTA_TDB_DELEGATE_CONTACT_NULL') Then
65 fnd_message.set_name('OTA','OTA_13621_TDB_CON_DEL');
66 fnd_message.raise_error;
67 Elsif (p_constraint_name = 'OTA_TDB_PERSON_ADDRESS') Then
68 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
69 hr_utility.set_message_token('PROCEDURE', l_proc);
70 hr_utility.set_message_token('STEP','35');
71 hr_utility.raise_error;
72 Elsif (p_constraint_name = 'OTA_TDB_STUDENT_PLACES') Then
73 -- Modified for bug#4522799
74 fnd_message.set_name('OTA','OTA_13954_TDB_MIN_NUM_PLACES');
75 fnd_message.raise_error;
76 -- hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
77 -- hr_utility.set_message_token('PROCEDURE', l_proc);
78 -- hr_utility.set_message_token('STEP','40');
79 -- hr_utility.raise_error;
80 Elsif (p_constraint_name = 'OTA_TDB_CORRESPONDENT_ADDRESS') Then
81 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
82 hr_utility.set_message_token('PROCEDURE', l_proc);
83 hr_utility.set_message_token('STEP','45');
84 hr_utility.raise_error;
85 Elsif (p_constraint_name = 'OTA_TDB_CUSTOMER_ID_NOT_NULL') Then
86 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
87 hr_utility.set_message_token('PROCEDURE', l_proc);
88 hr_utility.set_message_token('STEP','50');
89 hr_utility.raise_error;
90 Elsif (p_constraint_name = 'OTA_TDB_ORGANIZATION_NOT_NULL') Then
91 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
92 hr_utility.set_message_token('PROCEDURE', l_proc);
93 hr_utility.set_message_token('STEP','55');
94 hr_utility.raise_error;
95 Elsif (p_constraint_name = 'OTA_TDB_CORRESPONDENT_T') Then
96 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
97 hr_utility.set_message_token('PROCEDURE', l_proc);
98 hr_utility.set_message_token('STEP','60');
99 hr_utility.raise_error;
100 Else
101 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
102 hr_utility.set_message_token('PROCEDURE', l_proc);
103 hr_utility.set_message_token('STEP','65');
104 hr_utility.raise_error;
105 End If;
106 --
107 hr_utility.set_location(' Leaving:'||l_proc, 10);
108 End constraint_error;
109 --
110 -- ----------------------------------------------------------------------------
111 -- |-----------------------------< api_updating >-----------------------------|
112 -- ----------------------------------------------------------------------------
113 Function api_updating
114 (
115 p_booking_id in number,
116 p_object_version_number in number
117 ) Return Boolean Is
118 --
119 --
120 -- Cursor selects the 'current' row from the HR Schema
121 --
122 Cursor C_Sel1 is
123 select booking_id,
124 booking_status_type_id,
125 delegate_person_id,
126 contact_id,
127 business_group_id,
128 event_id,
129 customer_id,
130 authorizer_person_id,
131 date_booking_placed,
132 corespondent,
133 internal_booking_flag,
134 number_of_places,
135 object_version_number,
136 administrator,
137 booking_priority,
138 comments,
139 contact_address_id,
140 delegate_contact_phone,
144 third_party_address_id,
141 delegate_contact_fax,
142 third_party_customer_id,
143 third_party_contact_id,
145 third_party_contact_phone,
146 third_party_contact_fax,
147 date_status_changed,
148 failure_reason,
149 attendance_result,
150 language_id,
151 source_of_booking,
152 special_booking_instructions,
153 successful_attendance_flag,
154 tdb_information_category,
155 tdb_information1,
156 tdb_information2,
157 tdb_information3,
158 tdb_information4,
159 tdb_information5,
160 tdb_information6,
161 tdb_information7,
162 tdb_information8,
163 tdb_information9,
164 tdb_information10,
165 tdb_information11,
166 tdb_information12,
167 tdb_information13,
168 tdb_information14,
169 tdb_information15,
170 tdb_information16,
171 tdb_information17,
172 tdb_information18,
173 tdb_information19,
174 tdb_information20,
175 organization_id,
176 sponsor_person_id,
177 sponsor_assignment_id,
178 person_address_id,
179 delegate_assignment_id,
180 delegate_contact_id,
181 delegate_contact_email,
182 third_party_email,
183 person_address_type,
184 line_id,
185 org_id,
186 daemon_flag,
187 daemon_type,
188 old_event_id,
189 quote_line_id,
190 interface_source,
191 total_training_time,
192 content_player_status,
193 score,
194 completed_content,
195 total_content ,
196 booking_justification_id,
197 is_history_flag,
198 sign_eval_status,
199 is_mandatory_enrollment
200 from ota_delegate_bookings
201 where booking_id = p_booking_id;
202 --
203 l_proc varchar2(72) := g_package||'api_updating';
204 l_fct_ret boolean;
205 --
206 Begin
207 hr_utility.set_location('Entering:'||l_proc, 5);
208 --
209 If (
210 p_booking_id is null and
211 p_object_version_number is null
212 ) Then
213 --
214 -- One of the primary key arguments is null therefore we must
215 -- set the returning function value to false
216 --
217 l_fct_ret := false;
218 Else
219 If (
220 p_booking_id = g_old_rec.booking_id and
221 p_object_version_number = g_old_rec.object_version_number
222 ) Then
223 hr_utility.set_location(l_proc, 10);
224 --
225 -- The g_old_rec is current therefore we must
226 -- set the returning function to true
227 --
228 l_fct_ret := true;
229 Else
230 --
231 -- Select the current row into g_old_rec
232 --
233 Open C_Sel1;
234 Fetch C_Sel1 Into g_old_rec;
235 If C_Sel1%notfound Then
236 Close C_Sel1;
237 --
238 -- The primary key is invalid therefore we must error
239 --
240 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
241 hr_utility.raise_error;
242 End If;
243 Close C_Sel1;
244 If (p_object_version_number <> g_old_rec.object_version_number) Then
245 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
246 hr_utility.raise_error;
247 End If;
248 hr_utility.set_location(l_proc, 15);
249 l_fct_ret := true;
250 End If;
251 End If;
252 hr_utility.set_location(' Leaving:'||l_proc, 20);
253 Return (l_fct_ret);
254 --
255 End api_updating;
256 --
257 -- ----------------------------------------------------------------------------
258 -- |---------------------------------< lck >----------------------------------|
259 -- ----------------------------------------------------------------------------
260 Procedure lck
261 (
262 p_booking_id in number,
263 p_object_version_number in number
264 ) is
265 --
266 -- Cursor selects the 'current' row from the HR Schema
267 --
268 Cursor C_Sel1 is
269 select booking_id,
270 booking_status_type_id,
271 delegate_person_id,
272 contact_id,
273 business_group_id,
274 event_id,
275 customer_id,
276 authorizer_person_id,
277 date_booking_placed,
278 corespondent,
279 internal_booking_flag,
280 number_of_places,
281 object_version_number,
282 administrator,
283 booking_priority,
284 comments,
285 contact_address_id,
286 delegate_contact_phone,
287 delegate_contact_fax,
288 third_party_customer_id,
289 third_party_contact_id,
290 third_party_address_id,
291 third_party_contact_phone,
292 third_party_contact_fax,
293 date_status_changed,
294 failure_reason,
295 attendance_result,
296 language_id,
297 source_of_booking,
298 special_booking_instructions,
299 successful_attendance_flag,
300 tdb_information_category,
301 tdb_information1,
302 tdb_information2,
303 tdb_information3,
304 tdb_information4,
305 tdb_information5,
309 tdb_information9,
306 tdb_information6,
307 tdb_information7,
308 tdb_information8,
310 tdb_information10,
311 tdb_information11,
312 tdb_information12,
313 tdb_information13,
314 tdb_information14,
315 tdb_information15,
316 tdb_information16,
317 tdb_information17,
318 tdb_information18,
319 tdb_information19,
320 tdb_information20,
321 organization_id,
322 sponsor_person_id,
323 sponsor_assignment_id,
324 person_address_id,
325 delegate_assignment_id,
326 delegate_contact_id,
327 delegate_contact_email,
328 third_party_email,
329 person_address_type,
330 created_by,
331 line_id,
332 org_id,
333 daemon_flag,
334 daemon_type,
335 old_event_id,
336 quote_line_id,
337 interface_source,
338 total_training_time,
339 content_player_status,
340 score,
341 completed_content,
342 total_content,
343 booking_justification_id,
344 is_history_flag,
345 sign_eval_status,
346 is_mandatory_enrollment
347 from ota_delegate_bookings
348 where booking_id = p_booking_id
349 for update nowait;
350 --
351 l_proc varchar2(72) := g_package||'lck';
352 --
353 Begin
354 hr_utility.set_location('Entering:'||l_proc, 5);
355 --
356 -- Add any mandatory argument checking here:
357 -- Example:
358 -- hr_api.mandatory_arg_error
359 -- (p_api_name => l_proc,
360 -- p_argument => 'object_version_number',
361 -- p_argument_value => p_object_version_number);
362 --
363 Open C_Sel1;
364 Fetch C_Sel1 Into
365 g_old_rec.booking_id,
366 g_old_rec.booking_status_type_id,
367 g_old_rec.delegate_person_id,
368 g_old_rec.contact_id,
369 g_old_rec.business_group_id,
370 g_old_rec.event_id,
371 g_old_rec.customer_id,
372 g_old_rec.authorizer_person_id,
373 g_old_rec.date_booking_placed,
374 g_old_rec.corespondent,
375 g_old_rec.internal_booking_flag,
376 g_old_rec.number_of_places,
377 g_old_rec.object_version_number,
378 g_old_rec.administrator,
379 g_old_rec.booking_priority,
380 g_old_rec.comments,
381 g_old_rec.contact_address_id,
382 g_old_rec.delegate_contact_phone,
383 g_old_rec.delegate_contact_fax,
384 g_old_rec.third_party_customer_id,
385 g_old_rec.third_party_contact_id,
386 g_old_rec.third_party_address_id,
387 g_old_rec.third_party_contact_phone,
388 g_old_rec.third_party_contact_fax,
389 g_old_rec.date_status_changed,
390 g_old_rec.failure_reason,
391 g_old_rec.attendance_result,
392 g_old_rec.language_id,
393 g_old_rec.source_of_booking,
394 g_old_rec.special_booking_instructions,
395 g_old_rec.successful_attendance_flag,
396 g_old_rec.tdb_information_category,
397 g_old_rec.tdb_information1,
398 g_old_rec.tdb_information2,
399 g_old_rec.tdb_information3,
400 g_old_rec.tdb_information4,
401 g_old_rec.tdb_information5,
402 g_old_rec.tdb_information6,
403 g_old_rec.tdb_information7,
404 g_old_rec.tdb_information8,
405 g_old_rec.tdb_information9,
406 g_old_rec.tdb_information10,
407 g_old_rec.tdb_information11,
408 g_old_rec.tdb_information12,
409 g_old_rec.tdb_information13,
410 g_old_rec.tdb_information14,
411 g_old_rec.tdb_information15,
412 g_old_rec.tdb_information16,
413 g_old_rec.tdb_information17,
414 g_old_rec.tdb_information18,
415 g_old_rec.tdb_information19,
416 g_old_rec.tdb_information20,
417 g_old_rec.organization_id,
418 g_old_rec.sponsor_person_id,
419 g_old_rec.sponsor_assignment_id,
420 g_old_rec.person_address_id,
421 g_old_rec.delegate_assignment_id,
422 g_old_rec.delegate_contact_id,
423 g_old_rec.delegate_contact_email,
424 g_old_rec.third_party_email,
425 g_old_rec.person_address_type,
426 g_created_by,
427 g_old_rec.line_id,
428 g_old_rec.org_id,
429 g_old_rec.daemon_flag,
430 g_old_rec.daemon_type,
431 g_old_rec.old_event_id,
432 g_old_rec.quote_line_id,
433 g_old_rec.interface_source,
434 g_old_rec.total_training_time,
435 g_old_rec.content_player_status,
436 g_old_rec.score,
437 g_old_rec.completed_content,
438 g_old_rec.total_content,
439 g_old_rec.booking_justification_id,
440 g_old_rec.is_history_flag,
441 g_old_rec.sign_eval_status,
442 g_old_rec.is_mandatory_enrollment;
443 If C_Sel1%notfound then
444 Close C_Sel1;
445 --
446 -- The primary key is invalid therefore we must error
447 --
448
449 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
450 hr_utility.raise_error;
451 End If;
452 Close C_Sel1;
453 If (p_object_version_number <> g_old_rec.object_version_number) Then
454 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
455 hr_utility.raise_error;
456 End If;
457 --
461 --
458 hr_utility.set_location(' Leaving:'||l_proc, 10);
459 --
460 -- We need to trap the ORA LOCK exception
462 Exception
463 When HR_Api.Object_Locked then
464 --
465 -- The object is locked therefore we need to supply a meaningful
466 -- error message.
467 --
468 hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
469 hr_utility.set_message_token('TABLE_NAME', 'ota_delegate_bookings');
470 hr_utility.raise_error;
471 End lck;
472 --
473 -- ----------------------------------------------------------------------------
474 -- |-----------------------------< convert_args >-----------------------------|
475 -- ----------------------------------------------------------------------------
476 Function convert_args
477 (
478 p_booking_id in number,
479 p_booking_status_type_id in number,
480 p_delegate_person_id in number,
481 p_contact_id in number,
482 p_business_group_id in number,
483 p_event_id in number,
484 p_customer_id in number,
485 p_authorizer_person_id in number,
486 p_date_booking_placed in date,
487 p_corespondent in varchar2,
488 p_internal_booking_flag in varchar2,
489 p_number_of_places in number,
490 p_object_version_number in number,
491 p_administrator in number,
492 p_booking_priority in varchar2,
493 p_comments in varchar2,
494 p_contact_address_id in number,
495 p_delegate_contact_phone in varchar2,
496 p_delegate_contact_fax in varchar2,
497 p_third_party_customer_id in number,
498 p_third_party_contact_id in number,
499 p_third_party_address_id in number,
500 p_third_party_contact_phone in varchar2,
501 p_third_party_contact_fax in varchar2,
502 p_date_status_changed in date,
503 p_failure_reason in varchar2,
504 p_attendance_result in varchar2,
505 p_language_id in number,
506 p_source_of_booking in varchar2,
507 p_special_booking_instructions in varchar2,
508 p_successful_attendance_flag in varchar2,
509 p_tdb_information_category in varchar2,
510 p_tdb_information1 in varchar2,
511 p_tdb_information2 in varchar2,
512 p_tdb_information3 in varchar2,
513 p_tdb_information4 in varchar2,
514 p_tdb_information5 in varchar2,
515 p_tdb_information6 in varchar2,
516 p_tdb_information7 in varchar2,
517 p_tdb_information8 in varchar2,
518 p_tdb_information9 in varchar2,
519 p_tdb_information10 in varchar2,
520 p_tdb_information11 in varchar2,
521 p_tdb_information12 in varchar2,
522 p_tdb_information13 in varchar2,
523 p_tdb_information14 in varchar2,
524 p_tdb_information15 in varchar2,
525 p_tdb_information16 in varchar2,
526 p_tdb_information17 in varchar2,
527 p_tdb_information18 in varchar2,
528 p_tdb_information19 in varchar2,
529 p_tdb_information20 in varchar2,
530 p_organization_id in number,
531 p_sponsor_person_id in number,
532 p_sponsor_assignment_id in number,
533 p_person_address_id in number,
534 p_delegate_assignment_id in number,
535 p_delegate_contact_id in number,
536 p_delegate_contact_email in varchar2,
537 p_third_party_email in varchar2,
538 p_person_address_type in varchar2,
539 p_line_id in number,
540 p_org_id in number,
541 p_daemon_flag in varchar2,
542 p_daemon_type in varchar2,
543 p_old_event_id in number,
544 p_quote_line_id in number,
545 p_interface_source in varchar2,
546 p_total_training_time in varchar2 ,
547 p_content_player_status in varchar2 ,
548 p_score in number ,
549 p_completed_content in number ,
550 p_total_content in number ,
551 p_booking_justification_id in number,
552 p_is_history_flag in varchar2,
553 p_sign_eval_status in varchar2,
554 p_is_mandatory_enrollment in varchar2
555 )
556 Return g_rec_type is
557 --
558 l_rec g_rec_type;
559 l_proc varchar2(72) := g_package||'convert_args';
560 --
561 Begin
562 --
563 hr_utility.set_location('Entering:'||l_proc, 5);
564 --
565 -- Convert arguments into local l_rec structure.
566 --
567 l_rec.booking_id := p_booking_id;
568 l_rec.booking_status_type_id := p_booking_status_type_id;
569 l_rec.delegate_person_id := p_delegate_person_id;
570 l_rec.contact_id := p_contact_id;
571 l_rec.business_group_id := p_business_group_id;
572 l_rec.event_id := p_event_id;
573 l_rec.customer_id := p_customer_id;
574 l_rec.authorizer_person_id := p_authorizer_person_id;
575 l_rec.date_booking_placed := p_date_booking_placed;
576 l_rec.corespondent := p_corespondent;
577 l_rec.internal_booking_flag := p_internal_booking_flag;
578 l_rec.number_of_places := p_number_of_places;
579 l_rec.object_version_number := p_object_version_number;
580 l_rec.administrator := p_administrator;
581 l_rec.booking_priority := p_booking_priority;
582 l_rec.comments := p_comments;
583 l_rec.contact_address_id := p_contact_address_id;
584 l_rec.delegate_contact_phone := p_delegate_contact_phone;
585 l_rec.delegate_contact_fax := p_delegate_contact_fax;
586 l_rec.third_party_customer_id := p_third_party_customer_id;
587 l_rec.third_party_contact_id := p_third_party_contact_id;
588 l_rec.third_party_address_id := p_third_party_address_id;
589 l_rec.third_party_contact_phone := p_third_party_contact_phone;
590 l_rec.third_party_contact_fax := p_third_party_contact_fax;
591 l_rec.date_status_changed := p_date_status_changed;
592 l_rec.failure_reason := p_failure_reason;
593 l_rec.attendance_result := p_attendance_result;
594 l_rec.language_id := p_language_id;
595 l_rec.source_of_booking := p_source_of_booking;
596 l_rec.special_booking_instructions := p_special_booking_instructions;
597 l_rec.successful_attendance_flag := p_successful_attendance_flag;
598 l_rec.tdb_information_category := p_tdb_information_category;
599 l_rec.tdb_information1 := p_tdb_information1;
600 l_rec.tdb_information2 := p_tdb_information2;
601 l_rec.tdb_information3 := p_tdb_information3;
602 l_rec.tdb_information4 := p_tdb_information4;
603 l_rec.tdb_information5 := p_tdb_information5;
604 l_rec.tdb_information6 := p_tdb_information6;
605 l_rec.tdb_information7 := p_tdb_information7;
606 l_rec.tdb_information8 := p_tdb_information8;
607 l_rec.tdb_information9 := p_tdb_information9;
608 l_rec.tdb_information10 := p_tdb_information10;
609 l_rec.tdb_information11 := p_tdb_information11;
610 l_rec.tdb_information12 := p_tdb_information12;
611 l_rec.tdb_information13 := p_tdb_information13;
612 l_rec.tdb_information14 := p_tdb_information14;
613 l_rec.tdb_information15 := p_tdb_information15;
614 l_rec.tdb_information16 := p_tdb_information16;
615 l_rec.tdb_information17 := p_tdb_information17;
616 l_rec.tdb_information18 := p_tdb_information18;
617 l_rec.tdb_information19 := p_tdb_information19;
618 l_rec.tdb_information20 := p_tdb_information20;
619 l_rec.organization_id := p_organization_id;
620 l_rec.sponsor_person_id := p_sponsor_person_id;
621 l_rec.sponsor_assignment_id := p_sponsor_assignment_id;
622 l_rec.person_address_id := p_person_address_id;
623 l_rec.delegate_assignment_id := p_delegate_assignment_id;
624 l_rec.delegate_contact_id := p_delegate_contact_id;
625 l_rec.delegate_contact_email := p_delegate_contact_email;
626 l_rec.third_party_email := p_third_party_email;
627 l_rec.person_address_type := p_person_address_type;
628 l_rec.line_id := p_line_id;
629 l_rec.org_id := p_org_id;
630 l_rec.daemon_flag := p_daemon_flag;
631 l_rec.daemon_type := p_daemon_type;
632 l_rec.old_event_id := p_old_event_id;
633 l_rec.quote_line_id := p_quote_line_id;
634 l_rec.interface_source := p_interface_source;
635 l_rec.total_training_time := p_total_training_time;
636 l_rec.content_player_status := p_content_player_status;
637 l_rec.score := p_score;
638 l_rec.completed_content := p_completed_content;
639 l_rec.total_content := p_total_content;
640 l_rec.booking_justification_id := p_booking_justification_id;
641 l_rec.is_history_flag := p_is_history_flag;
642 l_rec.is_mandatory_enrollment := p_is_mandatory_enrollment;
643 l_rec.sign_eval_status := p_sign_eval_status;
644 -- Return the plsql record structure.
645 --
646 hr_utility.set_location(' Leaving:'||l_proc, 10);
647 Return(l_rec);
648 --
649 End convert_args;
650 --
651 end ota_tdb_shd;