[Home] [Help]
1: PACKAGE BODY OE_Profile AS
2: /* $Header: OEXPROFB.pls 120.2 2005/12/20 11:34:10 zbutt noship $ */
3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Profile';
1: PACKAGE BODY OE_Profile AS
2: /* $Header: OEXPROFB.pls 120.2 2005/12/20 11:34:10 zbutt noship $ */
3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Profile';
6:
7: -- LOCAL PROCEDURES
8: -------------------------------------------------------------------
9: FUNCTION Get_Active_Profile_Name
14: OE_INVALID_INTEROP_PROFILE EXCEPTION;
15: BEGIN
16:
17: -- for each profile option name (OE or ONT), return the ONT profile
18: -- option name if active product is ONT and return the OE profile
19: -- option name if active product is OE
20: /* IF ( NAME = 'SO_ORGANIZATION_ID'
21: OR NAME = 'OE_ORGANIZATION_ID') THEN
22:
243: --
244: BEGIN
245:
246: IF l_debug_level > 0 THEN
247: oe_debug_pub.add('ENTERING OE_PROFILE.VALUE');
248: oe_debug_pub.add('header_id: ' || p_header_id);
249: oe_debug_pub.add('line_id: ' || p_line_id);
250: oe_debug_pub.add('profile option: '|| p_profile_option_name);
251: END IF;
458: -- OE_GLOBALS.G_USE_CREATED_BY_CONTEXT
459: -- at this point we should have the profile option value
460: IF l_debug_level > 0 THEN
461: oe_debug_pub.add('profile option value being returned: ' || l_profile_option_value);
462: oe_debug_pub.add('EXITING OE_PROFILE.VALUE');
463: END IF;
464: Return l_profile_option_value;
465:
466: EXCEPTION
465:
466: EXCEPTION
467: WHEN OTHERS THEN
468: IF l_debug_level > 0 THEN
469: oe_debug_pub.add('IN OTHERS IN OE_PROFILE.VALUE:' || SQLERRM);
470: END IF;
471: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
472: THEN
473: OE_MSG_PUB.Add_Exc_Msg
493: --
494: BEGIN
495:
496: IF l_debug_level > 0 THEN
497: oe_debug_pub.add('ENTERING OE_PROFILE.GET_CACHED_CONTEXT');
498: oe_debug_pub.add('entity: ' || p_entity);
499: oe_debug_pub.add('entity_id: ' || p_entity_id);
500: END IF;
501:
555: oe_debug_pub.add('application from cache: ' || x_application_id);
556: oe_debug_pub.add('user from cache: ' || x_user_id);
557: oe_debug_pub.add('responsibility from cache: ' || x_responsibility_id);
558: oe_debug_pub.add('org from cache: ' || x_org_id);
559: oe_debug_pub.add('EXITING OE_PROFILE.GET_CACHED_CONTEXT');
560: END IF;
561:
562:
563: EXCEPTION
562:
563: EXCEPTION
564: WHEN OTHERS THEN
565: IF l_debug_level > 0 THEN
566: oe_debug_pub.add('OTHERS IN OE_PROFILE.GET_CACHED_CONTEXT: ' || SQLERRM);
567: END IF;
568: x_result := 'E';
569: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
570: THEN
592: --
593: BEGIN
594:
595: IF l_debug_level > 0 THEN
596: oe_debug_pub.add('ENTERING OE_PROFILE.PUT_CACHED_CONTEXT');
597: oe_debug_pub.add('entity: ' || p_entity);
598: oe_debug_pub.add('entity_id: ' || p_entity_id);
599: oe_debug_pub.add('application: '|| p_application_id);
600: oe_debug_pub.add('user: ' || p_user_id);
750:
751: EXCEPTION
752: WHEN OTHERS THEN
753: IF l_debug_level > 0 THEN
754: oe_debug_pub.add('OTHERS IN OE_PROFILE.PUT_CACHED_CONTEXT: ' || SQLERRM);
755: END IF;
756: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
757: THEN
758: OE_MSG_PUB.Add_Exc_Msg
781:
782: BEGIN
783:
784: IF l_debug_level > 0 THEN
785: oe_debug_pub.add('ENTERING OE_PROFILE.GET_CACHED_PROFILE_FOR_CONTEXT');
786: oe_debug_pub.add('profile: ' || p_profile_option_name);
787: oe_debug_pub.add('application: '|| p_application_id);
788: oe_debug_pub.add('user: ' || p_user_id);
789: oe_debug_pub.add('responsibility: ' || p_responsibility_id);
812: END IF;
813: -- end of Prf_Tbl.EXISTS(l_concat_segment)
814:
815: IF l_debug_level > 0 THEN
816: oe_debug_pub.add('EXITING OE_PROFILE.GET_CACHED_PROFILE_FOR_CONTEXT');
817: END IF;
818:
819: EXCEPTION
820: WHEN OTHERS THEN
820: WHEN OTHERS THEN
821: x_profile_option_value := null;
822: x_result := 'E';
823: IF l_debug_level > 0 THEN
824: oe_debug_pub.add('OTHERS IN OE_PROFILE.GET_CACHED_PROFILE_FOR_CONTEXT: ' || SQLERRM);
825: END IF;
826: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
827: THEN
828: OE_MSG_PUB.Add_Exc_Msg
849: --
850: BEGIN
851:
852: IF l_debug_level > 0 THEN
853: oe_debug_pub.add('ENTERING OE_PROFILE.PUT_CACHED_PROFILE_FOR_CONTEXT');
854: oe_debug_pub.add('Records currently stored in profile cache: ' || Prf_Tbl.count);
855: oe_debug_pub.add('profile: ' || p_profile_option_name);
856: oe_debug_pub.add('application: '|| p_application_id);
857: oe_debug_pub.add('user: ' || p_user_id);
922:
923: END IF; -- end of Prf_Tbl.count < MAX_PROFILE_CACHE_SIZE
924:
925: IF l_debug_level > 0 THEN
926: oe_debug_pub.add('EXITING OE_PROFILE.PUT_CACHED_PROFILE_FOR_CONTEXT');
927: END IF;
928:
929: EXCEPTION
930: WHEN OTHERS THEN
928:
929: EXCEPTION
930: WHEN OTHERS THEN
931: IF l_debug_level > 0 THEN
932: oe_debug_pub.add('OTHERS IN OE_PROFILE.PUT_CACHED_PROFILE_FOR_CONTEXT: ' || SQLERRM);
933: END IF;
934: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
935: THEN
936: OE_MSG_PUB.Add_Exc_Msg
941: END PUT_CACHED_PROFILE_FOR_CONTEXT;
942:
943:
944:
945: END OE_PROFILE;