DBA Data[Home] [Help]

PACKAGE BODY: APPS.OTA_TDB_SHD

Source


1 Package Body ota_tdb_shd as
2 /* $Header: ottdb01t.pkb 120.26 2008/04/22 12:43:15 smahanka noship $ */
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
18   hr_utility.set_location('Entering:'||l_proc, 5);
19   --
20   Return (nvl(g_api_dml, false));
21   --
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,
141         delegate_contact_fax,
142         third_party_customer_id,
143         third_party_contact_id,
144         third_party_address_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       is_mandatory_enrollment
199     from        ota_delegate_bookings
200     where       booking_id = p_booking_id;
201 --
202   l_proc        varchar2(72)    := g_package||'api_updating';
203   l_fct_ret     boolean;
204 --
205 Begin
206   hr_utility.set_location('Entering:'||l_proc, 5);
207   --
208   If (
209         p_booking_id is null and
210         p_object_version_number is null
211      ) Then
212     --
213     -- One of the primary key arguments is null therefore we must
214     -- set the returning function value to false
215     --
216     l_fct_ret := false;
217   Else
218     If (
219         p_booking_id = g_old_rec.booking_id and
220         p_object_version_number = g_old_rec.object_version_number
221        ) Then
222       hr_utility.set_location(l_proc, 10);
223       --
224       -- The g_old_rec is current therefore we must
225       -- set the returning function to true
226       --
227       l_fct_ret := true;
228     Else
229       --
230       -- Select the current row into g_old_rec
231       --
232       Open C_Sel1;
233       Fetch C_Sel1 Into g_old_rec;
234       If C_Sel1%notfound Then
235         Close C_Sel1;
236         --
237         -- The primary key is invalid therefore we must error
238         --
239         hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
240         hr_utility.raise_error;
241       End If;
242       Close C_Sel1;
243       If (p_object_version_number <> g_old_rec.object_version_number) Then
244         hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
245         hr_utility.raise_error;
246       End If;
247       hr_utility.set_location(l_proc, 15);
248       l_fct_ret := true;
249     End If;
250   End If;
251   hr_utility.set_location(' Leaving:'||l_proc, 20);
252   Return (l_fct_ret);
253 --
254 End api_updating;
255 --
256 -- ----------------------------------------------------------------------------
257 -- |---------------------------------< lck >----------------------------------|
258 -- ----------------------------------------------------------------------------
259 Procedure lck
260   (
261   p_booking_id                         in number,
262   p_object_version_number              in number
263   ) is
264 --
265 -- Cursor selects the 'current' row from the HR Schema
266 --
267   Cursor C_Sel1 is
268     select      booking_id,
269         booking_status_type_id,
270         delegate_person_id,
271         contact_id,
272         business_group_id,
273         event_id,
274         customer_id,
275         authorizer_person_id,
276         date_booking_placed,
277         corespondent,
278         internal_booking_flag,
279         number_of_places,
280         object_version_number,
281         administrator,
282         booking_priority,
283         comments,
284         contact_address_id,
285         delegate_contact_phone,
286         delegate_contact_fax,
287         third_party_customer_id,
288         third_party_contact_id,
289         third_party_address_id,
290         third_party_contact_phone,
291         third_party_contact_fax,
292         date_status_changed,
293         failure_reason,
294         attendance_result,
295         language_id,
296         source_of_booking,
297         special_booking_instructions,
298         successful_attendance_flag,
299         tdb_information_category,
300         tdb_information1,
301         tdb_information2,
302         tdb_information3,
303         tdb_information4,
304         tdb_information5,
305         tdb_information6,
306         tdb_information7,
307         tdb_information8,
308         tdb_information9,
309         tdb_information10,
310         tdb_information11,
311         tdb_information12,
312         tdb_information13,
313         tdb_information14,
314         tdb_information15,
315         tdb_information16,
316         tdb_information17,
317         tdb_information18,
318         tdb_information19,
319         tdb_information20,
320         organization_id,
321         sponsor_person_id,
322         sponsor_assignment_id,
323         person_address_id,
324         delegate_assignment_id,
325         delegate_contact_id,
326         delegate_contact_email,
327         third_party_email,
328         person_address_type,
329         created_by,
330       line_id,
331         org_id,
332         daemon_flag,
333         daemon_type,
334         old_event_id,
335         quote_line_id,
336         interface_source,
337       total_training_time,
338       content_player_status,
339       score,
340       completed_content,
341       total_content,
342       booking_justification_id,
343       is_history_flag,
344       is_mandatory_enrollment
345     from        ota_delegate_bookings
346     where       booking_id = p_booking_id
347     for update nowait;
348 --
349   l_proc        varchar2(72) := g_package||'lck';
350 --
351 Begin
352   hr_utility.set_location('Entering:'||l_proc, 5);
353   --
354   -- Add any mandatory argument checking here:
355   -- Example:
356   -- hr_api.mandatory_arg_error
357   --   (p_api_name       => l_proc,
358   --    p_argument       => 'object_version_number',
359   --    p_argument_value => p_object_version_number);
360   --
361   Open  C_Sel1;
362   Fetch C_Sel1 Into
363         g_old_rec.booking_id,
364         g_old_rec.booking_status_type_id,
365         g_old_rec.delegate_person_id,
366         g_old_rec.contact_id,
367         g_old_rec.business_group_id,
368         g_old_rec.event_id,
369         g_old_rec.customer_id,
370         g_old_rec.authorizer_person_id,
371         g_old_rec.date_booking_placed,
372         g_old_rec.corespondent,
373         g_old_rec.internal_booking_flag,
374         g_old_rec.number_of_places,
375         g_old_rec.object_version_number,
376         g_old_rec.administrator,
377         g_old_rec.booking_priority,
378         g_old_rec.comments,
379         g_old_rec.contact_address_id,
380         g_old_rec.delegate_contact_phone,
381         g_old_rec.delegate_contact_fax,
382         g_old_rec.third_party_customer_id,
383         g_old_rec.third_party_contact_id,
384         g_old_rec.third_party_address_id,
385         g_old_rec.third_party_contact_phone,
386         g_old_rec.third_party_contact_fax,
387         g_old_rec.date_status_changed,
388         g_old_rec.failure_reason,
389         g_old_rec.attendance_result,
390         g_old_rec.language_id,
391         g_old_rec.source_of_booking,
392         g_old_rec.special_booking_instructions,
393         g_old_rec.successful_attendance_flag,
394         g_old_rec.tdb_information_category,
395         g_old_rec.tdb_information1,
396         g_old_rec.tdb_information2,
397         g_old_rec.tdb_information3,
398         g_old_rec.tdb_information4,
399         g_old_rec.tdb_information5,
400         g_old_rec.tdb_information6,
401         g_old_rec.tdb_information7,
402         g_old_rec.tdb_information8,
403         g_old_rec.tdb_information9,
404         g_old_rec.tdb_information10,
405         g_old_rec.tdb_information11,
406         g_old_rec.tdb_information12,
407         g_old_rec.tdb_information13,
408         g_old_rec.tdb_information14,
409         g_old_rec.tdb_information15,
410         g_old_rec.tdb_information16,
411         g_old_rec.tdb_information17,
412         g_old_rec.tdb_information18,
413         g_old_rec.tdb_information19,
414         g_old_rec.tdb_information20,
415         g_old_rec.organization_id,
416         g_old_rec.sponsor_person_id,
417         g_old_rec.sponsor_assignment_id,
418         g_old_rec.person_address_id,
422         g_old_rec.third_party_email,
419         g_old_rec.delegate_assignment_id,
420         g_old_rec.delegate_contact_id,
421         g_old_rec.delegate_contact_email,
423         g_old_rec.person_address_type,
424         g_created_by,
425       g_old_rec.line_id,
426       g_old_rec.org_id,
427       g_old_rec.daemon_flag,
428       g_old_rec.daemon_type,
429       g_old_rec.old_event_id,
430       g_old_rec.quote_line_id,
431       g_old_rec.interface_source,
432       g_old_rec.total_training_time,
433       g_old_rec.content_player_status,
434       g_old_rec.score,
435       g_old_rec.completed_content,
436       g_old_rec.total_content,
437       g_old_rec.booking_justification_id,
438       g_old_rec.is_history_flag,
439       g_old_rec.is_mandatory_enrollment;
440   If C_Sel1%notfound then
441     Close C_Sel1;
442     --
443     -- The primary key is invalid therefore we must error
444     --
445 
446     hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
447     hr_utility.raise_error;
448   End If;
449   Close C_Sel1;
450   If (p_object_version_number <> g_old_rec.object_version_number) Then
451         hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
452         hr_utility.raise_error;
453       End If;
454 --
455   hr_utility.set_location(' Leaving:'||l_proc, 10);
456 --
457 -- We need to trap the ORA LOCK exception
458 --
459 Exception
460   When HR_Api.Object_Locked then
461     --
462     -- The object is locked therefore we need to supply a meaningful
463     -- error message.
464     --
465     hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
466     hr_utility.set_message_token('TABLE_NAME', 'ota_delegate_bookings');
467     hr_utility.raise_error;
468 End lck;
469 --
470 -- ----------------------------------------------------------------------------
471 -- |-----------------------------< convert_args >-----------------------------|
472 -- ----------------------------------------------------------------------------
473 Function convert_args
474         (
475         p_booking_id                    in number,
476         p_booking_status_type_id        in number,
477         p_delegate_person_id            in number,
478         p_contact_id                    in number,
479         p_business_group_id             in number,
480         p_event_id                      in number,
481         p_customer_id                   in number,
482         p_authorizer_person_id          in number,
483         p_date_booking_placed           in date,
484         p_corespondent                  in varchar2,
485         p_internal_booking_flag         in varchar2,
486         p_number_of_places              in number,
487         p_object_version_number         in number,
488         p_administrator                 in number,
489         p_booking_priority              in varchar2,
490         p_comments                      in varchar2,
491         p_contact_address_id            in number,
492         p_delegate_contact_phone        in varchar2,
493         p_delegate_contact_fax          in varchar2,
494         p_third_party_customer_id       in number,
495         p_third_party_contact_id        in number,
496         p_third_party_address_id        in number,
497         p_third_party_contact_phone     in varchar2,
498         p_third_party_contact_fax       in varchar2,
499         p_date_status_changed           in date,
500         p_failure_reason                in varchar2,
501         p_attendance_result             in varchar2,
502         p_language_id                   in number,
503         p_source_of_booking             in varchar2,
504         p_special_booking_instructions  in varchar2,
505         p_successful_attendance_flag    in varchar2,
506         p_tdb_information_category      in varchar2,
507         p_tdb_information1              in varchar2,
508         p_tdb_information2              in varchar2,
509         p_tdb_information3              in varchar2,
510         p_tdb_information4              in varchar2,
511         p_tdb_information5              in varchar2,
512         p_tdb_information6              in varchar2,
513         p_tdb_information7              in varchar2,
514         p_tdb_information8              in varchar2,
515         p_tdb_information9              in varchar2,
516         p_tdb_information10             in varchar2,
517         p_tdb_information11             in varchar2,
518         p_tdb_information12             in varchar2,
519         p_tdb_information13             in varchar2,
520         p_tdb_information14             in varchar2,
521         p_tdb_information15             in varchar2,
522         p_tdb_information16             in varchar2,
523         p_tdb_information17             in varchar2,
524         p_tdb_information18             in varchar2,
525         p_tdb_information19             in varchar2,
526         p_tdb_information20             in varchar2,
527         p_organization_id               in number,
528         p_sponsor_person_id             in number,
529         p_sponsor_assignment_id         in number,
530         p_person_address_id             in number,
531         p_delegate_assignment_id        in number,
532         p_delegate_contact_id           in number,
533         p_delegate_contact_email        in varchar2,
537         p_org_id                                    in number,
534         p_third_party_email             in varchar2,
535         p_person_address_type           in varchar2,
536         p_line_id                                   in number,
538           p_daemon_flag                     in varchar2,
539           p_daemon_type                     in varchar2,
540         p_old_event_id                   in number,
541         p_quote_line_id                  in number,
542         p_interface_source               in varchar2,
543       p_total_training_time           in varchar2 ,
544         p_content_player_status         in varchar2 ,
545         p_score                       in number   ,
546         p_completed_content               in number   ,
547         p_total_content               in number  ,
548 	p_booking_justification_id in number,
549 	p_is_history_flag in varchar2,
550 	p_is_mandatory_enrollment in varchar2
551   )
552         Return g_rec_type is
553 --
554   l_rec   g_rec_type;
555   l_proc  varchar2(72) := g_package||'convert_args';
556 --
557 Begin
558   --
559   hr_utility.set_location('Entering:'||l_proc, 5);
560   --
561   -- Convert arguments into local l_rec structure.
562   --
563   l_rec.booking_id                       := p_booking_id;
564   l_rec.booking_status_type_id           := p_booking_status_type_id;
565   l_rec.delegate_person_id               := p_delegate_person_id;
566   l_rec.contact_id                       := p_contact_id;
567   l_rec.business_group_id                := p_business_group_id;
568   l_rec.event_id                         := p_event_id;
569   l_rec.customer_id                      := p_customer_id;
570   l_rec.authorizer_person_id             := p_authorizer_person_id;
571   l_rec.date_booking_placed              := p_date_booking_placed;
572   l_rec.corespondent                     := p_corespondent;
573   l_rec.internal_booking_flag            := p_internal_booking_flag;
574   l_rec.number_of_places                 := p_number_of_places;
575   l_rec.object_version_number            := p_object_version_number;
576   l_rec.administrator                    := p_administrator;
577   l_rec.booking_priority                 := p_booking_priority;
578   l_rec.comments                         := p_comments;
579   l_rec.contact_address_id               := p_contact_address_id;
580   l_rec.delegate_contact_phone           := p_delegate_contact_phone;
581   l_rec.delegate_contact_fax             := p_delegate_contact_fax;
582   l_rec.third_party_customer_id          := p_third_party_customer_id;
583   l_rec.third_party_contact_id           := p_third_party_contact_id;
584   l_rec.third_party_address_id           := p_third_party_address_id;
585   l_rec.third_party_contact_phone        := p_third_party_contact_phone;
586   l_rec.third_party_contact_fax          := p_third_party_contact_fax;
587   l_rec.date_status_changed              := p_date_status_changed;
588   l_rec.failure_reason                   := p_failure_reason;
589   l_rec.attendance_result                := p_attendance_result;
590   l_rec.language_id                      := p_language_id;
591   l_rec.source_of_booking                := p_source_of_booking;
592   l_rec.special_booking_instructions     := p_special_booking_instructions;
593   l_rec.successful_attendance_flag       := p_successful_attendance_flag;
594   l_rec.tdb_information_category         := p_tdb_information_category;
595   l_rec.tdb_information1                 := p_tdb_information1;
596   l_rec.tdb_information2                 := p_tdb_information2;
597   l_rec.tdb_information3                 := p_tdb_information3;
598   l_rec.tdb_information4                 := p_tdb_information4;
599   l_rec.tdb_information5                 := p_tdb_information5;
600   l_rec.tdb_information6                 := p_tdb_information6;
601   l_rec.tdb_information7                 := p_tdb_information7;
602   l_rec.tdb_information8                 := p_tdb_information8;
603   l_rec.tdb_information9                 := p_tdb_information9;
604   l_rec.tdb_information10                := p_tdb_information10;
605   l_rec.tdb_information11                := p_tdb_information11;
606   l_rec.tdb_information12                := p_tdb_information12;
607   l_rec.tdb_information13                := p_tdb_information13;
608   l_rec.tdb_information14                := p_tdb_information14;
609   l_rec.tdb_information15                := p_tdb_information15;
610   l_rec.tdb_information16                := p_tdb_information16;
611   l_rec.tdb_information17                := p_tdb_information17;
612   l_rec.tdb_information18                := p_tdb_information18;
613   l_rec.tdb_information19                := p_tdb_information19;
614   l_rec.tdb_information20                := p_tdb_information20;
615   l_rec.organization_id                  := p_organization_id;
616   l_rec.sponsor_person_id                := p_sponsor_person_id;
617   l_rec.sponsor_assignment_id            := p_sponsor_assignment_id;
618   l_rec.person_address_id                := p_person_address_id;
619   l_rec.delegate_assignment_id           := p_delegate_assignment_id;
620   l_rec.delegate_contact_id              := p_delegate_contact_id;
621   l_rec.delegate_contact_email           := p_delegate_contact_email;
622   l_rec.third_party_email                := p_third_party_email;
623   l_rec.person_address_type              := p_person_address_type;
624   l_rec.line_id                              := p_line_id;
625   l_rec.org_id                               := p_org_id;
626   l_rec.daemon_flag                          := p_daemon_flag;
627   l_rec.daemon_type                          := p_daemon_type;
628   l_rec.old_event_id                     := p_old_event_id;
629   l_rec.quote_line_id                    := p_quote_line_id;
630   l_rec.interface_source                 := p_interface_source;
631   l_rec.total_training_time                  := p_total_training_time;
632   l_rec.content_player_status                := p_content_player_status;
633   l_rec.score                          := p_score;
634   l_rec.completed_content                := p_completed_content;
635   l_rec.total_content                    := p_total_content;
636   l_rec.booking_justification_id                 := p_booking_justification_id;
637   l_rec.is_history_flag                  := p_is_history_flag;
638   l_rec.is_mandatory_enrollment          := p_is_mandatory_enrollment;
639   -- Return the plsql record structure.
640   --
641   hr_utility.set_location(' Leaving:'||l_proc, 10);
642   Return(l_rec);
643 --
644 End convert_args;
645 --
646 end ota_tdb_shd;