[Home] [Help]
429: fnd_log.string(p_level, p_module, p_msg);
430: END IF;
431:
432: EXCEPTION
433: WHEN xla_exceptions_pkg.application_exception THEN
434: RAISE;
435: WHEN OTHERS THEN
436: xla_exceptions_pkg.raise_message
437: (p_location => 'xla_events_pkg.trace');
432: EXCEPTION
433: WHEN xla_exceptions_pkg.application_exception THEN
434: RAISE;
435: WHEN OTHERS THEN
436: xla_exceptions_pkg.raise_message
437: (p_location => 'xla_events_pkg.trace');
438: END trace;
439:
440: --=============================================================================
656: ----------------------------------------------------------------------------
657: -- check to see the API is not called for manual events
658: ----------------------------------------------------------------------------
659: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
660: xla_exceptions_pkg.raise_message
661: (p_appli_s_name => 'XLA'
662: ,p_msg_name => 'XLA_COMMON_ERROR'
663: ,p_token_1 => 'ERROR'
664: ,p_value_1 => 'For MANUAL events this API cannot be called'
668: g_context := C_REGULAR_EVENT_CONTEXT;
669: END IF;
670:
671: IF p_event_type_code IS NULL THEN
672: xla_exceptions_pkg.raise_message
673: (p_appli_s_name => 'XLA'
674: ,p_msg_name => 'XLA_COMMON_ERROR'
675: ,p_token_1 => 'ERROR'
676: ,p_value_1 =>
678: ,p_token_2 => 'LOCATION'
679: ,p_value_2 => 'xla_events_pkg.create_event');
680: END IF;
681: IF p_event_date IS NULL THEN
682: xla_exceptions_pkg.raise_message
683: (p_appli_s_name => 'XLA'
684: ,p_msg_name => 'XLA_COMMON_ERROR'
685: ,p_token_1 => 'ERROR'
686: ,p_value_1 =>
688: ,p_token_2 => 'LOCATION'
689: ,p_value_2 => 'xla_events_pkg.create_event');
690: END IF;
691: IF p_event_status_code IS NULL THEN
692: xla_exceptions_pkg.raise_message
693: (p_appli_s_name => 'XLA'
694: ,p_msg_name => 'XLA_COMMON_ERROR'
695: ,p_token_1 => 'ERROR'
696: ,p_value_1 =>
737: END IF;
738:
739: IF (g_gapless_flag = 'Y'
740: and (p_event_number is null or p_event_number<1)) THEN
741: xla_exceptions_pkg.raise_message
742: (p_appli_s_name => 'XLA'
743: ,p_msg_name => 'XLA_COMMON_ERROR'
744: ,p_token_1 => 'ERROR'
745: ,p_value_1 =>
808: END IF;
809: RETURN l_return_id;
810:
811: EXCEPTION
812: WHEN xla_exceptions_pkg.application_exception THEN
813: ROLLBACK to SAVEPOINT before_event_creation;
814: RAISE;
815: WHEN OTHERS THEN
816: ROLLBACK to SAVEPOINT before_event_creation;
813: ROLLBACK to SAVEPOINT before_event_creation;
814: RAISE;
815: WHEN OTHERS THEN
816: ROLLBACK to SAVEPOINT before_event_creation;
817: xla_exceptions_pkg.raise_message
818: (p_location => 'xla_events_pkg.create_event (fn)');
819: END create_event;
820:
821:
987: ----------------------------------------------------------------------------
988: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
989: g_context := C_MANUAL_EVENT_CONTEXT;
990: ELSE
991: xla_exceptions_pkg.raise_message
992: (p_appli_s_name => 'XLA'
993: ,p_msg_name => 'XLA_COMMON_ERROR'
994: ,p_token_1 => 'ERROR'
995: ,p_value_1 => 'For REGULAR events this API cannot be called'
1000: ----------------------------------------------------------------------------
1001: -- perform specific validations for 'creating events'
1002: ----------------------------------------------------------------------------
1003: IF p_event_type_code IS NULL THEN
1004: xla_exceptions_pkg.raise_message
1005: (p_appli_s_name => 'XLA'
1006: ,p_msg_name => 'XLA_COMMON_ERROR'
1007: ,p_token_1 => 'ERROR'
1008: ,p_value_1 =>
1010: ,p_token_2 => 'LOCATION'
1011: ,p_value_2 => 'xla_events_pkg.create_manual_event');
1012: END IF;
1013: IF p_event_date IS NULL THEN
1014: xla_exceptions_pkg.raise_message
1015: (p_appli_s_name => 'XLA'
1016: ,p_msg_name => 'XLA_COMMON_ERROR'
1017: ,p_token_1 => 'ERROR'
1018: ,p_value_1 => 'Event Date cannot have a NULL value.'
1019: ,p_token_2 => 'LOCATION'
1020: ,p_value_2 => 'xla_events_pkg.create_manual_event');
1021: END IF;
1022: IF p_event_status_code IS NULL THEN
1023: xla_exceptions_pkg.raise_message
1024: (p_appli_s_name => 'XLA'
1025: ,p_msg_name => 'XLA_COMMON_ERROR'
1026: ,p_token_1 => 'ERROR'
1027: ,p_value_1 => 'Event Status Code cannot have a NULL value.'
1028: ,p_token_2 => 'LOCATION'
1029: ,p_value_2 => 'xla_events_pkg.create_manual_event');
1030: END IF;
1031: IF p_process_status_code IS NULL THEN
1032: xla_exceptions_pkg.raise_message
1033: (p_appli_s_name => 'XLA'
1034: ,p_msg_name => 'XLA_COMMON_ERROR'
1035: ,p_token_1 => 'ERROR'
1036: ,p_value_1 => 'Process Status Code cannot have a NULL value.'
1127: ,p_module =>l_log_module);
1128: END IF;
1129: RETURN l_return_id;
1130: EXCEPTION
1131: WHEN xla_exceptions_pkg.application_exception THEN
1132: ROLLBACK to SAVEPOINT before_event_creation;
1133: RAISE;
1134: WHEN OTHERS THEN
1135: ROLLBACK to SAVEPOINT before_event_creation;
1132: ROLLBACK to SAVEPOINT before_event_creation;
1133: RAISE;
1134: WHEN OTHERS THEN
1135: ROLLBACK to SAVEPOINT before_event_creation;
1136: xla_exceptions_pkg.raise_message
1137: (p_location => 'xla_events_pkg.create_manual_event (fn)');
1138: END create_manual_event;
1139:
1140:
1301: ----------------------------------------------------------------------------
1302: -- check to see the API is not called for manual events
1303: ----------------------------------------------------------------------------
1304: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
1305: xla_exceptions_pkg.raise_message
1306: (p_appli_s_name => 'XLA'
1307: ,p_msg_name => 'XLA_COMMON_ERROR'
1308: ,p_token_1 => 'ERROR'
1309: ,p_value_1 => 'For MANUAL events this API cannot be called'
1316: ----------------------------------------------------------------------------
1317: -- perform validations specific to 'updating event's status'
1318: ----------------------------------------------------------------------------
1319: IF p_event_status_code IS NULL THEN
1320: xla_exceptions_pkg.raise_message
1321: (p_appli_s_name => 'XLA'
1322: ,p_msg_name => 'XLA_COMMON_ERROR'
1323: ,p_token_1 => 'ERROR'
1324: ,p_value_1 => 'Event Status Code cannot have a NULL value.'
1363: ----------------------------------------------------------------------------
1364: -- Check entity existency
1365: ----------------------------------------------------------------------------
1366: IF g_entity_id IS NULL THEN
1367: xla_exceptions_pkg.raise_message
1368: (p_appli_s_name => 'XLA'
1369: ,p_msg_name => 'XLA_COMMON_ERROR'
1370: ,p_token_1 => 'ERROR'
1371: ,p_value_1 => 'No event exists for the document represented '||
1543: ,p_level => C_LEVEL_PROCEDURE
1544: ,p_module =>l_log_module);
1545: end if;
1546: EXCEPTION
1547: WHEN xla_exceptions_pkg.application_exception THEN
1548: ROLLBACK to SAVEPOINT before_event_update;
1549: RAISE;
1550: WHEN OTHERS THEN
1551: ROLLBACK to SAVEPOINT before_event_update;
1548: ROLLBACK to SAVEPOINT before_event_update;
1549: RAISE;
1550: WHEN OTHERS THEN
1551: ROLLBACK to SAVEPOINT before_event_update;
1552: xla_exceptions_pkg.raise_message
1553: (p_location => 'xla_events_pkg.update_event_status');
1554: END update_event_status;
1555:
1556:
1735: ----------------------------------------------------------------------------
1736: -- check to see the API is not called for manual events
1737: ----------------------------------------------------------------------------
1738: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
1739: xla_exceptions_pkg.raise_message
1740: (p_appli_s_name => 'XLA'
1741: ,p_msg_name => 'XLA_COMMON_ERROR'
1742: ,p_token_1 => 'ERROR'
1743: ,p_value_1 => 'For MANUAL events this API cannot be called'
1750: ----------------------------------------------------------------------------
1751: -- perfrom validations specific to 'updating event'
1752: ----------------------------------------------------------------------------
1753: IF p_event_id IS NULL THEN
1754: xla_exceptions_pkg.raise_message
1755: (p_appli_s_name => 'XLA'
1756: ,p_msg_name => 'XLA_COMMON_ERROR'
1757: ,p_token_1 => 'ERROR'
1758: ,p_value_1 => 'Event ID cannot have a NULL value.'
1809: ----------------------------------------------------------------------------
1810: -- Check entity existency
1811: ----------------------------------------------------------------------------
1812: IF g_entity_id IS NULL THEN
1813: xla_exceptions_pkg.raise_message
1814: (p_appli_s_name => 'XLA'
1815: ,p_msg_name => 'XLA_COMMON_ERROR'
1816: ,p_token_1 => 'ERROR'
1817: ,p_value_1 => 'No event exists for the document represented '||
1822:
1823: if(g_gapless_flag='Y' and
1824: (p_overwrite_event_num=C_YES and
1825: (p_event_number is null or p_event_number<1))) then
1826: xla_exceptions_pkg.raise_message
1827: (p_appli_s_name => 'XLA'
1828: ,p_msg_name => 'XLA_COMMON_ERROR'
1829: ,p_token_1 => 'ERROR'
1830: ,p_value_1 =>
1880:
1881:
1882: Exception
1883: WHEN OTHERS THEN
1884: xla_exceptions_pkg.raise_message
1885: (p_appli_s_name => 'XLA'
1886: ,p_msg_name => 'XLA_COMMON_ERROR'
1887: ,p_token_1 => 'ERROR'
1888: ,p_value_1 =>
1940: AND application_id = g_application_id -- 8967771
1941: ;
1942:
1943: IF SQL%ROWCOUNT <> 1 THEN
1944: xla_exceptions_pkg.raise_message
1945: (p_appli_s_name => 'XLA'
1946: ,p_msg_name => 'XLA_COMMON_ERROR'
1947: ,p_token_1 => 'ERROR'
1948: ,p_value_1 =>
2097: ,p_level => C_LEVEL_PROCEDURE
2098: ,p_module =>l_log_module);
2099: END IF;
2100: EXCEPTION
2101: WHEN xla_exceptions_pkg.application_exception THEN
2102: ROLLBACK to SAVEPOINT before_event_update;
2103: RAISE;
2104: WHEN OTHERS THEN
2105: ROLLBACK to SAVEPOINT before_event_update;
2102: ROLLBACK to SAVEPOINT before_event_update;
2103: RAISE;
2104: WHEN OTHERS THEN
2105: ROLLBACK to SAVEPOINT before_event_update;
2106: xla_exceptions_pkg.raise_message
2107: (p_location => 'xla_events_pkg.update_event');
2108: END update_event;
2109:
2110:
2284: ----------------------------------------------------------------------------
2285: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
2286: g_context := C_MANUAL_EVENT_CONTEXT;
2287: ELSE
2288: xla_exceptions_pkg.raise_message
2289: (p_appli_s_name => 'XLA'
2290: ,p_msg_name => 'XLA_COMMON_ERROR'
2291: ,p_token_1 => 'ERROR'
2292: ,p_value_1 => 'For REGULAR events this API cannot be called'
2297: ----------------------------------------------------------------------------
2298: -- perfrom validations specific to 'updating event'
2299: ----------------------------------------------------------------------------
2300: IF p_event_id IS NULL THEN
2301: xla_exceptions_pkg.raise_message
2302: (p_appli_s_name => 'XLA'
2303: ,p_msg_name => 'XLA_COMMON_ERROR'
2304: ,p_token_1 => 'ERROR'
2305: ,p_value_1 => 'Event ID cannot have a NULL value.'
2313: ----------------------------------------------------------------------------
2314: IF (((p_event_status_code IS NOT NULL) AND (p_process_status_code IS NULL))OR
2315: ((p_event_status_code IS NULL) AND (p_process_status_code IS NOT NULL)))
2316: THEN
2317: xla_exceptions_pkg.raise_message
2318: (p_appli_s_name => 'XLA'
2319: ,p_msg_name => 'XLA_COMMON_ERROR'
2320: ,p_token_1 => 'ERROR'
2321: ,p_value_1 => 'Inconsistent values for event statuses: '||
2357: ,p_module =>l_log_module);
2358: END IF;
2359:
2360: IF g_entity_id IS NULL THEN
2361: xla_exceptions_pkg.raise_message
2362: (p_appli_s_name => 'XLA'
2363: ,p_msg_name => 'XLA_COMMON_ERROR'
2364: ,p_token_1 => 'ERROR'
2365: ,p_value_1 => 'No event exists for the document represented '||
2424: ,p_module =>l_log_module);
2425: END IF;
2426:
2427: IF l_rowcount <> 1 THEN
2428: xla_exceptions_pkg.raise_message
2429: (p_appli_s_name => 'XLA'
2430: ,p_msg_name => 'XLA_COMMON_ERROR'
2431: ,p_token_1 => 'ERROR'
2432: ,p_value_1 =>
2443: ,p_module =>l_log_module);
2444: END IF;
2445:
2446: EXCEPTION
2447: WHEN xla_exceptions_pkg.application_exception THEN
2448: ROLLBACK to SAVEPOINT before_event_update;
2449: RAISE;
2450: WHEN OTHERS THEN
2451: ROLLBACK to SAVEPOINT before_event_update;
2448: ROLLBACK to SAVEPOINT before_event_update;
2449: RAISE;
2450: WHEN OTHERS THEN
2451: ROLLBACK to SAVEPOINT before_event_update;
2452: xla_exceptions_pkg.raise_message
2453: (p_location => 'xla_events_pkg.update_manual_event');
2454: END update_manual_event;
2455:
2456:
2609: ----------------------------------------------------------------------------
2610: -- perform validations specific to 'deleting event'
2611: ----------------------------------------------------------------------------
2612: IF p_event_id IS NULL THEN
2613: xla_exceptions_pkg.raise_message
2614: (p_appli_s_name => 'XLA'
2615: ,p_msg_name => 'XLA_COMMON_ERROR'
2616: ,p_token_1 => 'ERROR'
2617: ,p_value_1 => 'Event ID cannot have a NULL value.'
2643: ,p_module =>l_log_module);
2644: END IF;
2645:
2646: IF g_entity_id IS NULL THEN
2647: xla_exceptions_pkg.raise_message
2648: (p_appli_s_name => 'XLA'
2649: ,p_msg_name => 'XLA_COMMON_ERROR'
2650: ,p_token_1 => 'ERROR'
2651: ,p_value_1 => 'No event exists for the document represented '||
2671: AND event_status_code <> xla_events_pub_pkg.C_EVENT_PROCESSED
2672: AND application_id = g_application_id -- 8967771
2673: ;
2674: exception when others then
2675: xla_exceptions_pkg.raise_message
2676: (p_appli_s_name => 'XLA'
2677: ,p_msg_name => 'XLA_COMMON_ERROR'
2678: ,p_token_1 => 'ERROR'
2679: ,p_value_1 =>
2703: ,p_module =>l_log_module);
2704: END IF;
2705:
2706: IF l_rowcount <> 1 THEN
2707: xla_exceptions_pkg.raise_message
2708: (p_appli_s_name => 'XLA'
2709: ,p_msg_name => 'XLA_COMMON_ERROR'
2710: ,p_token_1 => 'ERROR'
2711: ,p_value_1 =>
2757: ,p_module =>l_log_module);
2758: END IF;
2759:
2760: EXCEPTION
2761: WHEN xla_exceptions_pkg.application_exception THEN
2762: ROLLBACK to SAVEPOINT before_event_delete;
2763: RAISE;
2764: WHEN OTHERS THEN
2765: ROLLBACK to SAVEPOINT before_event_delete;
2762: ROLLBACK to SAVEPOINT before_event_delete;
2763: RAISE;
2764: WHEN OTHERS THEN
2765: ROLLBACK to SAVEPOINT before_event_delete;
2766: xla_exceptions_pkg.raise_message
2767: (p_location => 'xla_events_pkg.delete_event');
2768: END delete_event;
2769:
2770:
2909: ----------------------------------------------------------------------------
2910: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
2911: g_context := C_MANUAL_EVENT_CONTEXT;
2912: ELSE
2913: xla_exceptions_pkg.raise_message
2914: (p_appli_s_name => 'XLA'
2915: ,p_msg_name => 'XLA_COMMON_ERROR'
2916: ,p_token_1 => 'ERROR'
2917: ,p_value_1 => 'For REGULAR events this API cannot be called'
2922: ----------------------------------------------------------------------------
2923: -- perform validations specific to 'deleting event'
2924: ----------------------------------------------------------------------------
2925: IF p_event_id IS NULL THEN
2926: xla_exceptions_pkg.raise_message
2927: (p_appli_s_name => 'XLA'
2928: ,p_msg_name => 'XLA_COMMON_ERROR'
2929: ,p_token_1 => 'ERROR'
2930: ,p_value_1 => 'Event ID cannot have a NULL value.'
2956: ,p_module =>l_log_module);
2957: END IF;
2958:
2959: IF g_entity_id IS NULL THEN
2960: xla_exceptions_pkg.raise_message
2961: (p_appli_s_name => 'XLA'
2962: ,p_msg_name => 'XLA_COMMON_ERROR'
2963: ,p_token_1 => 'ERROR'
2964: ,p_value_1 => 'No event exists for the document represented '||
2993: ,p_module =>l_log_module);
2994: END IF;
2995:
2996: IF l_rowcount <> 1 THEN
2997: xla_exceptions_pkg.raise_message
2998: (p_appli_s_name => 'XLA'
2999: ,p_msg_name => 'XLA_COMMON_ERROR'
3000: ,p_token_1 => 'ERROR'
3001: ,p_value_1 =>
3034: ,p_module =>l_log_module);
3035: END IF;
3036:
3037: EXCEPTION
3038: WHEN xla_exceptions_pkg.application_exception THEN
3039: ROLLBACK to SAVEPOINT before_event_delete;
3040: RAISE;
3041: WHEN OTHERS THEN
3042: ROLLBACK to SAVEPOINT before_event_delete;
3039: ROLLBACK to SAVEPOINT before_event_delete;
3040: RAISE;
3041: WHEN OTHERS THEN
3042: ROLLBACK to SAVEPOINT before_event_delete;
3043: xla_exceptions_pkg.raise_message
3044: (p_location => 'xla_events_pkg.delete_processed_event');
3045: END delete_processed_event;
3046:
3047:
3200: ----------------------------------------------------------------------------
3201: -- check to see the API is not called for manual events
3202: ----------------------------------------------------------------------------
3203: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
3204: xla_exceptions_pkg.raise_message
3205: (p_appli_s_name => 'XLA'
3206: ,p_msg_name => 'XLA_COMMON_ERROR'
3207: ,p_token_1 => 'ERROR'
3208: ,p_value_1 => 'For MANUAL events this API cannot be called'
3243: ,p_module =>l_log_module);
3244: END IF;
3245:
3246: IF g_entity_id IS NULL THEN
3247: xla_exceptions_pkg.raise_message
3248: (p_appli_s_name => 'XLA'
3249: ,p_msg_name => 'XLA_COMMON_ERROR'
3250: ,p_token_1 => 'ERROR'
3251: ,p_value_1 => 'No event exists for the document represented '||
3350: END IF;
3351:
3352: RETURN l_event_deleted;
3353: EXCEPTION
3354: WHEN xla_exceptions_pkg.application_exception THEN
3355: ROLLBACK to SAVEPOINT before_event_delete;
3356: RAISE;
3357: WHEN OTHERS THEN
3358: ROLLBACK to SAVEPOINT before_event_delete;
3355: ROLLBACK to SAVEPOINT before_event_delete;
3356: RAISE;
3357: WHEN OTHERS THEN
3358: ROLLBACK to SAVEPOINT before_event_delete;
3359: xla_exceptions_pkg.raise_message
3360: (p_location => 'xla_events_pkg.delete_events (fn)');
3361: END delete_events;
3362:
3363:
3537: NVL(xla_events_pub_pkg.g_security.security_id_char_2,' ')
3538: AND NVL(a.security_id_char_3,' ') =
3539: NVL(xla_events_pub_pkg.g_security.security_id_char_3,' ');
3540: EXCEPTION when others then
3541: xla_exceptions_pkg.raise_message
3542: (p_appli_s_name => 'XLA'
3543: ,p_msg_name => 'XLA_COMMON_ERROR'
3544: ,p_token_1 => 'ERROR'
3545: ,p_value_1 =>
3589: ,p_module =>l_log_module);
3590: END IF;
3591: RETURN 0;
3592: EXCEPTION
3593: WHEN xla_exceptions_pkg.application_exception THEN
3594: ROLLBACK to SAVEPOINT before_entity_delete;
3595: RAISE;
3596: WHEN OTHERS THEN
3597: ROLLBACK to SAVEPOINT before_entity_delete;
3594: ROLLBACK to SAVEPOINT before_entity_delete;
3595: RAISE;
3596: WHEN OTHERS THEN
3597: ROLLBACK to SAVEPOINT before_entity_delete;
3598: xla_exceptions_pkg.raise_message
3599: (p_location => 'xla_events_pkg.delete_entity');
3600: END delete_entity;
3601:
3602: --=============================================================================
3637: --
3638: -- Check entity existency
3639: --
3640: IF g_entity_id IS NULL THEN
3641: xla_exceptions_pkg.raise_message
3642: (p_appli_s_name => 'XLA'
3643: ,p_msg_name => 'XLA_COMMON_ERROR'
3644: ,p_token_1 => 'ERROR'
3645: ,p_value_1 =>
3649: END IF;
3650:
3651: trace('< xla_events_pkg.delete_entity' , 20);
3652: EXCEPTION
3653: WHEN xla_exceptions_pkg.application_exception THEN
3654: ROLLBACK to SAVEPOINT before_entity_delete;
3655: RAISE;
3656: WHEN OTHERS THEN
3657: ROLLBACK to SAVEPOINT before_entity_delete;
3654: ROLLBACK to SAVEPOINT before_entity_delete;
3655: RAISE;
3656: WHEN OTHERS THEN
3657: ROLLBACK to SAVEPOINT before_entity_delete;
3658: xla_exceptions_pkg.raise_message
3659: (p_location => 'xla_events_pkg.delete_entity');
3660: END purge_entity;
3661:
3662:
3814: ----------------------------------------------------------------------------
3815: -- perform validation specific to 'get event information'
3816: ----------------------------------------------------------------------------
3817: IF p_event_id IS NULL THEN
3818: xla_exceptions_pkg.raise_message
3819: (p_appli_s_name => 'XLA'
3820: ,p_msg_name => 'XLA_COMMON_ERROR'
3821: ,p_token_1 => 'ERROR'
3822: ,p_value_1 =>
3849: ,p_module =>l_log_module);
3850: END IF;
3851:
3852: IF g_entity_id IS NULL THEN
3853: xla_exceptions_pkg.raise_message
3854: (p_appli_s_name => 'XLA'
3855: ,p_msg_name => 'XLA_COMMON_ERROR'
3856: ,p_token_1 => 'ERROR'
3857: ,p_value_1 => 'No event exists for the document represented '||
3911:
3912: RETURN (l_event_info);
3913: EXCEPTION
3914: WHEN NO_DATA_FOUND THEN
3915: xla_exceptions_pkg.raise_message
3916: (p_appli_s_name => 'XLA'
3917: ,p_msg_name => 'XLA_COMMON_ERROR'
3918: ,p_token_1 => 'ERROR'
3919: ,p_value_1 => 'The event id '||p_event_id||' does not exist'
3918: ,p_token_1 => 'ERROR'
3919: ,p_value_1 => 'The event id '||p_event_id||' does not exist'
3920: ,p_token_2 => 'LOCATION'
3921: ,p_value_2 => 'xla_events_pkg.get_event_info');
3922: WHEN xla_exceptions_pkg.application_exception THEN
3923: RAISE;
3924: WHEN OTHERS THEN
3925: xla_exceptions_pkg.raise_message
3926: (p_location => 'xla_events_pkg.get_event_info (fn)');
3921: ,p_value_2 => 'xla_events_pkg.get_event_info');
3922: WHEN xla_exceptions_pkg.application_exception THEN
3923: RAISE;
3924: WHEN OTHERS THEN
3925: xla_exceptions_pkg.raise_message
3926: (p_location => 'xla_events_pkg.get_event_info (fn)');
3927: END get_event_info;
3928:
3929:
4075: END IF;
4076:
4077: RETURN l_event_info.event_status_code;
4078: EXCEPTION
4079: WHEN xla_exceptions_pkg.application_exception THEN
4080: RAISE;
4081: WHEN OTHERS THEN
4082: xla_exceptions_pkg.raise_message
4083: (p_location => 'xla_events_pkg.get_event_status (fn)');
4078: EXCEPTION
4079: WHEN xla_exceptions_pkg.application_exception THEN
4080: RAISE;
4081: WHEN OTHERS THEN
4082: xla_exceptions_pkg.raise_message
4083: (p_location => 'xla_events_pkg.get_event_status (fn)');
4084: END get_event_status ;
4085:
4086:
4285: -- Changed to fix bug # 2899700
4286: ----------------------------------------------------------------------------
4287: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
4288: IF p_event_id IS NULL THEN
4289: xla_exceptions_pkg.raise_message
4290: (p_appli_s_name => 'XLA'
4291: ,p_msg_name => 'XLA_COMMON_ERROR'
4292: ,p_token_1 => 'ERROR'
4293: ,p_value_1 => 'For MANUAL events event_id cannot be NULL'
4346: ,p_module =>l_log_module);
4347: END IF;
4348: RETURN FALSE;
4349: /*
4350: xla_exceptions_pkg.raise_message
4351: (p_appli_s_name => 'XLA'
4352: ,p_msg_name => 'XLA_COMMON_ERROR'
4353: ,p_token_1 => 'ERROR'
4354: ,p_value_1 => 'No event exists for the document represented '||
4554: RETURN TRUE;
4555: END IF;
4556:
4557: EXCEPTION
4558: WHEN xla_exceptions_pkg.application_exception THEN
4559: IF event_status_cur%ISOPEN THEN
4560: CLOSE event_status_cur; -- bug 13698935
4561: END IF;
4562: RAISE;
4568: WHEN OTHERS THEN
4569: IF event_status_cur%ISOPEN THEN
4570: CLOSE event_status_cur; -- bug 13698935
4571: END IF;
4572: xla_exceptions_pkg.raise_message
4573: (p_location => 'xla_events_pkg.event_exists (fn)');
4574: END event_exists;
4575:
4576:
4719: -- Changed to fix bug # 2899700
4720: ----------------------------------------------------------------------------
4721: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
4722: IF p_event_id IS NULL THEN
4723: xla_exceptions_pkg.raise_message
4724: (p_appli_s_name => 'XLA'
4725: ,p_msg_name => 'XLA_COMMON_ERROR'
4726: ,p_token_1 => 'ERROR'
4727: ,p_value_1 => 'For MANUAL events event_id cannot be NULL'
4759: ,p_module =>l_log_module);
4760: END IF;
4761:
4762: IF g_entity_id IS NULL THEN
4763: xla_exceptions_pkg.raise_message
4764: (p_appli_s_name => 'XLA'
4765: ,p_msg_name => 'XLA_COMMON_ERROR'
4766: ,p_token_1 => 'ERROR'
4767: ,p_value_1 => 'No event exists for the document represented '||
4780: ,p_module =>l_log_module);
4781: END IF;
4782:
4783: EXCEPTION
4784: WHEN xla_exceptions_pkg.application_exception THEN
4785: RAISE;
4786: WHEN OTHERS THEN
4787: xla_exceptions_pkg.raise_message
4788: (p_location => 'xla_events_pkg.update_transaction_number');
4783: EXCEPTION
4784: WHEN xla_exceptions_pkg.application_exception THEN
4785: RAISE;
4786: WHEN OTHERS THEN
4787: xla_exceptions_pkg.raise_message
4788: (p_location => 'xla_events_pkg.update_transaction_number');
4789: END update_transaction_number;
4790:
4791: --============================================================================
4944: ,p_module =>l_log_module);
4945: END IF;
4946:
4947: IF g_entity_id IS NULL THEN
4948: xla_exceptions_pkg.raise_message
4949: (p_appli_s_name => 'XLA'
4950: ,p_msg_name => 'XLA_COMMON_ERROR'
4951: ,p_token_1 => 'ERROR'
4952: ,p_value_1 => 'No event exists for the document represented '||
4996: RETURN TRUE;
4997: END IF;
4998:
4999: EXCEPTION
5000: WHEN xla_exceptions_pkg.application_exception THEN
5001: RAISE;
5002: WHEN OTHERS THEN
5003: xla_exceptions_pkg.raise_message
5004: (p_location => 'xla_events_pkg.allow_third_party_update');
4999: EXCEPTION
5000: WHEN xla_exceptions_pkg.application_exception THEN
5001: RAISE;
5002: WHEN OTHERS THEN
5003: xla_exceptions_pkg.raise_message
5004: (p_location => 'xla_events_pkg.allow_third_party_update');
5005: END allow_third_party_update;
5006:
5007:
5146: -- Changed to fix bug # 2899700
5147: ----------------------------------------------------------------------------
5148: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
5149: IF p_event_id IS NULL THEN
5150: xla_exceptions_pkg.raise_message
5151: (p_appli_s_name => 'XLA'
5152: ,p_msg_name => 'XLA_COMMON_ERROR'
5153: ,p_token_1 => 'ERROR'
5154: ,p_value_1 => 'For MANUAL events event_id cannot be NULL'
5184: ,p_module =>l_log_module);
5185: END IF;
5186:
5187: IF g_entity_id IS NULL THEN
5188: xla_exceptions_pkg.raise_message
5189: (p_appli_s_name => 'XLA'
5190: ,p_msg_name => 'XLA_COMMON_ERROR'
5191: ,p_token_1 => 'ERROR'
5192: ,p_value_1 => 'No event exists for the document represented '||
5207: END IF;
5208:
5209: RETURN g_entity_id;
5210: EXCEPTION
5211: WHEN xla_exceptions_pkg.application_exception THEN
5212: RAISE;
5213: WHEN OTHERS THEN
5214: xla_exceptions_pkg.raise_message
5215: (p_location => 'xla_events_pkg.get_entity_id');
5210: EXCEPTION
5211: WHEN xla_exceptions_pkg.application_exception THEN
5212: RAISE;
5213: WHEN OTHERS THEN
5214: xla_exceptions_pkg.raise_message
5215: (p_location => 'xla_events_pkg.get_entity_id');
5216: END get_entity_id;
5217:
5218:
5408: ----------------------------------------------------------------------------
5409: -- This API cannot be called for manual events.
5410: ----------------------------------------------------------------------------
5411: IF p_entity_type_code = C_MANUAL_ENTITY THEN
5412: xla_exceptions_pkg.raise_message
5413: (p_appli_s_name => 'XLA'
5414: ,p_msg_name => 'XLA_COMMON_ERROR'
5415: ,p_token_1 => 'ERROR'
5416: ,p_value_1 => 'For MANUAL events this API cannot be called'
5465: open csr_xla_event_number;
5466: fetch csr_xla_event_number into l_last;
5467: if(csr_xla_event_number%FOUND) THEN
5468: close csr_xla_event_number;
5469: xla_exceptions_pkg.raise_message
5470: (p_appli_s_name => 'XLA'
5471: ,p_msg_name => 'XLA_COMMON_ERROR'
5472: ,p_token_1 => 'ERROR'
5473: ,p_value_1 =>
5514: open csr_parameter_mismatch(p_entity_type_code, p_application_id);
5515: fetch csr_parameter_mismatch into l_last;
5516: if(csr_parameter_mismatch%FOUND) THEN
5517: close csr_parameter_mismatch;
5518: xla_exceptions_pkg.raise_message
5519: (p_appli_s_name => 'XLA'
5520: ,p_msg_name => 'XLA_COMMON_ERROR'
5521: ,p_token_1 => 'ERROR'
5522: ,p_value_1 =>
5530: open csr_status_error;
5531: fetch csr_status_error into l_last;
5532: if(csr_status_error%FOUND) THEN
5533: close csr_status_error;
5534: xla_exceptions_pkg.raise_message
5535: (p_appli_s_name => 'XLA'
5536: ,p_msg_name => 'XLA_COMMON_ERROR'
5537: ,p_token_1 => 'ERROR'
5538: ,p_value_1 => 'Event status must be I, U or N'
5545: open csr_event_type_error(p_entity_type_code, p_application_id);
5546: fetch csr_event_type_error into l_last;
5547: if(csr_event_type_error%FOUND) THEN
5548: close csr_event_type_error;
5549: xla_exceptions_pkg.raise_message
5550: (p_appli_s_name => 'XLA'
5551: ,p_msg_name => 'XLA_COMMON_ERROR'
5552: ,p_token_1 => 'ERROR'
5553: ,p_value_1 => 'Event type must be a valid event type'
5556: return;
5557: end if;
5558: close csr_event_type_error;
5559:
5560: xla_exceptions_pkg.raise_message
5561: (p_appli_s_name => 'XLA'
5562: ,p_msg_name => 'XLA_COMMON_ERROR'
5563: ,p_token_1 => 'ERROR'
5564: ,p_value_1 =>
5931: ,p_module =>l_log_module);
5932: END IF;
5933:
5934: EXCEPTION
5935: WHEN xla_exceptions_pkg.application_exception THEN
5936: ROLLBACK to SAVEPOINT before_event_creation;
5937: RAISE;
5938: WHEN OTHERS THEN
5939: ROLLBACK to SAVEPOINT before_event_creation;
5936: ROLLBACK to SAVEPOINT before_event_creation;
5937: RAISE;
5938: WHEN OTHERS THEN
5939: ROLLBACK to SAVEPOINT before_event_creation;
5940: xla_exceptions_pkg.raise_message
5941: (p_location => 'xla_events_pkg.create_bulk_events(blk)');
5942: END create_bulk_events;
5943:
5944: --==================================================================
6014: ,p_module =>l_log_module);
6015: END IF;
6016:
6017: EXCEPTION
6018: WHEN xla_exceptions_pkg.application_exception THEN
6019: RAISE;
6020: WHEN OTHERS THEN
6021: xla_exceptions_pkg.raise_message
6022: (p_location => 'xla_events_pkg.create_bulk_events(blk)');
6017: EXCEPTION
6018: WHEN xla_exceptions_pkg.application_exception THEN
6019: RAISE;
6020: WHEN OTHERS THEN
6021: xla_exceptions_pkg.raise_message
6022: (p_location => 'xla_events_pkg.create_bulk_events(blk)');
6023: END create_bulk_events;
6024:
6025:
6182: open csr_invalid_app(p_application_id);
6183: fetch csr_invalid_app into l_temp;
6184: if(csr_invalid_app%FOUND) THEN
6185: close csr_invalid_app;
6186: xla_exceptions_pkg.raise_message
6187: (p_appli_s_name => 'XLA'
6188: ,p_msg_name => 'XLA_COMMON_ERROR'
6189: ,p_token_1 => 'ERROR'
6190: ,p_value_1 =>
6197: open csr_invalid_event_id(p_application_id);
6198: fetch csr_invalid_event_id into l_temp;
6199: if(csr_invalid_event_id%FOUND) THEN
6200: close csr_invalid_event_id;
6201: xla_exceptions_pkg.raise_message
6202: (p_appli_s_name => 'XLA'
6203: ,p_msg_name => 'XLA_COMMON_ERROR'
6204: ,p_token_1 => 'ERROR'
6205: ,p_value_1 => '(Application id, Event ID) is not valid'
6211: open csr_invalid_event_status(p_application_id);
6212: fetch csr_invalid_event_status into l_temp;
6213: if(csr_invalid_event_status%FOUND) THEN
6214: close csr_invalid_event_status;
6215: xla_exceptions_pkg.raise_message
6216: (p_appli_s_name => 'XLA'
6217: ,p_msg_name => 'XLA_COMMON_ERROR'
6218: ,p_token_1 => 'ERROR'
6219: ,p_value_1 =>
6223: end if;
6224: close csr_invalid_event_status;
6225:
6226: -- If reach here, must be entity code error
6227: xla_exceptions_pkg.raise_message
6228: (p_appli_s_name => 'XLA'
6229: ,p_msg_name => 'XLA_COMMON_ERROR'
6230: ,p_token_1 => 'ERROR'
6231: ,p_value_1 =>
6372: END IF;
6373:
6374: IF(NOT xla_balances_pkg.massive_update_for_events(p_application_id
6375: => p_application_id)) THEN
6376: xla_exceptions_pkg.raise_message
6377: (p_appli_s_name => 'XLA'
6378: ,p_msg_name => 'XLA_COMMON_ERROR'
6379: ,p_token_1 => 'ERROR'
6380: ,p_value_1 =>
6398: ,p_module =>l_log_module);
6399: END IF;
6400:
6401: EXCEPTION
6402: WHEN xla_exceptions_pkg.application_exception THEN
6403: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6404: RAISE;
6405: WHEN OTHERS THEN
6406: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6403: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6404: RAISE;
6405: WHEN OTHERS THEN
6406: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6407: xla_exceptions_pkg.raise_message
6408: (p_location => 'xla_events_pkg.update_bulk_event_statuses(blk)');
6409: END update_bulk_event_statuses;
6410:
6411:
6429:
6430: update_bulk_event_statuses(p_application_id=>p_application_id);
6431:
6432: EXCEPTION
6433: WHEN xla_exceptions_pkg.application_exception THEN
6434: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6435: RAISE;
6436: WHEN OTHERS THEN
6437: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6434: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6435: RAISE;
6436: WHEN OTHERS THEN
6437: ROLLBACK to SAVEPOINT before_update_bulk_statuses;
6438: xla_exceptions_pkg.raise_message
6439: (p_location => 'xla_events_pkg.update_bulk_event_statuses(blk)');
6440: END update_bulk_event_statuses;
6441:
6442:
6564: open csr_invalid_app(p_application_id);
6565: fetch csr_invalid_app into l_temp;
6566: if(csr_invalid_app%FOUND) THEN
6567: close csr_invalid_app;
6568: xla_exceptions_pkg.raise_message
6569: (p_appli_s_name => 'XLA'
6570: ,p_msg_name => 'XLA_COMMON_ERROR'
6571: ,p_token_1 => 'ERROR'
6572: ,p_value_1 =>
6579: open csr_invalid_event_id(p_application_id);
6580: fetch csr_invalid_event_id into l_temp;
6581: if(csr_invalid_event_id%FOUND) THEN
6582: close csr_invalid_event_id;
6583: xla_exceptions_pkg.raise_message
6584: (p_appli_s_name => 'XLA'
6585: ,p_msg_name => 'XLA_COMMON_ERROR'
6586: ,p_token_1 => 'ERROR'
6587: ,p_value_1 => '(Application id, Event ID) is not valid'
6593: open csr_invalid_event_status(p_application_id);
6594: fetch csr_invalid_event_status into l_temp;
6595: if(csr_invalid_event_status%FOUND) THEN
6596: close csr_invalid_event_status;
6597: xla_exceptions_pkg.raise_message
6598: (p_appli_s_name => 'XLA'
6599: ,p_msg_name => 'XLA_COMMON_ERROR'
6600: ,p_token_1 => 'ERROR'
6601: ,p_value_1 =>
6605: end if;
6606: close csr_invalid_event_status;
6607:
6608: -- if reach here, it must be entity code problem
6609: xla_exceptions_pkg.raise_message
6610: (p_appli_s_name => 'XLA'
6611: ,p_msg_name => 'XLA_COMMON_ERROR'
6612: ,p_token_1 => 'ERROR'
6613: ,p_value_1 =>
6648: END IF;
6649:
6650: IF(NOT xla_balances_pkg.massive_update_for_events(p_application_id
6651: => p_application_id)) THEN
6652: xla_exceptions_pkg.raise_message
6653: (p_appli_s_name => 'XLA'
6654: ,p_msg_name => 'XLA_COMMON_ERROR'
6655: ,p_token_1 => 'ERROR'
6656: ,p_value_1 =>
6744: ,p_module =>l_log_module);
6745: END IF;
6746:
6747: EXCEPTION
6748: WHEN xla_exceptions_pkg.application_exception THEN
6749: ROLLBACK to SAVEPOINT before_delete_bulk_events;--Bug 10162587
6750: RAISE;
6751: WHEN OTHERS THEN
6752: ROLLBACK to SAVEPOINT before_delete_bulk_events;--Bug 10162587
6749: ROLLBACK to SAVEPOINT before_delete_bulk_events;--Bug 10162587
6750: RAISE;
6751: WHEN OTHERS THEN
6752: ROLLBACK to SAVEPOINT before_delete_bulk_events;--Bug 10162587
6753: xla_exceptions_pkg.raise_message
6754: (p_location => 'xla_events_pkg.delete_bulk_events(blk)');
6755: END delete_bulk_events;
6756:
6757: --=============================================================================
6941: ----------------------------------------------------------------------------
6942: xla_security_pkg.set_security_context(p_event_source_info.application_id);
6943:
6944: IF p_event_source_info.entity_type_code = C_MANUAL_ENTITY THEN
6945: xla_exceptions_pkg.raise_message
6946: (p_appli_s_name => 'XLA'
6947: ,p_msg_name => 'XLA_COMMON_ERROR'
6948: ,p_token_1 => 'ERROR'
6949: ,p_value_1 => 'For MANUAL events this API cannot be called'
6985: ,p_module =>l_log_module);
6986: END IF;
6987:
6988: IF g_entity_id IS NULL THEN
6989: xla_exceptions_pkg.raise_message
6990: (p_appli_s_name => 'XLA'
6991: ,p_msg_name => 'XLA_COMMON_ERROR'
6992: ,p_token_1 => 'ERROR'
6993: ,p_value_1 => 'No event exists for the document represented '||
7031: END IF;
7032:
7033: RETURN (l_array_event_info);
7034: EXCEPTION
7035: WHEN xla_exceptions_pkg.application_exception THEN
7036: RAISE;
7037: WHEN OTHERS THEN
7038: xla_exceptions_pkg.raise_message
7039: (p_location => 'xla_events_pkg.get_array_event_info (fn)');
7034: EXCEPTION
7035: WHEN xla_exceptions_pkg.application_exception THEN
7036: RAISE;
7037: WHEN OTHERS THEN
7038: xla_exceptions_pkg.raise_message
7039: (p_location => 'xla_events_pkg.get_array_event_info (fn)');
7040: END get_array_event_info;
7041:
7042:
7113: ,p_module =>l_log_module);
7114: END IF;
7115:
7116: EXCEPTION
7117: WHEN xla_exceptions_pkg.application_exception THEN
7118: RAISE;
7119: WHEN OTHERS THEN
7120: xla_exceptions_pkg.raise_message
7121: (p_location => 'xla_events_pkg.initialize');
7116: EXCEPTION
7117: WHEN xla_exceptions_pkg.application_exception THEN
7118: RAISE;
7119: WHEN OTHERS THEN
7120: xla_exceptions_pkg.raise_message
7121: (p_location => 'xla_events_pkg.initialize');
7122: END initialize;
7123:
7124:
7250: END IF;
7251: RETURN FALSE;
7252: END IF;
7253: EXCEPTION
7254: WHEN xla_exceptions_pkg.application_exception THEN
7255: RAISE;
7256: WHEN OTHERS THEN
7257: xla_exceptions_pkg.raise_message
7258: (p_location => 'xla_events_pkg.source_info_changed');
7253: EXCEPTION
7254: WHEN xla_exceptions_pkg.application_exception THEN
7255: RAISE;
7256: WHEN OTHERS THEN
7257: xla_exceptions_pkg.raise_message
7258: (p_location => 'xla_events_pkg.source_info_changed');
7259: END;
7260:
7261:
7281: ,p_module =>l_log_module);
7282: END IF;
7283:
7284: IF p_application_id IS NULL THEN
7285: xla_exceptions_pkg.raise_message
7286: (p_appli_s_name => 'XLA'
7287: ,p_msg_name => 'XLA_COMMON_ERROR'
7288: ,p_token_1 => 'ERROR'
7289: ,p_value_1 =>
7292: ,p_value_2 => 'xla_events_pkg.validate_context');
7293: END IF;
7294:
7295: IF p_ledger_id IS NULL THEN
7296: xla_exceptions_pkg.raise_message
7297: (p_appli_s_name => 'XLA'
7298: ,p_msg_name => 'XLA_COMMON_ERROR'
7299: ,p_token_1 => 'ERROR'
7300: ,p_value_1 =>
7311:
7312: END IF;
7313:
7314: IF p_entity_type_code IS NULL THEN
7315: xla_exceptions_pkg.raise_message
7316: (p_appli_s_name => 'XLA'
7317: ,p_msg_name => 'XLA_COMMON_ERROR'
7318: ,p_token_1 => 'ERROR'
7319: ,p_value_1 =>
7328: ,p_module =>l_log_module);
7329: END IF;
7330:
7331: EXCEPTION
7332: WHEN xla_exceptions_pkg.application_exception THEN
7333: RAISE;
7334: WHEN OTHERS THEN
7335: xla_exceptions_pkg.raise_message
7336: (p_location => 'xla_events_pkg.validate_context');
7331: EXCEPTION
7332: WHEN xla_exceptions_pkg.application_exception THEN
7333: RAISE;
7334: WHEN OTHERS THEN
7335: xla_exceptions_pkg.raise_message
7336: (p_location => 'xla_events_pkg.validate_context');
7337: END validate_context;
7338:
7339:
7410: END IF;
7411: END IF;
7412:
7413: IF l_error THEN
7414: xla_exceptions_pkg.raise_message
7415: (p_appli_s_name => 'XLA'
7416: ,p_msg_name => 'XLA_COMMON_ERROR'
7417: ,p_token_1 => 'ERROR'
7418: ,p_value_1 => 'The setup for Entity Type, '||
7499: END IF;
7500:
7501: RETURN l_mapping;
7502: EXCEPTION
7503: WHEN xla_exceptions_pkg.application_exception THEN
7504: RAISE;
7505: WHEN OTHERS THEN
7506: xla_exceptions_pkg.raise_message
7507: (p_location => 'xla_events_pkg.get_id_mapping');
7502: EXCEPTION
7503: WHEN xla_exceptions_pkg.application_exception THEN
7504: RAISE;
7505: WHEN OTHERS THEN
7506: xla_exceptions_pkg.raise_message
7507: (p_location => 'xla_events_pkg.get_id_mapping');
7508: END;
7509:
7510:
7754: END IF;
7755: END IF;
7756:
7757: IF l_error THEN
7758: xla_exceptions_pkg.raise_message
7759: (p_appli_s_name => 'XLA'
7760: ,p_msg_name => 'XLA_COMMON_ERROR'
7761: ,p_token_1 => 'ERROR'
7762: ,p_value_1 =>
7794: ,p_module =>l_log_module);
7795: END IF;
7796:
7797: IF g_application_id IS NULL THEN
7798: xla_exceptions_pkg.raise_message
7799: (p_appli_s_name => 'XLA'
7800: ,p_msg_name => 'XLA_COMMON_ERROR'
7801: ,p_token_1 => 'ERROR'
7802: ,p_value_1 =>
7808: --
7809: -- Validate that the entity type code tables have been loaded
7810: --
7811: IF g_entity_type_code_tbl.FIRST IS NULL THEN
7812: xla_exceptions_pkg.raise_message
7813: (p_appli_s_name => 'XLA'
7814: ,p_msg_name => 'XLA_COMMON_ERROR'
7815: ,p_token_1 => 'ERROR'
7816: ,p_value_1 =>
7823: --
7824: -- Validate that the event class tables have been loaded
7825: --
7826: IF g_event_class_code_tbl.FIRST IS NULL THEN
7827: xla_exceptions_pkg.raise_message
7828: (p_appli_s_name => 'XLA'
7829: ,p_msg_name => 'XLA_COMMON_ERROR'
7830: ,p_token_1 => 'ERROR'
7831: ,p_value_1 =>
7838: --
7839: -- Validate that the event type code tables have been loaded
7840: --
7841: IF g_event_type_code_tbl.FIRST IS NULL THEN
7842: xla_exceptions_pkg.raise_message
7843: (p_appli_s_name => 'XLA'
7844: ,p_msg_name => 'XLA_COMMON_ERROR'
7845: ,p_token_1 => 'ERROR'
7846: ,p_value_1 =>
7975: ,p_level => C_LEVEL_PROCEDURE
7976: ,p_module =>l_log_module);
7977: END IF;
7978: EXCEPTION
7979: WHEN xla_exceptions_pkg.application_exception THEN
7980: RAISE;
7981: WHEN OTHERS THEN
7982: xla_exceptions_pkg.raise_message
7983: (p_location => 'xla_events_pkg.cache_application_setup');
7978: EXCEPTION
7979: WHEN xla_exceptions_pkg.application_exception THEN
7980: RAISE;
7981: WHEN OTHERS THEN
7982: xla_exceptions_pkg.raise_message
7983: (p_location => 'xla_events_pkg.cache_application_setup');
7984: END cache_application_setup;
7985:
7986:
8015: g_id_mapping := g_entity_type_code_tbl(p_entity_type_code).id_mapping;
8016: ELSIF (l_enabled_flag = C_YES) THEN
8017: g_id_mapping := g_entity_type_code_tbl(p_entity_type_code).id_mapping;
8018: ELSIF (l_enabled_flag <> C_YES) THEN
8019: xla_exceptions_pkg.raise_message
8020: (p_appli_s_name => 'XLA'
8021: ,p_msg_name => 'XLA_COMMON_ERROR'
8022: ,p_token_1 => 'ERROR'
8023: ,p_value_1 =>
8034: END IF;
8035:
8036: EXCEPTION
8037: WHEN NO_DATA_FOUND THEN
8038: xla_exceptions_pkg.raise_message
8039: (p_appli_s_name => 'XLA'
8040: ,p_msg_name => 'XLA_COMMON_ERROR'
8041: ,p_token_1 => 'ERROR'
8042: ,p_value_1 => p_entity_type_code||
8042: ,p_value_1 => p_entity_type_code||
8043: ' is not a defined entity type for the application '||g_application_id
8044: ,p_token_2 => 'LOCATION'
8045: ,p_value_2 => 'xla_events_pkg.validate_entity_type_code');
8046: WHEN xla_exceptions_pkg.application_exception THEN
8047: RAISE;
8048: WHEN OTHERS THEN
8049: xla_exceptions_pkg.raise_message
8050: (p_location => 'xla_events_pkg.validate_entity_type_code');
8045: ,p_value_2 => 'xla_events_pkg.validate_entity_type_code');
8046: WHEN xla_exceptions_pkg.application_exception THEN
8047: RAISE;
8048: WHEN OTHERS THEN
8049: xla_exceptions_pkg.raise_message
8050: (p_location => 'xla_events_pkg.validate_entity_type_code');
8051: END validate_entity_type_code;
8052:
8053:
8081: IF (((g_action = C_EVENT_CREATE) OR (g_action = C_EVENT_UPDATE)) AND
8082: (l_enabled_flag <> C_YES)
8083: )
8084: THEN
8085: xla_exceptions_pkg.raise_message
8086: (p_appli_s_name => 'XLA'
8087: ,p_msg_name => 'XLA_COMMON_ERROR'
8088: ,p_token_1 => 'ERROR'
8089: ,p_value_1 =>
8092: ,p_value_2 => 'xla_events_pkg.validate_event_class_code');
8093: END IF;
8094:
8095: IF p_entity_type_code <> l_entity_code THEN
8096: xla_exceptions_pkg.raise_message
8097: (p_appli_s_name => 'XLA'
8098: ,p_msg_name => 'XLA_COMMON_ERROR'
8099: ,p_token_1 => 'ERROR'
8100: ,p_value_1 => 'Event class '||p_event_class_code||
8111: ,p_module =>l_log_module);
8112: END IF;
8113: EXCEPTION
8114: WHEN NO_DATA_FOUND THEN
8115: xla_exceptions_pkg.raise_message
8116: (p_appli_s_name => 'XLA'
8117: ,p_msg_name => 'XLA_COMMON_ERROR'
8118: ,p_token_1 => 'ERROR'
8119: ,p_value_1 => p_event_class_code||
8119: ,p_value_1 => p_event_class_code||
8120: ' is not a defined event class for the application '||g_application_id
8121: ,p_token_2 => 'LOCATION'
8122: ,p_value_2 => 'xla_events_pkg.validate_event_class_code');
8123: WHEN xla_exceptions_pkg.application_exception THEN
8124: RAISE;
8125: WHEN OTHERS THEN
8126: xla_exceptions_pkg.raise_message
8127: (p_location => 'xla_events_pkg.validate_event_class_code');
8122: ,p_value_2 => 'xla_events_pkg.validate_event_class_code');
8123: WHEN xla_exceptions_pkg.application_exception THEN
8124: RAISE;
8125: WHEN OTHERS THEN
8126: xla_exceptions_pkg.raise_message
8127: (p_location => 'xla_events_pkg.validate_event_class_code');
8128: END validate_event_class_code;
8129:
8130:
8162: IF (((g_action = C_EVENT_CREATE) OR (g_action = C_EVENT_UPDATE)) AND
8163: (l_enabled_flag <> C_YES)
8164: )
8165: THEN
8166: xla_exceptions_pkg.raise_message
8167: (p_appli_s_name => 'XLA'
8168: ,p_msg_name => 'XLA_COMMON_ERROR'
8169: ,p_token_1 => 'ERROR'
8170: ,p_value_1 =>
8176: IF ((p_entity_type_code <> l_entity_code) OR
8177: (NVL(p_event_class_code,l_event_class_code) <> l_event_class_code)
8178: )
8179: THEN
8180: xla_exceptions_pkg.raise_message
8181: (p_appli_s_name => 'XLA'
8182: ,p_msg_name => 'XLA_COMMON_ERROR'
8183: ,p_token_1 => 'ERROR'
8184: ,p_value_1 => 'Event type '||p_event_type_code||
8198:
8199: trace('< xla_events_pkg.validate_event_type_code' , 20);
8200: EXCEPTION
8201: WHEN NO_DATA_FOUND THEN
8202: xla_exceptions_pkg.raise_message
8203: (p_appli_s_name => 'XLA'
8204: ,p_msg_name => 'XLA_COMMON_ERROR'
8205: ,p_token_1 => 'ERROR'
8206: ,p_value_1 => p_event_type_code||
8206: ,p_value_1 => p_event_type_code||
8207: ' is not a defined event type for the application '||g_application_id
8208: ,p_token_2 => 'LOCATION'
8209: ,p_value_2 => 'xla_events_pkg.validate_event_type_code');
8210: WHEN xla_exceptions_pkg.application_exception THEN
8211: RAISE;
8212: WHEN OTHERS THEN
8213: xla_exceptions_pkg.raise_message
8214: (p_location => 'xla_events_pkg.validate_event_type_code');
8209: ,p_value_2 => 'xla_events_pkg.validate_event_type_code');
8210: WHEN xla_exceptions_pkg.application_exception THEN
8211: RAISE;
8212: WHEN OTHERS THEN
8213: xla_exceptions_pkg.raise_message
8214: (p_location => 'xla_events_pkg.validate_event_type_code');
8215: END validate_event_type_code;
8216:
8217: --=============================================================================
8247: END IF;
8248: END LOOP;
8249:
8250: IF NOT l_found THEN
8251: xla_exceptions_pkg.raise_message
8252: (p_appli_s_name => 'XLA'
8253: ,p_msg_name => 'XLA_COMMON_ERROR'
8254: ,p_token_1 => 'ERROR'
8255: ,p_value_1 => 'Event Status Code cannot have a '||
8271: END IF;
8272: END LOOP;
8273:
8274: IF NOT l_found THEN
8275: xla_exceptions_pkg.raise_message
8276: (p_appli_s_name => 'XLA'
8277: ,p_msg_name => 'XLA_COMMON_ERROR'
8278: ,p_token_1 => 'ERROR'
8279: ,p_value_1 => 'Process Status Code cannot have a '||
8291: -------------------------------------------------------------------------
8292: -- for regular events
8293: -------------------------------------------------------------------------
8294: IF p_process_status_code <> C_INTERNAL_UNPROCESSED THEN
8295: xla_exceptions_pkg.raise_message
8296: (p_appli_s_name => 'XLA'
8297: ,p_msg_name => 'XLA_COMMON_ERROR'
8298: ,p_token_1 => 'ERROR'
8299: ,p_value_1 => 'Process Status Code has an invalid value. '||
8302: ,p_value_2 => 'xla_events_pkg.validate_status_code');
8303: END IF;
8304:
8305: IF p_event_status_code = xla_events_pub_pkg.C_EVENT_PROCESSED THEN
8306: xla_exceptions_pkg.raise_message
8307: (p_appli_s_name => 'XLA'
8308: ,p_msg_name => 'XLA_COMMON_ERROR'
8309: ,p_token_1 => 'ERROR'
8310: ,p_value_1 => 'Event Status Code has an invalid value. '||
8319: -------------------------------------------------------------------------
8320:
8321: IF (p_process_status_code = C_INTERNAL_FINAL) THEN
8322: IF (p_event_status_code <> xla_events_pub_pkg.C_EVENT_PROCESSED) THEN
8323: xla_exceptions_pkg.raise_message
8324: (p_appli_s_name => 'XLA'
8325: ,p_msg_name => 'XLA_COMMON_ERROR'
8326: ,p_token_1 => 'ERROR'
8327: ,p_value_1 => 'The following combination is invalid: '||
8332: ,p_value_2 => 'xla_events_pkg.validate_status_code');
8333: END IF;
8334: ELSIF (p_process_status_code = C_INTERNAL_DRAFT) THEN
8335: IF (p_event_status_code <> xla_events_pub_pkg.C_EVENT_UNPROCESSED) THEN
8336: xla_exceptions_pkg.raise_message
8337: (p_appli_s_name => 'XLA'
8338: ,p_msg_name => 'XLA_COMMON_ERROR'
8339: ,p_token_1 => 'ERROR'
8340: ,p_value_1 => 'The following combination is invalid: '||
8345: ,p_value_2 => 'xla_events_pkg.validate_status_code');
8346: END IF;
8347: ELSIF (p_process_status_code = C_INTERNAL_UNPROCESSED) THEN
8348: IF (p_event_status_code = xla_events_pub_pkg.C_EVENT_PROCESSED) THEN
8349: xla_exceptions_pkg.raise_message
8350: (p_appli_s_name => 'XLA'
8351: ,p_msg_name => 'XLA_COMMON_ERROR'
8352: ,p_token_1 => 'ERROR'
8353: ,p_value_1 => 'The following combination is invalid: '||
8357: ,p_token_2 => 'LOCATION'
8358: ,p_value_2 => 'xla_events_pkg.validate_status_code');
8359: END IF;
8360: ELSE
8361: xla_exceptions_pkg.raise_message
8362: (p_appli_s_name => 'XLA'
8363: ,p_msg_name => 'XLA_COMMON_ERROR'
8364: ,p_token_1 => 'ERROR'
8365: ,p_value_1 => 'The following combination is invalid: '||
8377: ,p_level => C_LEVEL_PROCEDURE
8378: ,p_module =>l_log_module);
8379: END IF;
8380: EXCEPTION
8381: WHEN xla_exceptions_pkg.application_exception THEN
8382: RAISE;
8383: WHEN OTHERS THEN
8384: xla_exceptions_pkg.raise_message
8385: (p_location => 'xla_events_pkg.validate_status_code');
8380: EXCEPTION
8381: WHEN xla_exceptions_pkg.application_exception THEN
8382: RAISE;
8383: WHEN OTHERS THEN
8384: xla_exceptions_pkg.raise_message
8385: (p_location => 'xla_events_pkg.validate_status_code');
8386: END validate_status_code;
8387:
8388:
8487: ,p_module =>l_log_module);
8488: END IF;
8489:
8490: EXCEPTION
8491: WHEN xla_exceptions_pkg.application_exception THEN
8492: RAISE;
8493: WHEN OTHERS THEN
8494: xla_exceptions_pkg.raise_message
8495: (p_location => 'xla_events_pkg.validate_params');
8490: EXCEPTION
8491: WHEN xla_exceptions_pkg.application_exception THEN
8492: RAISE;
8493: WHEN OTHERS THEN
8494: xla_exceptions_pkg.raise_message
8495: (p_location => 'xla_events_pkg.validate_params');
8496: END validate_params;
8497:
8498:
8534: IF g_ledger_status_tbl.exists(p_ledger_id) THEN
8535: IF g_ledger_status_tbl(p_ledger_id) = 'Y' THEN
8536: NULL;
8537: ELSE
8538: xla_exceptions_pkg.raise_message
8539: (p_appli_s_name => 'XLA'
8540: ,p_msg_name => 'XLA_COMMON_ERROR'
8541: ,p_token_1 => 'ERROR'
8542: ,p_value_1 =>
8556: WHERE ledger_id = p_ledger_id
8557: AND application_id = p_application_id;
8558: EXCEPTION
8559: WHEN NO_DATA_FOUND THEN
8560: xla_exceptions_pkg.raise_message
8561: (p_appli_s_name => 'XLA'
8562: ,p_msg_name => 'XLA_SU_MISSING_SETUP'
8563: ,p_token_1 => 'LEDGER_NAME'
8564: ,p_value_1 => l_ledger_name
8574: ,p_module =>l_log_module);
8575: END IF;
8576:
8577: EXCEPTION
8578: WHEN xla_exceptions_pkg.application_exception THEN
8579: RAISE;
8580: WHEN OTHERS THEN
8581: xla_exceptions_pkg.raise_message
8582: (p_location => 'xla_events_pkg.validate_ledger');
8577: EXCEPTION
8578: WHEN xla_exceptions_pkg.application_exception THEN
8579: RAISE;
8580: WHEN OTHERS THEN
8581: xla_exceptions_pkg.raise_message
8582: (p_location => 'xla_events_pkg.validate_ledger');
8583: END validate_ledger;
8584:
8585:
9004: ,p_module =>l_log_module);
9005: END IF;
9006:
9007: EXCEPTION
9008: WHEN xla_exceptions_pkg.application_exception THEN
9009: IF c1%ISOPEN THEN
9010: CLOSE c1;
9011: END IF;
9012: IF c2%ISOPEN THEN
9025: END IF;
9026: IF c4%ISOPEN THEN -- Added bug 10649546
9027: CLOSE c4;
9028: END IF; -- end bug 10649546
9029: xla_exceptions_pkg.raise_message
9030: (p_location => 'xla_events_pkg.cache_entity_info');
9031: END cache_entity_info;
9032:
9033:
9156:
9157: return l_return_id;
9158:
9159: EXCEPTION
9160: WHEN xla_exceptions_pkg.application_exception THEN
9161: RAISE;
9162: WHEN OTHERS THEN
9163: xla_exceptions_pkg.raise_message
9164: (p_location => 'xla_events_pkg.create_entity_event');
9159: EXCEPTION
9160: WHEN xla_exceptions_pkg.application_exception THEN
9161: RAISE;
9162: WHEN OTHERS THEN
9163: xla_exceptions_pkg.raise_message
9164: (p_location => 'xla_events_pkg.create_entity_event');
9165: END create_entity_event;
9166:
9167:
9197: ,p_module =>l_log_module);
9198: END IF;
9199:
9200: EXCEPTION
9201: WHEN xla_exceptions_pkg.application_exception THEN
9202: RAISE;
9203: WHEN OTHERS THEN
9204: xla_exceptions_pkg.raise_message
9205: (p_location => 'xla_events_pkg.update_entity_trx_number');
9200: EXCEPTION
9201: WHEN xla_exceptions_pkg.application_exception THEN
9202: RAISE;
9203: WHEN OTHERS THEN
9204: xla_exceptions_pkg.raise_message
9205: (p_location => 'xla_events_pkg.update_entity_trx_number');
9206: END update_entity_trx_number;
9207:
9208: --=============================================================================
9376: ,p_module =>l_log_module);
9377: END IF;
9378: RETURN l_event_id;
9379: EXCEPTION
9380: WHEN xla_exceptions_pkg.application_exception THEN
9381: RAISE;
9382: WHEN OTHERS THEN
9383: xla_exceptions_pkg.raise_message
9384: (p_location => 'xla_events_pkg.add_event (fn)');
9379: EXCEPTION
9380: WHEN xla_exceptions_pkg.application_exception THEN
9381: RAISE;
9382: WHEN OTHERS THEN
9383: xla_exceptions_pkg.raise_message
9384: (p_location => 'xla_events_pkg.add_event (fn)');
9385: END add_entity_event;
9386:
9387:
9436: ,p_module =>l_log_module);
9437: END IF;
9438:
9439: EXCEPTION
9440: WHEN xla_exceptions_pkg.application_exception THEN
9441: RAISE;
9442: WHEN OTHERS THEN
9443: xla_exceptions_pkg.raise_message
9444: (p_location => 'xla_events_pkg.reset_cache');
9439: EXCEPTION
9440: WHEN xla_exceptions_pkg.application_exception THEN
9441: RAISE;
9442: WHEN OTHERS THEN
9443: xla_exceptions_pkg.raise_message
9444: (p_location => 'xla_events_pkg.reset_cache');
9445: END reset_cache;
9446:
9447:
9472: ,p_level => C_LEVEL_PROCEDURE
9473: ,p_module =>l_log_module);
9474: END IF;
9475: EXCEPTION
9476: WHEN xla_exceptions_pkg.application_exception THEN
9477: RAISE;
9478: WHEN OTHERS THEN
9479: xla_exceptions_pkg.raise_message
9480: (p_location => 'xla_events_pkg.set_context');
9475: EXCEPTION
9476: WHEN xla_exceptions_pkg.application_exception THEN
9477: RAISE;
9478: WHEN OTHERS THEN
9479: xla_exceptions_pkg.raise_message
9480: (p_location => 'xla_events_pkg.set_context');
9481: END set_context;
9482:
9483:
9724: ,p_level => C_LEVEL_PROCEDURE
9725: ,p_module => l_log_module);
9726: END IF;
9727: EXCEPTION
9728: WHEN xla_exceptions_pkg.application_exception THEN
9729: RAISE;
9730: WHEN OTHERS THEN
9731: xla_exceptions_pkg.raise_message
9732: (p_location => 'xla_events_pkg.delete_je');
9727: EXCEPTION
9728: WHEN xla_exceptions_pkg.application_exception THEN
9729: RAISE;
9730: WHEN OTHERS THEN
9731: xla_exceptions_pkg.raise_message
9732: (p_location => 'xla_events_pkg.delete_je');
9733: END delete_je;
9734:
9735:
9867:
9868: commit; -- commit is mandatory after fnd_request.submit_request
9869:
9870: IF l_request_id = 0 THEN
9871: xla_exceptions_pkg.raise_message
9872: (p_appli_s_name => 'XLA'
9873: ,p_msg_name => 'XLA_REP_TECHNICAL_ERROR'
9874: ,p_token_1 => 'APPLICATION_NAME'
9875: ,p_value_1 => 'SLA');
9894:
9895: RETURN 'SUCCESS'; -- No Notification.
9896:
9897: EXCEPTION
9898: WHEN XLA_EXCEPTIONS_PKG.application_exception THEN
9899: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
9900: trace('End of function Period Close with error', C_LEVEL_STATEMENT,
9901: l_log_module);
9902: END IF;