16: -- HISTORY :
17: --
18: -- 30-OCT-02 ftanudja o Created
19: -- 31-MAR-05 piagrawa o Modified the function to make a call to
20: -- is_multi_org_enabled of mo_globals if MOAC is
21: -- enabled.
22: --------------------------------------------------------------------------------
23: FUNCTION get_multi_org_flag RETURN VARCHAR2
24: IS
29: FROM fnd_product_groups;
30:
31: BEGIN
32: IF pn_mo_cache_utils.is_MOAC_enabled THEN
33: l_result := mo_global.is_multi_org_enabled;
34: ELSE
35: FOR cur IN flag LOOP
36: l_result := cur.multi_org_flag;
37: END LOOP;
51: -- HISTORY :
52: --
53: -- 30-OCT-02 ftanudja o Created
54: -- 31-MAR-05 piagrawa o Modified the function to make a call to
55: -- check_access of mo_globals if MOAC is enabled
56: --------------------------------------------------------------------------------
57: FUNCTION check_access(p_org_id NUMBER) RETURN VARCHAR2
58: IS
59: l_result VARCHAR2(1) := 'N';
58: IS
59: l_result VARCHAR2(1) := 'N';
60: BEGIN
61: IF pn_mo_cache_utils.is_MOAC_enabled THEN
62: l_result := mo_global.check_access(p_org_id);
63: ELSE
64: IF TO_NUMBER(fnd_profile.value('ORG_ID')) = p_org_id THEN
65: l_result := 'Y';
66: ELSE
72:
73: --------------------------------------------------------------------------------
74: -- NAME : check_valid_org
75: -- DESCRIPTION : Checks if an operating unit is valid for a responsibility.
76: -- PURPOSE : Wrapper on mo_global.check_valid_org - calls
77: -- mo_global.check_valid_org if MOAC is enabled.
78: -- INVOKED FROM : form libraries.
79: -- ARGUMENTS : NONE
80: -- RETURN : Returns 'Y' OR 'N'
73: --------------------------------------------------------------------------------
74: -- NAME : check_valid_org
75: -- DESCRIPTION : Checks if an operating unit is valid for a responsibility.
76: -- PURPOSE : Wrapper on mo_global.check_valid_org - calls
77: -- mo_global.check_valid_org if MOAC is enabled.
78: -- INVOKED FROM : form libraries.
79: -- ARGUMENTS : NONE
80: -- RETURN : Returns 'Y' OR 'N'
81: -- REFERENCE : PN_COMMON.debug()
87: l_result VARCHAR2(1);
88: BEGIN
89: l_result := 'N';
90: IF pn_mo_cache_utils.is_MOAC_enabled THEN
91: l_result := mo_global.check_valid_org(p_org_id);
92: ELSE
93: IF TO_NUMBER(fnd_profile.value('ORG_ID')) = p_org_id THEN
94: l_result := 'Y';
95: ELSE
429: pn.incl_terms_by_default_flag incl_terms_by_default_flag
430: FROM hr_legal_entities hr,
431: gl_sets_of_books gl,
432: pn_system_setup_options pn
433: WHERE mo_global.check_access(pn.org_id) = 'Y'
434: AND gl.set_of_books_id = pn.set_of_books_id
435: AND hr.organization_id (+) = pn.org_id
436: AND nvl(pn.org_id,l_dummy_org_id) = p_id;
437:
662:
663: END get_profile_value;
664:
665: -------------------------------------------------------------------------------
666: -- FUNCTION : mo_global_init
667: -- PURPOSE : wrapper function for mo_global.init. Does nothing in 11i.
668: -- calls mo_global.init in R12
669: -- INVOKED FROM : PNCOMMON.pld
670: -- ARGUMENTS : IN p_appl_short_name = 'PN'
663: END get_profile_value;
664:
665: -------------------------------------------------------------------------------
666: -- FUNCTION : mo_global_init
667: -- PURPOSE : wrapper function for mo_global.init. Does nothing in 11i.
668: -- calls mo_global.init in R12
669: -- INVOKED FROM : PNCOMMON.pld
670: -- ARGUMENTS : IN p_appl_short_name = 'PN'
671: -- HISTORY
664:
665: -------------------------------------------------------------------------------
666: -- FUNCTION : mo_global_init
667: -- PURPOSE : wrapper function for mo_global.init. Does nothing in 11i.
668: -- calls mo_global.init in R12
669: -- INVOKED FROM : PNCOMMON.pld
670: -- ARGUMENTS : IN p_appl_short_name = 'PN'
671: -- HISTORY
672: -- 06-AUG-05 Kiran o Created
670: -- ARGUMENTS : IN p_appl_short_name = 'PN'
671: -- HISTORY
672: -- 06-AUG-05 Kiran o Created
673: -------------------------------------------------------------------------------
674: PROCEDURE mo_global_init(p_appl_short_name IN VARCHAR2) IS
675:
676: BEGIN
677:
678: IF is_MOAC_enabled AND p_appl_short_name IS NOT NULL THEN
675:
676: BEGIN
677:
678: IF is_MOAC_enabled AND p_appl_short_name IS NOT NULL THEN
679: mo_global.init(p_appl_short_name);
680: END IF;
681:
682: EXCEPTION
683: WHEN others THEN
681:
682: EXCEPTION
683: WHEN others THEN
684: RAISE;
685: END mo_global_init;
686:
687: -------------------------------------------------------------------------------
688: -- FUNCTION : fnd_req_set_org_id
689: -- PURPOSE : wrapper function for fnd_request.set_org_id Does nothing
720: --------------------------------------------------------------------------------
721: FUNCTION get_current_org_id RETURN NUMBER
722: IS
723: BEGIN
724: RETURN mo_global.get_current_org_id;
725: EXCEPTION
726: WHEN others THEN
727: RAISE;
728: END get_current_org_id;