1: Package body ota_utility as
2: /* $Header: ottomint.pkb 120.58.12020000.3 2012/06/29 11:19:18 rpahune ship $ */
3: g_package varchar2(33) := ' ota_utility.'; -- Global package name
4:
5: g_wait_list_booking varchar2(1) := 'W';
1: Package body ota_utility as
2: /* $Header: ottomint.pkb 120.58.12020000.3 2012/06/29 11:19:18 rpahune ship $ */
3: g_package varchar2(33) := ' ota_utility.'; -- Global package name
4:
5: g_wait_list_booking varchar2(1) := 'W';
6: g_placed_booking varchar2(1) := 'P';
7: g_attended_booking varchar2(1) := 'A';
243: begin
244:
245: IF p_object_type = 'OFS' THEN
246: l_message_name := 'OTA_443971_OFF_COUNT';
247: l_child_count := ota_utility.get_course_offering_count(p_object_id);
248: ELSIF p_object_type = 'CLS' THEN
249: l_message_name := 'OTA_443972_EVT_COUNT';
250: l_child_count := ota_utility.get_event_count(p_object_id);
251: END IF;
246: l_message_name := 'OTA_443971_OFF_COUNT';
247: l_child_count := ota_utility.get_course_offering_count(p_object_id);
248: ELSIF p_object_type = 'CLS' THEN
249: l_message_name := 'OTA_443972_EVT_COUNT';
250: l_child_count := ota_utility.get_event_count(p_object_id);
251: END IF;
252: -- Modified for bug#5158213
253: -- IF l_child_count <> 0 THEN
254: fnd_message.set_name('OTA',l_message_name);
409:
410: IF p_uom= 'ENR' THEN
411: hr_utility.set_location('Entering:'||l_proc, 10);
412: l_title_prompt :=
413: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'EVENT',810);
414: l_start_prompt :=
415: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'START',810);
416: l_end_prompt :=
417: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'END',810);
411: hr_utility.set_location('Entering:'||l_proc, 10);
412: l_title_prompt :=
413: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'EVENT',810);
414: l_start_prompt :=
415: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'START',810);
416: l_end_prompt :=
417: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'END',810);
418:
419: l_student_prompt :=
413: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'EVENT',810);
414: l_start_prompt :=
415: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'START',810);
416: l_end_prompt :=
417: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'END',810);
418:
419: l_student_prompt :=
420: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'STUDENT',810);
421:
416: l_end_prompt :=
417: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'END',810);
418:
419: l_student_prompt :=
420: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'STUDENT',810);
421:
422: l_version_name_prompt :=
423: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'ACTIVITY',810);
424:
419: l_student_prompt :=
420: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'STUDENT',810);
421:
422: l_version_name_prompt :=
423: ota_utility.Get_lookup_meaning ('OTA_ENROLL_INVOICE' ,'ACTIVITY',810);
424:
425:
426: OPEN C_Enrollment;
427: FETCH C_enrollment into l_version_name,
466:
467: ELSIF p_uom = 'EVT' THEN
468: hr_utility.set_location('Entering:'||l_proc, 15);
469: l_title_prompt :=
470: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'EVENT',810);
471:
472: l_start_prompt :=
473: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'START',810);
474:
469: l_title_prompt :=
470: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'EVENT',810);
471:
472: l_start_prompt :=
473: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'START',810);
474:
475: l_end_prompt :=
476: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'END',810);
477:
472: l_start_prompt :=
473: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'START',810);
474:
475: l_end_prompt :=
476: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'END',810);
477:
478: l_max_prompt :=
479: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'MAX',810);
480:
475: l_end_prompt :=
476: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'END',810);
477:
478: l_max_prompt :=
479: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'MAX',810);
480:
481: l_version_name_prompt :=
482: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'ACTIVITY',810);
483:
478: l_max_prompt :=
479: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'MAX',810);
480:
481: l_version_name_prompt :=
482: ota_utility.Get_lookup_meaning ('OTA_EVENT_INVOICE' ,'ACTIVITY',810);
483:
484: OPEN C_event;
485: FETCH C_event into
486: l_version_name,
3645: end if;
3646: END IF;
3647: END is_class_enrollable;
3648:
3649: end ota_utility;