DBA Data[Home] [Help]

APPS.OZF_FUND_ALLOCATIONS_PVT dependencies on FND_MSG_PUB

Line 10: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

6: -- corresponds to JTF_TERR_RSC_ALL.RESOURCE_TYPE
7: G_RS_EMPLOYEE_TYPE CONSTANT VARCHAR2(30) := 'RS_EMPLOYEE';
8: G_RS_GROUP_TYPE CONSTANT VARCHAR2(30) := 'RS_GROUP';
9:
10: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
11:
12: TYPE node_info_type IS RECORD (
13: node_name VARCHAR2(240)
14: , owner NUMBER

Line 137: fnd_msg_pub.count_and_get(

133: EXCEPTION
134: WHEN OTHERS THEN
135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
136: -- dbms_output.put_line('get_node_info: UNEXP exception ' || substr(sqlerrm, 1, 150));
137: fnd_msg_pub.count_and_get(
138: p_encoded => fnd_api.g_false
139: , p_count => x_msg_count
140: , p_data => x_msg_data);
141: END get_node_info;

Line 217: fnd_msg_pub.count_and_get(

213: EXCEPTION
214: WHEN OTHERS THEN
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: -- dbms_output.put_line('get_node_children: UNEXP exception ' || substr(sqlerrm, 1, 150));
217: fnd_msg_pub.count_and_get(
218: p_encoded => fnd_api.g_false
219: , p_count => x_msg_count
220: , p_data => x_msg_data);
221: END get_node_children;

Line 463: fnd_msg_pub.count_and_get(

459: EXCEPTION
460: WHEN OTHERS THEN
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
462: -- dbms_output.put_line('get_prior_year_sales: UNEXP exception ' || substr(sqlerrm, 1, 150));
463: fnd_msg_pub.count_and_get(
464: p_encoded => fnd_api.g_false
465: , p_count => x_msg_count
466: , p_data => x_msg_data);
467: END get_prior_year_sales;

Line 687: fnd_msg_pub.count_and_get(

683: EXCEPTION
684: WHEN OTHERS THEN
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
686: -- dbms_output.put_line('compute_worksheet(node_id=' || p_node_id || '): exception - ' || substr(sqlerrm, 1, 200));
687: fnd_msg_pub.count_and_get(
688: p_encoded => fnd_api.g_false
689: , p_count => x_msg_count
690: , p_data => x_msg_data);
691: END compute_worksheet;

Line 753: fnd_msg_pub.initialize;

749: SAVEPOINT create_alloc_hierarchy_sp;
750: x_return_status := FND_API.G_RET_STS_SUCCESS;
751:
752: IF (fnd_api.to_boolean(p_init_msg_list)) THEN
753: fnd_msg_pub.initialize;
754: END IF;
755:
756: IF (NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name)) THEN
757: RAISE fnd_api.g_exc_unexpected_error;

Line 771: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN

767: l_hierarchy_id, l_hierarchy_type, l_start_node, l_from_level, l_to_level,
768: l_from_date, l_to_date, l_status_code, l_method_code, l_basis_year, l_ex_start_node;
769: IF c_get_alloc_details%NOTFOUND THEN
770: CLOSE c_get_alloc_details;
771: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
772: fnd_message.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
773: fnd_msg_pub.add;
774: END IF;
775: RAISE fnd_api.g_exc_error;

Line 773: fnd_msg_pub.add;

769: IF c_get_alloc_details%NOTFOUND THEN
770: CLOSE c_get_alloc_details;
771: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
772: fnd_message.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
773: fnd_msg_pub.add;
774: END IF;
775: RAISE fnd_api.g_exc_error;
776: END IF;
777: CLOSE c_get_alloc_details;

Line 850: fnd_msg_pub.count_and_get(

846: WHEN OTHERS THEN
847: ROLLBACK TO create_alloc_hierarchy_sp;
848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
849: -- dbms_output.put_line('create_alloc_hierarchy: exception - ' || substr(sqlerrm, 1, 200));
850: fnd_msg_pub.count_and_get(
851: p_encoded => fnd_api.g_false
852: , p_count => x_msg_count
853: , p_data => x_msg_data);
854: END create_alloc_hierarchy;

Line 1186: fnd_msg_pub.count_and_get(

1182: WHEN OTHERS THEN
1183: ROLLBACK TO create_budget_for_one_node_sp;
1184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1185: -- dbms_output.put_line('create_budget_for_one_node(): exception - ' || substr(sqlerrm, 1, 200));
1186: fnd_msg_pub.count_and_get(
1187: p_encoded => fnd_api.g_false
1188: , p_count => x_msg_count
1189: , p_data => x_msg_data);
1190: END create_budget_for_one_node;

Line 1283: fnd_msg_pub.count_and_get(

1279: EXCEPTION
1280: WHEN OTHERS THEN
1281: -- dbms_output.put_line('transfer_approved_budget: exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
1282: x_return_status := fnd_api.g_ret_sts_unexp_error;
1283: fnd_msg_pub.count_and_get(
1284: p_encoded => fnd_api.g_false
1285: , p_count => x_msg_count
1286: , p_data => x_msg_data);
1287: END transfer_approved_budget;

Line 1402: fnd_msg_pub.initialize;

1398: END IF;
1399: x_return_status := fnd_api.g_ret_sts_success;
1400:
1401: IF fnd_api.to_boolean(p_init_msg_list) THEN
1402: fnd_msg_pub.initialize;
1403: END IF;
1404:
1405: OPEN c_get_metric_info;
1406: FETCH c_get_metric_info INTO l_fund_id, l_alloc_from_date, l_alloc_to_date, l_alloc_action_code;

Line 1419: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1415: /* TO DO: add 'DRAFT_ALLOC' to lookup OZF_FUND_STATUS and add use_status_id */
1416: IF (p_alloc_status = 'ACTIVE') THEN
1417: IF l_fund_status_code <> 'ACTIVE' THEN
1418: -- can not make allocaiton active if root budget is not active
1419: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1420: IF (l_fund_type = 'QUOTA') THEN
1421: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCACTIVE_ERROR');
1422: ELSE
1423: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCACTIVE_ERROR');

Line 1425: FND_MSG_PUB.Add;

1421: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCACTIVE_ERROR');
1422: ELSE
1423: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCACTIVE_ERROR');
1424: END IF;
1425: FND_MSG_PUB.Add;
1426: END IF;
1427: x_return_status := FND_API.G_RET_STS_ERROR;
1428: RAISE FND_API.G_EXC_ERROR;
1429: END IF;

Line 1680: fnd_msg_pub.count_and_get(

1676: WHEN OTHERS THEN
1677: -- dbms_output.put_line(l_full_name || 'exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
1678: ROLLBACK TO publish_allocation_sp;
1679: x_return_status := fnd_api.g_ret_sts_unexp_error;
1680: fnd_msg_pub.count_and_get(
1681: p_encoded => fnd_api.g_false
1682: ,p_count => x_msg_count
1683: ,p_data => x_msg_data);
1684:

Line 1717: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1713: CLOSE c_get_fund_amount;
1714: -- dbms_output.put_line('top level: budget available amount=' || l_avail_amount || ' recommend total=' || p_alloc_amount);
1715: IF p_alloc_amount > l_avail_amount THEN
1716: -- top level allocation amount can not exceed fund's available amount
1717: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1718: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_INV_CHILD_AMT');
1719: FND_MESSAGE.Set_Token('SUMAMT', p_alloc_amount);
1720: FND_MESSAGE.Set_Token('NODEVALUE', 'FUND');
1721: FND_MESSAGE.Set_Token('PAMT', l_avail_amount);

Line 1722: FND_MSG_PUB.Add;

1718: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_INV_CHILD_AMT');
1719: FND_MESSAGE.Set_Token('SUMAMT', p_alloc_amount);
1720: FND_MESSAGE.Set_Token('NODEVALUE', 'FUND');
1721: FND_MESSAGE.Set_Token('PAMT', l_avail_amount);
1722: FND_MSG_PUB.Add;
1723: END IF;
1724: x_return_status := FND_API.G_RET_STS_ERROR;
1725: RAISE FND_API.G_EXC_ERROR;
1726: END IF;

Line 1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1726: END IF;
1727:
1728: IF p_hb_amount > p_alloc_amount THEN
1729: -- holdback amount can not exceed allocation amount
1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1731: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
1732: FND_MESSAGE.Set_Token('HOLDBACK', p_hb_amount);
1733: FND_MESSAGE.Set_Token('ALLOCAMT', p_alloc_amount);
1734: FND_MSG_PUB.Add;

Line 1734: FND_MSG_PUB.Add;

1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1731: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
1732: FND_MESSAGE.Set_Token('HOLDBACK', p_hb_amount);
1733: FND_MESSAGE.Set_Token('ALLOCAMT', p_alloc_amount);
1734: FND_MSG_PUB.Add;
1735: END IF;
1736: x_return_status := FND_API.G_RET_STS_ERROR;
1737: RAISE FND_API.G_EXC_ERROR;
1738: END IF;

Line 1743: fnd_msg_pub.count_and_get(

1739:
1740: EXCEPTION
1741: WHEN OTHERS THEN
1742: x_return_status := fnd_api.g_ret_sts_unexp_error;
1743: fnd_msg_pub.count_and_get(
1744: p_encoded => fnd_api.g_false
1745: ,p_count => x_msg_count
1746: ,p_data => x_msg_data);
1747: END check_budget_available_amount;

Line 1845: fnd_msg_pub.count_and_get(

1841:
1842: EXCEPTION
1843: WHEN OTHERS THEN
1844: x_return_status := fnd_api.g_ret_sts_unexp_error;
1845: fnd_msg_pub.count_and_get(
1846: p_encoded => fnd_api.g_false
1847: , p_count => x_msg_count
1848: , p_data => x_msg_data);
1849: END update_basepct_info;

Line 1912: FND_MSG_PUB.Count_And_Get (

1908:
1909: EXCEPTION
1910: WHEN OTHERS THEN
1911: x_return_status := fnd_api.g_ret_sts_unexp_error;
1912: FND_MSG_PUB.Count_And_Get (
1913: p_encoded => fnd_api.g_false,
1914: p_count => x_msg_count,
1915: p_data => x_msg_data
1916: );

Line 2006: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2002: IF l_parent_fact_id IS NOT NULL THEN
2003: -- we're not checking top level node against root budget as update_worksheet_amount() already does that before calling cascade
2004: -- holdback amount can not exceed allocation amount
2005: IF l_recommend_hb > l_recommend_total THEN
2006: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2007: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
2008: FND_MESSAGE.Set_Token('HOLDBACK', l_recommend_hb);
2009: FND_MESSAGE.Set_Token('ALLOCAMT', l_recommend_total);
2010: FND_MSG_PUB.Add;

Line 2010: FND_MSG_PUB.Add;

2006: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2007: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
2008: FND_MESSAGE.Set_Token('HOLDBACK', l_recommend_hb);
2009: FND_MESSAGE.Set_Token('ALLOCAMT', l_recommend_total);
2010: FND_MSG_PUB.Add;
2011: END IF;
2012: x_return_status := FND_API.G_RET_STS_ERROR;
2013: RAISE FND_API.G_EXC_ERROR;
2014: END IF;

Line 2024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2020: OPEN c_get_allocdown_amount(l_parent_fact_id);
2021: FETCH c_get_allocdown_amount INTO l_parent_amount;
2022: CLOSE c_get_allocdown_amount;
2023: IF l_sibling_sum_amount > l_parent_amount THEN
2024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2025: OPEN c_get_node_info(l_parent_fact_id);
2026: FETCH c_get_node_info INTO l_hierarchy_id, l_hierarchy_type, l_node_id;
2027: CLOSE c_get_node_info;
2028: get_node_info( p_hierarchy_id => l_hierarchy_id

Line 2040: FND_MSG_PUB.Add;

2036: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_INV_CHILD_AMT');
2037: FND_MESSAGE.Set_Token('SUMAMT', l_sibling_sum_amount);
2038: FND_MESSAGE.Set_Token('NODEVALUE', l_node_info.node_name);
2039: FND_MESSAGE.Set_Token('PAMT', l_parent_amount);
2040: FND_MSG_PUB.Add;
2041: END IF;
2042: x_return_status := FND_API.G_RET_STS_ERROR;
2043: RAISE FND_API.G_EXC_ERROR;
2044: END IF;

Line 2112: FND_MSG_PUB.Count_And_Get (

2108:
2109: EXCEPTION
2110: WHEN OTHERS THEN
2111: x_return_status := fnd_api.g_ret_sts_unexp_error;
2112: FND_MSG_PUB.Count_And_Get (
2113: p_encoded => fnd_api.g_false,
2114: p_count => x_msg_count,
2115: p_data => x_msg_data
2116: );

Line 2177: FND_MSG_PUB.Initialize;

2173: OZF_Utility_PVT.debug_message('Validate_worksheet: start');
2174: END IF;
2175:
2176: IF FND_API.To_Boolean (p_init_msg_list) THEN
2177: FND_MSG_PUB.Initialize;
2178: END IF;
2179: x_return_status := fnd_api.g_ret_sts_success;
2180:
2181: OPEN c_get_alloc_info;

Line 2205: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2201: END IF;
2202: ELSE
2203: -- for each node: holdback amount can not exceed allocation amount
2204: IF worksheet_rec.recommend_hb_amount > worksheet_rec.recommend_total_amount THEN
2205: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2206: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
2207: FND_MESSAGE.Set_Token('HOLDBACK', worksheet_rec.recommend_hb_amount);
2208: FND_MESSAGE.Set_Token('ALLOCAMT', worksheet_rec.recommend_total_amount);
2209: FND_MSG_PUB.Add;

Line 2209: FND_MSG_PUB.Add;

2205: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2206: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_HOLDBACKAMT_ERROR');
2207: FND_MESSAGE.Set_Token('HOLDBACK', worksheet_rec.recommend_hb_amount);
2208: FND_MESSAGE.Set_Token('ALLOCAMT', worksheet_rec.recommend_total_amount);
2209: FND_MSG_PUB.Add;
2210: END IF;
2211: x_return_status := FND_API.G_RET_STS_ERROR;
2212: RAISE FND_API.G_EXC_ERROR;
2213: END IF;

Line 2223: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2219: CLOSE c_get_child_sum;
2220: l_avail_amount := worksheet_rec.recommend_total_amount - NVL(worksheet_rec.recommend_hb_amount, 0);
2221: IF l_child_sum_amount > (l_avail_amount + g_max_ignorable_amount) THEN
2222: -- sum of this node's children's allocation amount can not exceed this node's available amount
2223: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2224: get_node_info( p_hierarchy_id => worksheet_rec.hierarchy_id
2225: , p_hierarchy_type => worksheet_rec.hierarchy_type
2226: , p_node_id => worksheet_rec.node_id
2227: , x_node_info => l_node_info

Line 2236: FND_MSG_PUB.Add;

2232: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_INV_CHILD_AMT');
2233: FND_MESSAGE.Set_Token('SUMAMT', l_child_sum_amount);
2234: FND_MESSAGE.Set_Token('NODEVALUE', l_node_info.node_name);
2235: FND_MESSAGE.Set_Token('PAMT', l_avail_amount);
2236: FND_MSG_PUB.Add;
2237: END IF;
2238: x_return_status := FND_API.G_RET_STS_ERROR;
2239: RAISE FND_API.G_EXC_ERROR;
2240: END IF;

Line 2246: FND_MSG_PUB.Count_And_Get (

2242:
2243: EXCEPTION
2244: WHEN OTHERS THEN
2245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2246: FND_MSG_PUB.Count_And_Get (
2247: p_encoded => fnd_api.g_false,
2248: p_count => x_msg_count,
2249: p_data => x_msg_data
2250: );

Line 2320: fnd_msg_pub.initialize;

2316: END IF;
2317: x_return_status := fnd_api.g_ret_sts_success;
2318:
2319: IF fnd_api.to_boolean(p_init_msg_list) THEN
2320: fnd_msg_pub.initialize;
2321: END IF;
2322:
2323: OPEN c_get_alloc_info;
2324: FETCH c_get_alloc_info

Line 2338: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN

2334: l_fact_rec := p_fact_table(l_index);
2335:
2336: -- kdass: 01/19/2004 fix bug 3379926 - the allocation worksheet should not accept negative amounts for allocation
2337: IF NVL(p_fact_table(l_index).recommend_total_amount,0) < 0 THEN -- check for recommended total amount
2338: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2339: fnd_message.set_name('OZF', 'OZF_FUND_ALLOCAMT_NEG_ERROR');
2340: fnd_msg_pub.add;
2341: END IF;
2342: x_return_status := fnd_api.g_ret_sts_error;

Line 2340: fnd_msg_pub.add;

2336: -- kdass: 01/19/2004 fix bug 3379926 - the allocation worksheet should not accept negative amounts for allocation
2337: IF NVL(p_fact_table(l_index).recommend_total_amount,0) < 0 THEN -- check for recommended total amount
2338: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2339: fnd_message.set_name('OZF', 'OZF_FUND_ALLOCAMT_NEG_ERROR');
2340: fnd_msg_pub.add;
2341: END IF;
2342: x_return_status := fnd_api.g_ret_sts_error;
2343: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2344: END IF;

Line 2348: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN

2344: END IF;
2345:
2346: -- kdass: 01/23/2004 fix bug 3392738 - the allocation worksheet should not accept negative amounts for holdback amounts
2347: IF NVL(p_fact_table(l_index).recommend_hb_amount,0) < 0 THEN -- check for recommended holdback amount
2348: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2349: fnd_message.set_name('OZF', 'OZF_FUND_NO_HOLDBACK_BUDGET');
2350: fnd_msg_pub.add;
2351: END IF;
2352: x_return_status := fnd_api.g_ret_sts_error;

Line 2350: fnd_msg_pub.add;

2346: -- kdass: 01/23/2004 fix bug 3392738 - the allocation worksheet should not accept negative amounts for holdback amounts
2347: IF NVL(p_fact_table(l_index).recommend_hb_amount,0) < 0 THEN -- check for recommended holdback amount
2348: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2349: fnd_message.set_name('OZF', 'OZF_FUND_NO_HOLDBACK_BUDGET');
2350: fnd_msg_pub.add;
2351: END IF;
2352: x_return_status := fnd_api.g_ret_sts_error;
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2354: END IF;

Line 2525: fnd_msg_pub.count_and_get(

2521: WHEN OTHERS THEN
2522: ROLLBACK TO update_worksheet_amount_sp;
2523: -- dbms_output.put_line(l_full_name || 'exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
2524: x_return_status := fnd_api.g_ret_sts_unexp_error;
2525: fnd_msg_pub.count_and_get(
2526: p_encoded => fnd_api.g_false
2527: , p_count => x_msg_count
2528: , p_data => x_msg_data);
2529: END update_worksheet_amount;

Line 2687: fnd_msg_pub.count_and_get(

2683: EXCEPTION
2684: WHEN OTHERS THEN
2685: -- dbms_output.put_line('activate_one_node: exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
2686: x_return_status := fnd_api.g_ret_sts_unexp_error;
2687: fnd_msg_pub.count_and_get(
2688: p_encoded => fnd_api.g_false
2689: , p_count => x_msg_count
2690: , p_data => x_msg_data);
2691: END activate_one_node;

Line 2776: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2772: CLOSE c_get_fund_info;
2773:
2774: -- only the allocation creator can activate allocation
2775: IF l_alloc_creator <> NVL(fnd_global.user_id, -1) THEN
2776: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2777: IF l_fund_type = 'QUOTA' THEN
2778: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCNOTOWNER_ERROR');
2779: ELSE
2780: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCNOTOWNER_ERROR');

Line 2782: FND_MSG_PUB.Add;

2778: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCNOTOWNER_ERROR');
2779: ELSE
2780: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCNOTOWNER_ERROR');
2781: END IF;
2782: FND_MSG_PUB.Add;
2783: END IF;
2784: x_return_status := FND_API.G_RET_STS_ERROR;
2785: RAISE FND_API.G_EXC_ERROR;
2786: END IF;

Line 2790: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2786: END IF;
2787:
2788: -- statuses other than PLANNED are not allowed changed to ACTIVE
2789: IF l_alloc_old_status <> 'PLANNED' THEN
2790: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2791: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
2792: FND_MSG_PUB.Add;
2793: END IF;
2794: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2792: FND_MSG_PUB.Add;

2788: -- statuses other than PLANNED are not allowed changed to ACTIVE
2789: IF l_alloc_old_status <> 'PLANNED' THEN
2790: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2791: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
2792: FND_MSG_PUB.Add;
2793: END IF;
2794: x_return_status := FND_API.G_RET_STS_ERROR;
2795: RAISE FND_API.G_EXC_ERROR;
2796: END IF;

Line 2802: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2798:
2799:
2800: -- can not make allocaiton active if root budget is not active
2801: IF l_fund_status_code <> 'ACTIVE' THEN
2802: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2803: IF l_fund_type = 'QUOTA' THEN
2804: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCACTIVE_ERROR');
2805: ELSE
2806: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCACTIVE_ERROR');

Line 2808: FND_MSG_PUB.Add;

2804: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCACTIVE_ERROR');
2805: ELSE
2806: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCACTIVE_ERROR');
2807: END IF;
2808: FND_MSG_PUB.Add;
2809: END IF;
2810: x_return_status := FND_API.G_RET_STS_ERROR;
2811: RAISE FND_API.G_EXC_ERROR;
2812: END IF;

Line 2882: fnd_msg_pub.count_and_get(

2878: EXCEPTION
2879: WHEN OTHERS THEN
2880: -- dbms_output.put_line(l_full_name || 'exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
2881: x_return_status := fnd_api.g_ret_sts_unexp_error;
2882: fnd_msg_pub.count_and_get(
2883: p_encoded => fnd_api.g_false
2884: , p_count => x_msg_count
2885: , p_data => x_msg_data);
2886: END activate_allocation;

Line 2965: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2961:
2962:
2963: -- only the allocation creator can activate allocation
2964: IF l_alloc_creator <> NVL(fnd_global.user_id, -1) THEN
2965: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2966: IF l_root_fund_type = 'QUOTA' THEN
2967: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCNOTOWNER_ERROR');
2968: ELSE
2969: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCNOTOWNER_ERROR');

Line 2971: FND_MSG_PUB.Add;

2967: FND_MESSAGE.Set_Name ('OZF', 'OZF_TP_ALLOCNOTOWNER_ERROR');
2968: ELSE
2969: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCNOTOWNER_ERROR');
2970: END IF;
2971: FND_MSG_PUB.Add;
2972: END IF;
2973: x_return_status := FND_API.G_RET_STS_ERROR;
2974: RAISE FND_API.G_EXC_ERROR;
2975: END IF;

Line 2979: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2975: END IF;
2976:
2977: -- statuses other than NEW or PLANNED are not allowed changed to CANCELLED
2978: IF l_alloc_old_status <> 'NEW' AND l_alloc_old_status <> 'PLANNED' THEN
2979: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2980: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
2981: FND_MSG_PUB.Add;
2982: END IF;
2983: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2981: FND_MSG_PUB.Add;

2977: -- statuses other than NEW or PLANNED are not allowed changed to CANCELLED
2978: IF l_alloc_old_status <> 'NEW' AND l_alloc_old_status <> 'PLANNED' THEN
2979: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2980: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
2981: FND_MSG_PUB.Add;
2982: END IF;
2983: x_return_status := FND_API.G_RET_STS_ERROR;
2984: RAISE FND_API.G_EXC_ERROR;
2985: END IF;

Line 3097: fnd_msg_pub.count_and_get(

3093: EXCEPTION
3094: WHEN OTHERS THEN
3095: -- dbms_output.put_line(l_full_name || 'exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
3096: x_return_status := fnd_api.g_ret_sts_unexp_error;
3097: fnd_msg_pub.count_and_get(
3098: p_encoded => fnd_api.g_false
3099: , p_count => x_msg_count
3100: , p_data => x_msg_data);
3101: END cancel_allocation;

Line 3142: fnd_msg_pub.initialize;

3138: SAVEPOINT update_alloc_status_sp;
3139: x_return_status := FND_API.G_RET_STS_SUCCESS;
3140:
3141: IF fnd_api.to_boolean(p_init_msg_list) THEN
3142: fnd_msg_pub.initialize;
3143: END IF;
3144:
3145: OPEN c_get_alloc_status;
3146: FETCH c_get_alloc_status INTO l_old_alloc_status;

Line 3191: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3187: END IF;
3188: END IF;
3189:
3190: IF not l_valid_change THEN
3191: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3192: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
3193: FND_MSG_PUB.Add;
3194: END IF;
3195: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3193: FND_MSG_PUB.Add;

3189:
3190: IF not l_valid_change THEN
3191: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3192: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCSTATUS_ERROR');
3193: FND_MSG_PUB.Add;
3194: END IF;
3195: x_return_status := FND_API.G_RET_STS_ERROR;
3196: RAISE FND_API.G_EXC_ERROR;
3197: END IF;

Line 3208: fnd_msg_pub.count_and_get(

3204: WHEN OTHERS THEN
3205: ROLLBACK TO update_alloc_status_sp;
3206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3207: -- dbms_output.put_line('update_alloc_status: exception - ' || substr(sqlerrm, 1, 200));
3208: fnd_msg_pub.count_and_get(
3209: p_encoded => fnd_api.g_false
3210: , p_count => x_msg_count
3211: , p_data => x_msg_data);
3212: END update_alloc_status;

Line 3298: fnd_msg_pub.initialize;

3294: RETURN;
3295: END IF;
3296:
3297: IF fnd_api.to_boolean(p_init_msg_list) THEN
3298: fnd_msg_pub.initialize;
3299: END IF;
3300:
3301: OPEN c_get_alloc_status(p_factid_table(p_factid_table.FIRST).fact_id);
3302: FETCH c_get_alloc_status INTO l_approver_status, l_alloc_action_code, l_alloc_id;

Line 3314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3310: END IF;
3311:
3312: -- approver's status must be active to approve allocation
3313: IF l_approver_status <> 'ACTIVE' THEN
3314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3315: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCAPPROVE_ERROR');
3316: FND_MSG_PUB.Add;
3317: END IF;
3318: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3316: FND_MSG_PUB.Add;

3312: -- approver's status must be active to approve allocation
3313: IF l_approver_status <> 'ACTIVE' THEN
3314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3315: FND_MESSAGE.Set_Name ('OZF', 'OZF_FUND_ALLOCAPPROVE_ERROR');
3316: FND_MSG_PUB.Add;
3317: END IF;
3318: x_return_status := FND_API.G_RET_STS_ERROR;
3319: RAISE FND_API.G_EXC_ERROR;
3320: END IF;

Line 3392: fnd_msg_pub.count_and_get(

3388: WHEN OTHERS THEN
3389: -- dbms_output.put_line('approve_levels(): exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
3390: ROLLBACK TO approve_levels_sp;
3391: x_return_status := fnd_api.g_ret_sts_unexp_error;
3392: fnd_msg_pub.count_and_get(
3393: p_encoded => fnd_api.g_false
3394: , p_count => x_msg_count
3395: , p_data => x_msg_data);
3396: END approve_levels;

Line 3470: fnd_msg_pub.initialize;

3466: END IF;
3467: x_return_status := fnd_api.g_ret_sts_success;
3468:
3469: IF fnd_api.to_boolean(p_init_msg_list) THEN
3470: fnd_msg_pub.initialize;
3471: END IF;
3472:
3473: OPEN c_get_fact_info;
3474: FETCH c_get_fact_info INTO l_alloc_status, l_parent_fact_id, l_alloc_id, l_request_total, l_request_hb, l_fund_name, l_fund_type;

Line 3587: fnd_msg_pub.count_and_get(

3583: WHEN OTHERS THEN
3584: -- dbms_output.put_line('submit_request(): exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
3585: ROLLBACK TO submit_request_sp;
3586: x_return_status := fnd_api.g_ret_sts_unexp_error;
3587: fnd_msg_pub.count_and_get(
3588: p_encoded => fnd_api.g_false
3589: , p_count => x_msg_count
3590: , p_data => x_msg_data);
3591: END submit_request;

Line 3648: fnd_msg_pub.initialize;

3644: END IF;
3645: x_return_status := fnd_api.g_ret_sts_success;
3646:
3647: IF fnd_api.to_boolean(p_init_msg_list) THEN
3648: fnd_msg_pub.initialize;
3649: END IF;
3650:
3651: /* only allocation in 'PLANNED' or 'ACTIVE' status can user reject request
3652: IF (l_alloc_status <> 'PLANNED' AND l_alloc_status <> 'APPROVED') THEN

Line 3732: fnd_msg_pub.count_and_get(

3728: WHEN OTHERS THEN
3729: -- dbms_output.put_line('reject_request(): exception errcode=' || sqlcode || ' :' || substr(sqlerrm, 1, 150));
3730: ROLLBACK TO reject_request_sp;
3731: x_return_status := fnd_api.g_ret_sts_unexp_error;
3732: fnd_msg_pub.count_and_get(
3733: p_encoded => fnd_api.g_false
3734: , p_count => x_msg_count
3735: , p_data => x_msg_data);
3736: END reject_request;