1: PACKAGE BODY ar_mo_cache_utils AS
2: /*$Header: ARMOCSHB.pls 120.21.12020000.2 2012/07/10 00:13:52 dgaurab ship $ */
3: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
4:
5: -- Bug 3251839 - tm_installed and tm_default_setup functions provide a
8: FUNCTION tm_installed ( p_org_id IN NUMBER DEFAULT NULL )
9: RETURN VARCHAR2 IS
10: BEGIN
11: IF PG_DEBUG in ('Y', 'C') THEN
12: arp_util.debug('ar_mo_cache_utils.tm_installed()');
13: END IF;
14:
15: IF ozf_claim_install.check_installed ( p_org_id ) THEN
16: RETURN 'Y';
19: END IF;
20: EXCEPTION
21: WHEN OTHERS THEN
22: IF PG_DEBUG in ('Y', 'C') THEN
23: arp_util.debug('EXCEPTION: problem calling ozf_claim_install.check_installed - ar_mo_cache_utils.tm_installed');
24: END IF;
25: APP_EXCEPTION.raise_exception;
26: END;
27:
28: FUNCTION tm_default_setup ( p_org_id IN NUMBER DEFAULT NULL )
29: RETURN VARCHAR2 IS
30: BEGIN
31: IF PG_DEBUG in ('Y', 'C') THEN
32: arp_util.debug('ar_mo_cache_utils.tm_default_setup()');
33: END IF;
34:
35: IF ozf_claim_install.check_default_setup ( p_org_id ) THEN
36: RETURN 'Y';
39: END IF;
40: EXCEPTION
41: WHEN OTHERS THEN
42: IF PG_DEBUG in ('Y', 'C') THEN
43: arp_util.debug('EXCEPTION: problem calling ozf_claim_install.check_default_setup - ar_mo_cache_utils.tm_default_setup');
44: END IF;
45: APP_EXCEPTION.raise_exception;
46: END;
47:
59: WHERE sp.org_id = nvl(c_org_id , sp.org_id);
60:
61: BEGIN
62: IF PG_DEBUG in ('Y', 'C') THEN
63: arp_util.debug('ar_mo_cache_utils.retrieve_globals()+');
64: END IF;
65:
66: /* ---------------------------------------------------------------
67: This statement fetches operating unit attributes from the
748: and zxpo.org_id (+) = sp.org_id;
749: end if;
750:
751: IF PG_DEBUG in ('Y', 'C') THEN
752: arp_util.debug('ar_mo_cache_utils.retrieve_globals()-');
753: END IF;
754:
755: EXCEPTION
756: when no_data_found then
774: where sob.set_of_books_id = REC.set_of_books_id
775: and org_id = REC.org_id;
776: exception when no_data_found then
777: IF PG_DEBUG in ('Y', 'C') THEN
778: arp_util.debug('EXCEPTION: NO_DATA_FOUND IN SET OF BOOKS - ar_mo_cache_utils.retrieve_globals' );
779: END IF;
780: FND_MESSAGE.set_name('AR','AR_NO_ROW_IN_GL_SET_OF_BOOKS');
781: APP_EXCEPTION.raise_exception;
782: RAISE;
792: and sob.currency_code = c.currency_code;
793:
794: exception when no_data_found then
795: IF PG_DEBUG in ('Y', 'C') THEN
796: arp_util.debug('EXCEPTION: NO_DATA_FOUND IN CURRENCIES - ar_mo_cache_utils.retrieve_globals' );
797: END IF;
798: FND_MESSAGE.set_name('AR','AR_NO_ROW_IN_FND_CURRENCIES');
799: APP_EXCEPTION.raise_exception;
800: RAISE; --end of WHEN NO DATA FOUND
809:
810: IF l_exp_flag ='N' THEN
811: IF PG_DEBUG in ('Y', 'C') THEN
812: arp_util.debug('retrieve_globals: ' || 'EXCEPTION: NO_DATA_FOUND IN SYSTEM PARAMETERS
813: - ar_mo_cache_utils.retrieve_globals' );
814: END IF;
815: FND_MESSAGE.set_name('AR','AR_NO_ROW_IN_SYSTEM_PARAMETERS');
816: APP_EXCEPTION.raise_exception;
817: RAISE;
858: WHEN others THEN Raise;
859:
860: END set_org_context_in_api;
861:
862: END ar_mo_cache_utils;