[Home] [Help]
161: l_legislation_code varchar2(150);
162: --
163: begin
164: --
165: hr_utility.set_location('Entering:'|| l_proc, 10);
166: --
167: -- Ensure that all the mandatory parameter are not null
168: --
169: hr_api.mandatory_arg_error
201: --
202: hr_api.set_legislation_context(l_legislation_code);
203: end if;
204: --
205: hr_utility.set_location(' Leaving:'|| l_proc, 20);
206: END set_security_group_id;
207: --added for eBS by dhmulia
208: --
209: -- Added For Bug 4649610
254: l_proc varchar2(72) := g_package||'return_legislation_code';
255: --
256: Begin
257: --
258: hr_utility.set_location('Entering:'|| l_proc, 10);
259: --
260: -- Ensure that all the mandatory parameter are not null
261: --
262: hr_api.mandatory_arg_error
272: -- call to this function. Just return the value in the global
273: -- variable.
274: --
275: l_legislation_code := ota_tdb_bus.g_legislation_code;
276: hr_utility.set_location(l_proc, 20);
277: else
278: --
279: -- The ID is different to the last call to this function
280: -- or this is the first call to this function.
289: close csr_leg_code;
290: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
291: fnd_message.raise_error;
292: end if;
293: hr_utility.set_location(l_proc,30);
294: --
295: -- Set the global variables so the values are
296: -- available for the next call to this function.
297: --
298: close csr_leg_code;
299: ota_tdb_bus.g_booking_id := p_booking_id;
300: ota_tdb_bus.g_legislation_code := l_legislation_code;
301: end if;
302: hr_utility.set_location(' Leaving:'|| l_proc, 40);
303: return l_legislation_code;
304: end return_legislation_code;
305: -- Added For Bug 4649610
306:
322: l_proc varchar2(72) := g_package||'get_event';
323: l_event_exists boolean;
324: --
325: Begin
326: hr_utility.set_location('Entering:'||l_proc, 5);
327: --
328: -- check that the details have not already been selected
329: --
330: if p_record_use = 'SAME EVENT' and
347: fnd_message.raise_error;
348: --
349: end if;
350: --
351: hr_utility.set_location(' Leaving:'||l_proc, 10);
352: End get_event;
353: --
354: --
355: -- ----------------------------------------------------------------------------
366: --
367: l_proc varchar2(72) := g_package||'reset_event';
368: --
369: Begin
370: hr_utility.set_location('Entering:'||l_proc, 5);
371: --
372: g_event_rec.event_id := '';
373: --
374: hr_utility.set_location(' Leaving:'||l_proc, 10);
370: hr_utility.set_location('Entering:'||l_proc, 5);
371: --
372: g_event_rec.event_id := '';
373: --
374: hr_utility.set_location(' Leaving:'||l_proc, 10);
375: End reset_event;
376: --
377: -- ----------------------------------------------------------------------------
378: -- |--------------------------< booking_status_type >-------------------------|
397: l_proc varchar2(72) := g_package||'booking_status_type';
398: l_result varchar2(30);
399: --
400: Begin
401: hr_utility.set_location('Entering:'||l_proc, 5);
402: --
403: open c_status_type;
404: fetch c_status_type into l_result;
405: close c_status_type;
405: close c_status_type;
406: --
407: Return (l_result);
408: --
409: hr_utility.set_location(' Leaving:'||l_proc, 10);
410: End booking_status_type;
411: --
412: -- ---------------------------------------------------------------------
413: -- |-------------------< check_authorizer >-----------------------------
475:
476:
477: --
478: begin
479: hr_utility.set_location('Entering:'||l_proc,5);
480: hr_utility.set_location('Person Type '||p_person_address_type,10);
481: --
482: if p_person_type = 'Delegate' then
483: if p_person_address_type = 'INTERNAL' then
476:
477: --
478: begin
479: hr_utility.set_location('Entering:'||l_proc,5);
480: hr_utility.set_location('Person Type '||p_person_address_type,10);
481: --
482: if p_person_type = 'Delegate' then
483: if p_person_address_type = 'INTERNAL' then
484: open c_internal;
497: end if;
498: --
499: return l_return;
500: --
501: hr_utility.set_location(' Leaving'||l_proc,10);
502: --
503: end check_person;
504: --
505: --
810: --
811: l_proc varchar2(72) := g_package||'check_places';
812: --
813: Begin
814: hr_utility.set_location('Entering:'||l_proc, 5);
815: --
816: -- check that if the delegate is specified then the number of places is one
817: --
818: if p_delegate_person_id is not null and p_number_of_places > 1 then
821: fnd_message.raise_error;
822: --
823: end if;
824: --
825: hr_utility.set_location(' Leaving:'||l_proc, 10);
826: End check_places;
827: --
828: -- ----------------------------------------------------------------------------
829: -- |-------------------------< check_unique_booking >-------------------------|
844: l_proc varchar2(72) := g_package||'check_unique_booking';
845: l_booking number;
846: --
847: Begin
848: hr_utility.set_location('Entering:'||l_proc, 5);
849: --
850: -- only perform check if delegate person is specified i.e. the booking is
851: -- for a particular delegate
852: --
895: end if;
896: --
897: end if;
898: --
899: hr_utility.set_location(' Leaving:'||l_proc, 10);
900: End check_unique_booking;
901: --
902: -- ----------------------------------------------------------------------------
903: -- |----------------------------< check_failure >-----------------------------|
914: --
915: l_proc varchar2(72) := g_package||'check_failure';
916: --
917: Begin
918: hr_utility.set_location('Entering:'||l_proc, 5);
919: --
920: if p_failure_reason is not null and p_successful_attendance_flag = 'Y' then
921: --
922: fnd_message.set_name ('OTA', 'OTA_13466_TDB_SUCC_FAIL_EXCL');
924: --
925: --
926: end if;
927: --
928: hr_utility.set_location(' Leaving:'||l_proc, 10);
929: End check_failure;
930: --
931: -- ----------------------------------------------------------------------------
932: -- |----------------------------< check_internal_booking >--------------------|
966: and a.booking_id <> nvl(p_booking_id, hr_api.g_number);
967: --
968: Begin
969: --
970: hr_utility.set_location('Entering:'||l_proc, 5);
971: --
972: open c_max_internal;
973: --
974: fetch c_max_internal into l_max_internal;
1006: end if;
1007: --
1008: end if;
1009: --
1010: hr_utility.set_location(' Leaving:'||l_proc, 10);
1011: End check_internal_booking;
1012: --
1013: -- ----------------------------------------------------------------------------
1014: -- |---------------------------< check_attendance >---------------------------|
1025: --
1026: l_proc varchar2(72) := g_package||'check_attendance';
1027: --
1028: Begin
1029: hr_utility.set_location('Entering:'||l_proc, 5);
1030: --
1031: if p_successful_attendance_flag = 'Y' then
1032: --
1033: if booking_status_type (p_booking_status_type_id) not in
1040: end if;
1041: --
1042: end if;
1043: --
1044: hr_utility.set_location(' Leaving:'||l_proc, 10);
1045: End check_attendance;
1046: --
1047: -- ----------------------------------------------------------------------------
1048: -- |------------------------< check_status_date_change >----------------------|
1059: --
1060: l_proc varchar2(72) := g_package||'check_status_date_change';
1061: --
1062: Begin
1063: hr_utility.set_location('Entering:'||l_proc, 5);
1064: --
1065: -- do not allow update if status has been changed after the session date
1066: --
1067: if p_date_status_changed < p_previous_status_change then
1071: --
1072: --
1073: end if;
1074: --
1075: hr_utility.set_location(' Leaving:'||l_proc, 10);
1076: End check_status_date_change;
1077: --
1078: --
1079: -- ----------------------------------------------------------------------------
1090: --
1091: l_proc varchar2(72) := g_package||'add_current_time';
1092: --
1093: Begin
1094: hr_utility.set_location('Entering:'||l_proc, 5);
1095: --
1096: hr_utility.set_location(' Leaving:'||l_proc, 10);
1097: --
1098: if to_char(p_date,'HH24:MI:SS') = '00:00:00' then
1092: --
1093: Begin
1094: hr_utility.set_location('Entering:'||l_proc, 5);
1095: --
1096: hr_utility.set_location(' Leaving:'||l_proc, 10);
1097: --
1098: if to_char(p_date,'HH24:MI:SS') = '00:00:00' then
1099: --
1100: return to_date(to_char(p_date,'DD-MON-YYYY')||' '||
1132: l_proc varchar2(72) := g_package||'maintain_status_history';
1133: l_date_changed date;
1134: --
1135: Begin
1136: hr_utility.set_location('Entering:'||l_proc, 5);
1137: --
1138: -- add the time component on to the changed date
1139: --
1140: l_date_changed := add_current_time (p_date_status_changed);
1182: p_status_change_comments,
1183: 1);
1184: --
1185: --
1186: hr_utility.set_location(' Leaving:'||l_proc, 10);
1187: End maintain_status_history;
1188: --
1189: --
1190: -- ----------------------------------------------------------------------------
1208: l_proc varchar2(72) := g_package||'check_resources';
1209: l_dummy varchar2(1);
1210: --
1211: Begin
1212: hr_utility.set_location('Entering:'||l_proc, 5);
1213: --
1214: open c_details;
1215: fetch c_details into l_dummy;
1216: if c_details%found then
1224: end if;
1225: --
1226: close c_details;
1227: --
1228: hr_utility.set_location(' Leaving:'||l_proc, 10);
1229: End check_resources;
1230: --
1231: --
1232: -- ----------------------------------------------------------------------------
1250: l_proc varchar2(72) := g_package||'check_finance_lines';
1251: --
1252: begin
1253: --
1254: hr_utility.set_location('Entering:'|| l_proc, 5);
1255: --
1256: -- Check if finance line exists.
1257: --
1258: open c_check_finance_line;
1258: open c_check_finance_line;
1259: fetch c_check_finance_line into l_finance_line_exists;
1260: close c_check_finance_line;
1261: --
1262: hr_utility.set_location('Leaving:'|| l_proc, 10);
1263: --
1264: if l_finance_line_exists <> 0 then
1265: --
1266: fnd_message.set_name ('OTA', 'OTA_13609_TDB_CHK_TFL');
1267: fnd_message.raise_error;
1268: --
1269: end if;
1270: --
1271: hr_utility.set_location(' Leaving:'||l_proc, 10);
1272: --
1273: End check_finance_lines;
1274: --
1275: --
1295: where booking_id = p_booking_id;
1296: --
1297: begin
1298: --
1299: hr_utility.set_location('Entering:'|| l_proc, 5);
1300: --
1301: -- Check if booking is referenced in training plan costs
1302: open Csr_chk_tpc_rows(p_booking_id);
1303: fetch Csr_chk_tpc_rows into v_exists;
1307: fnd_message.set_name ('OTA', 'OTA_13822_TBD_NO_DEL_TPC_EXIST');
1308: fnd_message.raise_error;
1309: end if;
1310: --
1311: hr_utility.set_location('Leaving:' || l_proc, 10);
1312: --
1313: End check_training_plan_costs;
1314: --
1315: -- ----------------------------------------------------------------------------
1337: l_proc varchar2(72) := g_package||'check_type_business_group';
1338: l_dummy varchar2(1);
1339: --
1340: Begin
1341: hr_utility.set_location('Entering:'||l_proc, 5);
1342: --
1343: open c_same_business_group;
1344: fetch c_same_business_group into l_dummy;
1345: if c_same_business_group%notfound then
1351: end if;
1352: --
1353: close c_same_business_group;
1354: --
1355: hr_utility.set_location(' Leaving:'||l_proc, 10);
1356: End check_type_business_group;
1357: --
1358: --
1359: -- ----------------------------------------------------------------------------
1402: --
1403: l_proc varchar2(72) := g_package||'check_event_business_group';
1404: --
1405: Begin
1406: hr_utility.set_location('Entering:'||l_proc, 5);
1407: --
1408: -- retrieve event details if not already obtained
1409: --
1410: get_event (p_event_id, p_event_record_use);
1415: fnd_message.raise_error;
1416: --
1417: end if;
1418: --
1419: hr_utility.set_location(' Leaving:'||l_proc, 10);
1420: End check_event_business_group;
1421: --
1422: --
1423: -- ----------------------------------------------------------------------------
1475:
1476: --
1477: --
1478: Begin
1479: hr_utility.set_location('Entering:'||l_proc, 5);
1480: --
1481: if p_customer_id is not null then
1482: --
1483: -- Check external enrollments
1554:
1555: --
1556: end if;
1557: --
1558: hr_utility.set_location(' Leaving:'||l_proc, 10);
1559: --
1560: Return (l_result);
1561: --
1562: End booking_id_for;
1583: l_proc varchar2(72) := g_package||'finance_line_exists';
1584: --
1585: begin
1586: --
1587: hr_utility.set_location('Entering:'|| l_proc, 5);
1588: --
1589: -- Check if finance line exists.
1590: --
1591: open c_check_finance_line;
1591: open c_check_finance_line;
1592: fetch c_check_finance_line into l_finance_line_exists;
1593: close c_check_finance_line;
1594: --
1595: hr_utility.set_location('Leaving:'|| l_proc, 10);
1596: --
1597: if l_finance_line_exists = 0 then
1598: return (false);
1599: else
1620: --
1621: l_proc varchar2(72) := g_package||'internal_booking';
1622: --
1623: Begin
1624: hr_utility.set_location('Entering:'||l_proc, 5);
1625: --
1626: hr_utility.set_location(' Leaving:'||l_proc, 10);
1627: --
1628: -- if the booking is internal
1622: --
1623: Begin
1624: hr_utility.set_location('Entering:'||l_proc, 5);
1625: --
1626: hr_utility.set_location(' Leaving:'||l_proc, 10);
1627: --
1628: -- if the booking is internal
1629: --
1630: if p_person_id is not null and p_internal_booking_flag = 'Y' then
1678: AND bst.type = 'A';
1679:
1680: --
1681: Begin
1682: hr_utility.set_location('Entering:'||l_proc, 5);
1683: --
1684: if booking_status_type (p_booking_status_type_id) is null then
1685: --
1686: fnd_message.set_name ('OTA','OTA_13623_TDB_NO_STATUS');
1708: /* bug 3677661 */
1709: --
1710: end if;
1711: --
1712: hr_utility.set_location(' Leaving:'||l_proc, 10);
1713: End check_booking_status_type;
1714: --
1715: -- ----------------------------------------------------------------------------
1716: -- |------------------------< check_delegate_eligible >-----------------------|
1833: From ota_events
1834: Where event_id = p_event_id;
1835: --
1836: Begin
1837: hr_utility.set_location('Entering:'||l_proc, 5);
1838: --
1839: -- check if the course is not public
1840: --
1841: open c_not_public_course;
1994: Bug no 3460968 */
1995:
1996: end if;
1997: --
1998: hr_utility.set_location(' Leaving:'||l_proc, 10);
1999: End check_delegate_eligible;
2000: --
2001: --
2002: --
2045: l_number_of_bookings number;
2046: -- l_proc varchar2(72) := g_package||'places_for_status';
2047: --
2048: Begin
2049: -- hr_utility.set_location('Entering:'||l_proc, 5);
2050: --
2051: -- get the number of confirmed bookings for the event
2052: --
2053: open c_number_of_bookings;
2163: l_dummy varchar2(1);
2164: l_found boolean := false;
2165: --
2166: Begin
2167: hr_utility.set_location('Entering:'||l_proc, 5);
2168: --
2169: -- retrieve event details if not already obtained
2170: --
2171: get_event (p_event_id, p_event_record_use);
2171: get_event (p_event_id, p_event_record_use);
2172: --
2173: -- check only required if the event is a Programme member
2174: --
2175: hr_utility.set_location(g_event_rec.parent_event_id,5);
2176: --
2177: open c_part_of_program;
2178: --
2179: fetch c_part_of_program into l_dummy;
2186: close c_part_of_program;
2187: --
2188: -- Check delegate is enrolled on parent event
2189: --
2190: hr_utility.set_location('Customer ID '||p_customer_id,10);
2191: hr_utility.set_location('Event ID '||p_event_id,10);
2192: --
2193: if l_found then
2194: --
2187: --
2188: -- Check delegate is enrolled on parent event
2189: --
2190: hr_utility.set_location('Customer ID '||p_customer_id,10);
2191: hr_utility.set_location('Event ID '||p_event_id,10);
2192: --
2193: if l_found then
2194: --
2195: if p_customer_id is not null then
2229: end if;
2230: --
2231: end if;
2232: --
2233: hr_utility.set_location(' Leaving:'||l_proc, 10);
2234: --
2235: End check_programme_member;
2236: -- ----------------------------------------------------------------------------
2237: -- |--------------------------< event_place_needed >--------------------------|
2299: l_places_allowed number;
2300: l_extra_places number;
2301: --
2302: Begin
2303: hr_utility.set_location('Entering:'||l_proc, 5);
2304: --
2305: -- check that the booking being made is of confirmed status
2306: --
2307: if p_event_id is not null
2362: p_max_exceeded := false;
2363: --
2364: end if;
2365: --
2366: hr_utility.set_location(' Leaving:'||l_proc, 10);
2367: End check_max_allowance;
2368: --
2369: --
2370: -- ----------------------------------------------------------------------------
2388: from ota_events
2389: where event_id = nvl(g_event_rec.parent_event_id, -1);
2390: --
2391: Begin
2392: hr_utility.set_location('Entering:'||l_proc, 5);
2393: --
2394: -- retrieve event details if not already obtained
2395: --
2396: get_event (p_event_id, p_event_record_use);
2394: -- retrieve event details if not already obtained
2395: --
2396: get_event (p_event_id, p_event_record_use);
2397: --
2398: hr_utility.trace(g_event_rec.event_type);
2399: hr_utility.trace(g_event_rec.course_start_date);
2400: hr_utility.trace(g_event_rec.enrolment_start_date);
2401: hr_utility.set_location('Leaving:'||l_proc,5);
2402: --
2395: --
2396: get_event (p_event_id, p_event_record_use);
2397: --
2398: hr_utility.trace(g_event_rec.event_type);
2399: hr_utility.trace(g_event_rec.course_start_date);
2400: hr_utility.trace(g_event_rec.enrolment_start_date);
2401: hr_utility.set_location('Leaving:'||l_proc,5);
2402: --
2403: if g_event_rec.event_type in ('AD HOC','DEVELOPMENT') then
2396: get_event (p_event_id, p_event_record_use);
2397: --
2398: hr_utility.trace(g_event_rec.event_type);
2399: hr_utility.trace(g_event_rec.course_start_date);
2400: hr_utility.trace(g_event_rec.enrolment_start_date);
2401: hr_utility.set_location('Leaving:'||l_proc,5);
2402: --
2403: if g_event_rec.event_type in ('AD HOC','DEVELOPMENT') then
2404: Return (g_event_rec.course_start_date is not null);
2397: --
2398: hr_utility.trace(g_event_rec.event_type);
2399: hr_utility.trace(g_event_rec.course_start_date);
2400: hr_utility.trace(g_event_rec.enrolment_start_date);
2401: hr_utility.set_location('Leaving:'||l_proc,5);
2402: --
2403: if g_event_rec.event_type in ('AD HOC','DEVELOPMENT') then
2404: Return (g_event_rec.course_start_date is not null);
2405: elsif g_event_rec.event_type in ('SESSION') then
2444: from ota_events
2445: where event_id = nvl(g_event_rec.parent_event_id, -1);
2446: --
2447: Begin
2448: hr_utility.set_location('Entering:'||l_proc, 5);
2449: --
2450: -- retrieve event details if not already obtained
2451: --
2452: get_event (p_event_id, p_event_record_use);
2516: from ota_events
2517: where event_id = p_event_id;
2518: --
2519: Begin
2520: hr_utility.set_location('Entering:'||l_proc, 5);
2521:
2522: open c_get_parent;
2523: fetch c_get_parent into l_enrollment_sd,
2524: l_enrollment_ed,
2570: --
2571: l_proc varchar2(72) := g_package||'closed_event';
2572: --
2573: Begin
2574: hr_utility.set_location('Entering:'||l_proc, 5);
2575: --
2576: --
2577: -- retrieve event details if not already obtained
2578: --
2599: --
2600: l_proc varchar2(72) := g_package||'check_closed_event';
2601: --
2602: Begin
2603: hr_utility.set_location('Entering:'||l_proc, 5);
2604: --
2605: --
2606: -- retrieve event details if not already obtained
2607: --
2637: --
2638: --
2639: end if;
2640: --
2641: hr_utility.set_location(' Leaving:'||l_proc, 10);
2642: End check_closed_event;
2643: --
2644: -- ----------------------------------------------------------------------------
2645: -- |-------------------------< get_letter_request_id >------------------------|
2997: --
2998: l_proc varchar2(72) := g_package||'check_constraints';
2999: --
3000: Begin
3001: hr_utility.set_location('Entering:'||l_proc, 5);
3002: --
3003: If NOT (p_internal_booking_flag in ('N', 'Y')) then
3004: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3005: hr_utility.set_message_token('CONSTRAINT_NAME',
3000: Begin
3001: hr_utility.set_location('Entering:'||l_proc, 5);
3002: --
3003: If NOT (p_internal_booking_flag in ('N', 'Y')) then
3004: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3005: hr_utility.set_message_token('CONSTRAINT_NAME',
3006: 'OTA_TDB_INTERNAL_BOOKING_F_CHK');
3007: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3008: hr_utility.raise_error;
3001: hr_utility.set_location('Entering:'||l_proc, 5);
3002: --
3003: If NOT (p_internal_booking_flag in ('N', 'Y')) then
3004: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3005: hr_utility.set_message_token('CONSTRAINT_NAME',
3006: 'OTA_TDB_INTERNAL_BOOKING_F_CHK');
3007: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3008: hr_utility.raise_error;
3009: End If;
3003: If NOT (p_internal_booking_flag in ('N', 'Y')) then
3004: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3005: hr_utility.set_message_token('CONSTRAINT_NAME',
3006: 'OTA_TDB_INTERNAL_BOOKING_F_CHK');
3007: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3008: hr_utility.raise_error;
3009: End If;
3010: If NOT (p_successful_attendance_flag in ('N', 'Y')) then
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3004: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3005: hr_utility.set_message_token('CONSTRAINT_NAME',
3006: 'OTA_TDB_INTERNAL_BOOKING_F_CHK');
3007: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3008: hr_utility.raise_error;
3009: End If;
3010: If NOT (p_successful_attendance_flag in ('N', 'Y')) then
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3012: hr_utility.set_message_token('CONSTRAINT_NAME',
3007: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3008: hr_utility.raise_error;
3009: End If;
3010: If NOT (p_successful_attendance_flag in ('N', 'Y')) then
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3012: hr_utility.set_message_token('CONSTRAINT_NAME',
3013: 'OTA_TDB_SUCCESSFUL_ATTENDA_CHK');
3014: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3015: hr_utility.raise_error;
3008: hr_utility.raise_error;
3009: End If;
3010: If NOT (p_successful_attendance_flag in ('N', 'Y')) then
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3012: hr_utility.set_message_token('CONSTRAINT_NAME',
3013: 'OTA_TDB_SUCCESSFUL_ATTENDA_CHK');
3014: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3015: hr_utility.raise_error;
3016: End If;
3010: If NOT (p_successful_attendance_flag in ('N', 'Y')) then
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3012: hr_utility.set_message_token('CONSTRAINT_NAME',
3013: 'OTA_TDB_SUCCESSFUL_ATTENDA_CHK');
3014: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3015: hr_utility.raise_error;
3016: End If;
3017: --
3018: hr_utility.set_location(' Leaving:'||l_proc, 10);
3011: hr_utility.set_message(801,'HR_7166_OBJECT_CHK_CONSTRAINT');
3012: hr_utility.set_message_token('CONSTRAINT_NAME',
3013: 'OTA_TDB_SUCCESSFUL_ATTENDA_CHK');
3014: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3015: hr_utility.raise_error;
3016: End If;
3017: --
3018: hr_utility.set_location(' Leaving:'||l_proc, 10);
3019: End check_constraints;
3014: hr_utility.set_message_token('TABLE_NAME', 'OTA_DELEGATE_BOOKINGS');
3015: hr_utility.raise_error;
3016: End If;
3017: --
3018: hr_utility.set_location(' Leaving:'||l_proc, 10);
3019: End check_constraints;
3020: --
3021: -- ----------------------------------------------------------------------------
3022: -- |----------------< check_program_member_enrollments >----------------------|
3054:
3055: --
3056: Begin
3057: --
3058: hr_utility.set_location('Entering:'||l_proc, 5);
3059:
3060: if get_event_type(l_event_id) = 'PROGRAMME' then
3061: --
3062: if l_customer_id is not null then
3094: end if;
3095: --
3096: end if;
3097: --
3098: hr_utility.set_location(' Leaving:'||l_proc, 10);
3099: End check_pmm_enrollments;
3100:
3101: -- ----------------------------------------------------------------------------
3102: -- |---------------------------< chk_line_id >---------------------------|
3118: from oe_order_lines_all
3119: where line_id = p_line_id;
3120:
3121: Begin
3122: hr_utility.set_location('Entering:'||l_proc, 5);
3123:
3124: if (((p_booking_id is not null) and
3125: nvl(ota_tdb_shd.g_old_rec.line_id,hr_api.g_number) <>
3126: nvl(p_line_id,hr_api.g_number))
3125: nvl(ota_tdb_shd.g_old_rec.line_id,hr_api.g_number) <>
3126: nvl(p_line_id,hr_api.g_number))
3127: or (p_booking_id is null)) then
3128: --
3129: hr_utility.set_location('Entering:'||l_proc, 10);
3130: if p_line_id is not null then
3131:
3132: hr_utility.set_location('Entering:'||l_proc, 15);
3133: open csr_order_line;
3128: --
3129: hr_utility.set_location('Entering:'||l_proc, 10);
3130: if p_line_id is not null then
3131:
3132: hr_utility.set_location('Entering:'||l_proc, 15);
3133: open csr_order_line;
3134: fetch csr_order_line into l_exists;
3135: if csr_order_line%notfound then
3136: close csr_order_line;
3137: fnd_message.set_name('OTA','OTA_13888_TDB_LINE_INVALID');
3138: fnd_message.raise_error;
3139: end if;
3140: close csr_order_line;
3141: hr_utility.set_location('Entering:'||l_proc, 20);
3142: end if;
3143: end if;
3144: hr_utility.set_location('Leaving:'||l_proc, 30);
3145: end chk_line_id;
3140: close csr_order_line;
3141: hr_utility.set_location('Entering:'||l_proc, 20);
3142: end if;
3143: end if;
3144: hr_utility.set_location('Leaving:'||l_proc, 30);
3145: end chk_line_id;
3146:
3147: -- ----------------------------------------------------------------------------
3148: -- |---------------------------< chk_Order_line_exist >----------------------|
3155: l_proc varchar2(72) := g_package||'chk_order_line_exist';
3156:
3157:
3158: Begin
3159: hr_utility.set_location('Entering:'||l_proc, 5);
3160:
3161: if p_line_id is not null then
3162: fnd_message.set_name('OTA','OTA_13885_TDB_ORDER_LINE_EXIST');
3163: fnd_message.raise_error;
3160:
3161: if p_line_id is not null then
3162: fnd_message.set_name('OTA','OTA_13885_TDB_ORDER_LINE_EXIST');
3163: fnd_message.raise_error;
3164: hr_utility.set_location('Entering:'||l_proc, 20);
3165:
3166: end if;
3167: hr_utility.set_location('Leaving:'||l_proc, 30);
3168: end chk_order_line_exist;
3163: fnd_message.raise_error;
3164: hr_utility.set_location('Entering:'||l_proc, 20);
3165:
3166: end if;
3167: hr_utility.set_location('Leaving:'||l_proc, 30);
3168: end chk_order_line_exist;
3169: --
3170: -- ----------------------------------------------------------------------------
3171: -- |---------------------------< chk_status_changed >----------------------|
3208: WHERE EVENT_ID = p_event_id
3209: AND LINE_ID IS NOT NULL ;
3210: --
3211: Begin
3212: hr_utility.set_location('Entering:'||l_proc, 5);
3213: --
3214: IF p_line_id is not null THEN
3215: IF l_booking_status_changed THEN
3216: /*ota_utility.get_invoice_rule (
3228: IF l_status_type = 'C' THEN
3229: IF p_daemon_type = 'W' THEN
3230:
3231: BEGIN
3232: hr_utility.set_location('Entering:'||l_proc, 10);
3233:
3234: ota_utility.check_invoice(
3235: p_line_id => p_line_id,
3236: p_org_id => p_org_id,
3237: p_exist => l_exist);
3238: IF fnd_installation.get(660, 660, l_ins_status, l_industry) THEN
3239: IF l_exist = 'Y' THEN
3240: BEGIN
3241: hr_utility.set_location('Entering:'||l_proc, 15);
3242: ota_om_upd_api.create_rma(p_line_id,p_org_id);
3243: --
3244: -- Start bug #1657510 Comment out exception handler
3245: --
3244: -- Start bug #1657510 Comment out exception handler
3245: --
3246: /*
3247: exception when others then
3248: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3249: hr_utility.set_message_token('PROCEDURE', l_proc);
3250: hr_utility.set_message_token('STEP','15');
3251: hr_utility.raise_error;
3252: */
3245: --
3246: /*
3247: exception when others then
3248: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3249: hr_utility.set_message_token('PROCEDURE', l_proc);
3250: hr_utility.set_message_token('STEP','15');
3251: hr_utility.raise_error;
3252: */
3253: --
3246: /*
3247: exception when others then
3248: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3249: hr_utility.set_message_token('PROCEDURE', l_proc);
3250: hr_utility.set_message_token('STEP','15');
3251: hr_utility.raise_error;
3252: */
3253: --
3254: -- End bug #1657510 Comment out exception handler
3247: exception when others then
3248: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3249: hr_utility.set_message_token('PROCEDURE', l_proc);
3250: hr_utility.set_message_token('STEP','15');
3251: hr_utility.raise_error;
3252: */
3253: --
3254: -- End bug #1657510 Comment out exception handler
3255: --
3255: --
3256: END;
3257: ELSE
3258: BEGIN
3259: hr_utility.set_location('Entering:'||l_proc, 20);
3260:
3261: ota_om_upd_api.cancel_order(p_line_id,p_org_id);
3262: --
3263: -- Start bug #1657510 Comment out exception handler
3263: -- Start bug #1657510 Comment out exception handler
3264: --
3265: /*
3266: exception when others then
3267: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3268: hr_utility.set_message_token('PROCEDURE', l_proc);
3269: hr_utility.set_message_token('STEP','20');
3270: hr_utility.raise_error;
3271: */
3264: --
3265: /*
3266: exception when others then
3267: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3268: hr_utility.set_message_token('PROCEDURE', l_proc);
3269: hr_utility.set_message_token('STEP','20');
3270: hr_utility.raise_error;
3271: */
3272: --
3265: /*
3266: exception when others then
3267: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3268: hr_utility.set_message_token('PROCEDURE', l_proc);
3269: hr_utility.set_message_token('STEP','20');
3270: hr_utility.raise_error;
3271: */
3272: --
3273: -- End bug #1657510 Comment out exception handler
3266: exception when others then
3267: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3268: hr_utility.set_message_token('PROCEDURE', l_proc);
3269: hr_utility.set_message_token('STEP','20');
3270: hr_utility.raise_error;
3271: */
3272: --
3273: -- End bug #1657510 Comment out exception handler
3274: --
3351: END IF;
3352:
3353: END IF;
3354:
3355: hr_utility.set_location('Leaving:'||l_proc, 30);
3356: /*EXCEPTION WHEN OTHERS THEN
3357: l_err_num := SQLCODE;
3358: l_err_msg := SUBSTR(SQLERRM, 1, 100);
3359:
3531: --
3532: l_proc varchar2(72) := g_package || 'chk_df';
3533: --
3534: BEGIN
3535: hr_utility.set_location('Entering:'||l_proc,10);
3536: --
3537: IF ((p_rec.booking_id IS NOT NULL) AND (
3538: NVL(ota_tdb_shd.g_old_rec.tdb_information_category, hr_api.g_varchar2) <>
3539: NVL(p_rec.tdb_information_category, hr_api.g_varchar2) OR
3632: );
3633: END IF;
3634:
3635: --
3636: hr_utility.set_location(' Leaving:'||l_proc,20);
3637: END chk_df;
3638:
3639: --
3640: -- ----------------------------------------------------------------------------
3651: l_proc varchar2(72) := g_package||'insert_validate';
3652: l_event_record_use varchar2(10);
3653: --
3654: Begin
3655: hr_utility.set_location('Entering:'||l_proc, 5);
3656: --
3657: -- Call all supporting business operations
3658: --
3659: hr_api.validate_bus_grp_id(p_rec.business_group_id); -- Validate Bus Grp
3906: /*Enhancement 1823602*/
3907:
3908: --Bug 3619960
3909: ota_tdb_bus.chk_df(p_rec);
3910: hr_utility.set_location(' Leaving:'||l_proc, 10);
3911: End insert_validate;
3912: --
3913: -- ----------------------------------------------------------------------------
3914: -- |---------------------------< update_validate >----------------------------|
4023:
4024: l_status_type ota_booking_status_types.type%TYPE;
4025: --
4026: Begin
4027: hr_utility.set_location('Entering:'||l_proc, 5);
4028: --
4029: -- Call check non updateable argument
4030: chk_non_updateable_args
4031: (
4457:
4458: /* bug no 4509873 */
4459: --Bug 3619960
4460: ota_tdb_bus.chk_df(p_rec);
4461: hr_utility.set_location(' Leaving:'||l_proc, 10);
4462: --
4463: End update_validate;
4464: --
4465: -- ----------------------------------------------------------------------------
4472: --
4473: l_proc varchar2(72) := g_package||'delete_validate';
4474: --
4475: Begin
4476: hr_utility.set_location('Entering:'||l_proc, 5);
4477: --
4478: -- Call all supporting business operations
4479: --
4480: -- Check that booking id is not referenced in ota_training_plan_costs
4498: -- enrollments
4499: --
4500: check_pmm_enrollments;
4501: --
4502: hr_utility.set_location(' Leaving:'||l_proc, 10);
4503: End delete_validate;
4504: --
4505: end ota_tdb_bus;