[Home] [Help]
1: PACKAGE BODY OZF_Utility_PVT AS
2: /* $Header: ozfvutlb.pls 120.13.12010000.3 2008/11/24 17:38:22 nirprasa ship $ */
3:
4: -- HISTORY
5: --
773: ('OZF_COMP_START', 'OZF_COMP_SHOW_WEB_PAGE', 'OZF_COMP_END') THEN
774: x_table_name := 'OZF_DLG_FLOW_COMPS_B';
775: x_pk_name := 'FLOW_COMPONENT_ID';
776: ELSE
777: OZF_Utility_PVT.error_message ('OZF_INVALID_SYS_QUAL', 'SYS_QUALIFIER', p_sys_qual);
778: x_return_status := FND_API.g_ret_sts_unexp_error;
779: x_table_name := NULL;
780: x_pk_name := NULL;
781: END IF;
1327: -- FUNCTION
1328: -- get_lookup_meaning
1329: -- USAGE
1330: -- Example:
1331: -- SELECT OZF_Utility_PVT.get_lookup_meaning ('AMS_CAMPAIGN_STATUS', status_code)
1332: -- FROM ams_campaigns_vl;
1333: -- HISTORY
1334: -- 28-Apr-2000 choang Created.
1335: ---------------------------------------------------------------------
1359: -- FUNCTION
1360: -- get_resource_name
1361: -- USAGE
1362: -- Example:
1363: -- SELECT OZF_Utility_PVT.get_resource_name (owner_user_id)
1364: -- FROM ams_campaigns_vl
1365: -- HISTORY
1366: -- 28-Apr-2000 choang Created.
1367: ---------------------------------------------------------------------
1817: OPEN c_approval_flag;
1818: FETCH c_approval_flag INTO l_theme_flag, l_budget_flag;
1819: IF c_approval_flag%NOTFOUND THEN
1820: x_return_status := FND_API.g_ret_sts_error;
1821: OZF_Utility_PVT.error_message('OZF_CAMP_BAD_STATUS_CHANGE');
1822: END IF;
1823: CLOSE c_approval_flag;
1824:
1825: IF l_budget_flag = 'Y' THEN
1924: OPEN c_approval_flag;
1925: FETCH c_approval_flag INTO l_theme_flag, l_budget_flag;
1926: IF c_approval_flag%NOTFOUND THEN
1927: x_return_status := FND_API.g_ret_sts_error;
1928: OZF_Utility_PVT.error_message('OZF_CAMP_BAD_STATUS_CHANGE');
1929: END IF;
1930: CLOSE c_approval_flag;
1931:
1932: IF l_budget_flag = 'Y' THEN
2204:
2205: x_return_status := fnd_api.g_ret_sts_error;
2206: RETURN;
2207: ELSE
2208: IF ozf_utility_pvt.check_fk_exists('GL_DAILY_CONVERSION_TYPES',
2209: 'CONVERSION_TYPE'
2210: ,l_conversion_type) = fnd_api.g_false
2211: THEN
2212: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2239:
2240: END IF;
2241:
2242: IF (OZF_DEBUG_HIGH_ON) THEN
2243: ozf_utility_pvt.debug_message('debug: start ' || l_org_id);
2244: END IF;
2245:
2246: x_mrc_sob_type_code := 'P';
2247: OPEN c_get_gl_info(l_org_id);
2447: OPEN c_offer_org_id( p_object_id) ;
2448: FETCH c_offer_org_id INTO x_org_id ;
2449: CLOSE c_offer_org_id ;
2450: IF OZF_DEBUG_HIGH_ON THEN
2451: ozf_utility_pvt.debug_message ('get_object_org_ledger() org_id for offer =' || x_org_id);
2452: END IF;
2453: ELSIF p_object_type = 'PRIC' THEN
2454: OPEN c_pric_org_id( p_object_id) ;
2455: FETCH c_pric_org_id INTO x_org_id ;
2454: OPEN c_pric_org_id( p_object_id) ;
2455: FETCH c_pric_org_id INTO x_org_id ;
2456: CLOSE c_pric_org_id ;
2457: IF OZF_DEBUG_HIGH_ON THEN
2458: ozf_utility_pvt.debug_message ('get_object_org_ledger() org_id for pric =' || x_org_id);
2459: END IF;
2460: ELSIF p_object_type = 'FUND' THEN
2461: get_fund_ledger(p_fund_id => p_object_id
2462: , x_org_id => x_org_id
2462: , x_org_id => x_org_id
2463: , x_ledger_id => x_ledger_id
2464: , x_return_status => x_return_status);
2465: IF OZF_DEBUG_HIGH_ON THEN
2466: ozf_utility_pvt.debug_message ('get_object_org_ledger() org_id for fund =' || x_org_id
2467: || ' ledger_id=' || x_ledger_id);
2468: END IF;
2469: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2470: RAISE FND_API.g_exc_unexpected_error;
2489: FETCH c_camp_budget_id INTO l_budget_source_id;
2490: CLOSE c_camp_budget_id;
2491: END IF;
2492:
2493: ozf_utility_pvt.debug_message ('NP get_object_org_ledger() l_budget_source_id '|| l_budget_source_id);
2494: get_fund_ledger(p_fund_id => l_budget_source_id
2495: , x_org_id => x_org_id
2496: , x_ledger_id => x_ledger_id
2497: , x_return_status => x_return_status);
2511: );
2512: END IF;
2513:
2514: IF OZF_DEBUG_HIGH_ON THEN
2515: ozf_utility_pvt.debug_message ('get_object_org_ledger() final org_id =' || x_org_id
2516: || ' ledger_id=' || x_ledger_id);
2517: END IF;
2518: x_return_status := fnd_api.g_ret_sts_success;
2519:
2588:
2589: x_return_status := fnd_api.g_ret_sts_error;
2590: RETURN;
2591: ELSE
2592: IF ozf_utility_pvt.check_fk_exists('GL_DAILY_CONVERSION_TYPES',
2593: 'CONVERSION_TYPE'
2594: ,l_conversion_type) = fnd_api.g_false
2595: THEN
2596: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2789: FETCH c_resource INTO l_person_id , l_user_id, l_category;
2790: IF c_resource%NOTFOUND THEN
2791: CLOSE c_resource ;
2792: x_return_status := FND_API.G_RET_STS_ERROR;
2793: OZF_Utility_PVT.error_message ('OZF_APPR_INVALID_RESOURCE_ID');
2794: return;
2795: END IF;
2796: CLOSE c_resource ;
2797: -- Pass the Employee ID to get the Role
2803: p_display_name => x_role_display_name
2804: );
2805: IF x_role_name is null then
2806: x_return_status := FND_API.G_RET_STS_ERROR;
2807: OZF_Utility_PVT.error_message ('OZF_APPR_INVALID_ROLE');
2808: return;
2809: END IF;
2810: ELSE
2811: WF_DIRECTORY.getrolename
2815: p_display_name => x_role_display_name
2816: );
2817: IF x_role_name is null then
2818: x_return_status := FND_API.G_RET_STS_ERROR;
2819: OZF_Utility_PVT.error_message ('OZF_APPR_INVALID_ROLE');
2820: return;
2821: END IF;
2822: END IF;
2823: EXCEPTION
2879:
2880: BEGIN
2881: x_return_status := FND_API.G_RET_STS_SUCCESS;
2882: IF p_send_to_role_name IS NULL THEN
2883: OZF_UTILITY_PVT.get_resource_role
2884: ( p_resource_id => p_send_to_res_id,
2885: x_role_name => l_role_name,
2886: x_role_display_name => l_display_role_name,
2887: x_return_status => x_return_status
3035: WHERE deliverable_id = p_delv_id;
3036:
3037:
3038: l_api_name CONSTANT VARCHAR2(30) := 'GET_OBJECT_NAME';
3039: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_UTILITY_PVT';
3040:
3041: BEGIN
3042:
3043: If p_association_type_code = 'OZF_DELV' then
3577: RETURN l_attributeName;
3578: END getAttributeName;
3579:
3580:
3581: END OZF_Utility_PVT;