1720: x_err_stack := x_err_stack ||'-> create_draft_budget';
1721:
1722: -- Initialize the message table if requested.
1723:
1724: IF FND_API.TO_BOOLEAN( p_init_msg_list )
1725: THEN
1726:
1727: FND_MSG_PUB.initialize;
1728:
1735:
1736:
1737: -- Standard call to check for call compatibility.
1738:
1739: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
1740: p_api_version_number ,
1741: l_api_name ,
1742: G_PKG_NAME )
1743: THEN
2018: p_resource_list_id => p_resource_list_id,
2019: p_out_resource_list_id => l_resource_list_id,
2020: p_return_status => l_return_status );
2021:
2022: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: p_return_status := l_return_status;
2024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2026: p_return_status := l_return_status;
2020: p_return_status => l_return_status );
2021:
2022: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: p_return_status := l_return_status;
2024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2026: p_return_status := l_return_status;
2027: RAISE FND_API.G_EXC_ERROR;
2028: END IF;
2021:
2022: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: p_return_status := l_return_status;
2024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2026: p_return_status := l_return_status;
2027: RAISE FND_API.G_EXC_ERROR;
2028: END IF;
2029:
2023: p_return_status := l_return_status;
2024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2025: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2026: p_return_status := l_return_status;
2027: RAISE FND_API.G_EXC_ERROR;
2028: END IF;
2029:
2030: ELSE -- There is no valid resource list id
2031: fnd_message.set_name('GMS', 'GMS_RESOURCE_LIST_IS_MISSING');
2028: END IF;
2029:
2030: ELSE -- There is no valid resource list id
2031: fnd_message.set_name('GMS', 'GMS_RESOURCE_LIST_IS_MISSING');
2032: RAISE FND_API.G_EXC_ERROR;
2033:
2034: END IF;
2035: */
2036:
2413: -- COMMIT in DELETE_DRAFT removes all savepoints!!!
2414:
2415: SAVEPOINT create_draft_budget_pub;
2416:
2417: IF FND_API.TO_BOOLEAN( p_commit )
2418: THEN
2419: COMMIT;
2420: END IF;
2421:
2797: x_err_stack := x_err_stack ||'-> Baseline_budget';
2798:
2799: -- Initialize the message table if requested.
2800:
2801: IF FND_API.TO_BOOLEAN( p_init_msg_list )
2802: THEN
2803:
2804: FND_MSG_PUB.initialize;
2805:
2810: SAVEPOINT baseline_budget_pub;
2811:
2812: -- Standard call to check for call compatibility.
2813:
2814: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
2815: p_api_version_number ,
2816: l_api_name ,
2817: G_PKG_NAME )
2818: THEN
2815: p_api_version_number ,
2816: l_api_name ,
2817: G_PKG_NAME )
2818: THEN
2819: x_err_stage := 'GMS_BUDGET_PUB.BASELINE_BUDGET - Error occured in FND_API.Compatible_API_Call';
2820: gms_error_pkg.gms_message(x_err_name => 'GMS_INCOMPATIBLE_API_CALL',
2821: x_err_code => x_err_code,
2822: x_err_buff => x_err_stage);
2823: fnd_msg_pub.add; -- Bug 2587078
3367: -- NOTE: A commit is required to actually start/activate the workflow instance opened
3368: -- by the previous Start_Budget_WF procedure.
3369:
3370:
3371: IF FND_API.TO_BOOLEAN( p_commit )
3372: THEN
3373: COMMIT;
3374: END IF;
3375:
4249: x_err_stack := x_err_stack ||'-> Add_Budget_Line';
4250:
4251: -- Initialize the message table if requested.
4252:
4253: IF FND_API.TO_BOOLEAN( p_init_msg_list )
4254: THEN
4255:
4256: FND_MSG_PUB.initialize;
4257:
4263:
4264:
4265: -- Standard call to check for call compatibility.
4266:
4267: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
4268: p_api_version_number ,
4269: l_api_name ,
4270: G_PKG_NAME )
4271: THEN
5089: */
5090: ------------------------------------------------------------------------------------
5091:
5092:
5093: IF FND_API.TO_BOOLEAN( p_commit )
5094: THEN
5095: COMMIT;
5096: END IF;
5097:
5190: x_err_stack := x_err_stack ||'-> Delete_Draft_Budget';
5191:
5192: -- Initialize the message table if requested.
5193:
5194: IF FND_API.TO_BOOLEAN( p_init_msg_list )
5195: THEN
5196:
5197: FND_MSG_PUB.initialize;
5198:
5203: SAVEPOINT delete_draft_budget_pub;
5204:
5205: -- Standard call to check for call compatibility.
5206:
5207: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
5208: p_api_version_number ,
5209: l_api_name ,
5210: G_PKG_NAME )
5211: THEN
5465: SAVEPOINT delete_draft_budget_pub;
5466:
5467: CLOSE l_lock_budget_csr; --FYI, does not release locks
5468:
5469: IF fnd_api.to_boolean(p_commit)
5470: THEN
5471: COMMIT;
5472: END IF;
5473:
5649: x_err_stack := x_err_stack ||'-> Delete_Budget_Line';
5650:
5651: -- Initialize the message table if requested.
5652:
5653: IF FND_API.TO_BOOLEAN( p_init_msg_list )
5654: THEN
5655:
5656: FND_MSG_PUB.initialize;
5657:
5662: SAVEPOINT delete_budget_line_pub;
5663:
5664: -- Standard call to check for call compatibility.
5665:
5666: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
5667: p_api_version_number ,
5668: l_api_name ,
5669: G_PKG_NAME )
5670: THEN
6158: end if;
6159: */
6160: ------------------------------------------------------------------------------------
6161:
6162: IF fnd_api.to_boolean(p_commit)
6163: THEN
6164: COMMIT;
6165: END IF;
6166:
6425: x_err_stack := x_err_stack ||'-> Update_budget';
6426:
6427: -- Initialize the message table if requested.
6428:
6429: IF FND_API.TO_BOOLEAN( p_init_msg_list )
6430: THEN
6431:
6432: FND_MSG_PUB.initialize;
6433:
6438: SAVEPOINT update_budget_pub;
6439:
6440: -- Standard call to check for call compatibility.
6441:
6442: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
6443: p_api_version_number ,
6444: l_api_name ,
6445: G_PKG_NAME )
6446: THEN
6850:
6851: -- END IF; --if there are budget lines
6852:
6853:
6854: IF FND_API.TO_BOOLEAN( p_commit )
6855: THEN
6856: COMMIT;
6857: END IF;
6858:
7110: x_err_stack := x_err_stack ||'-> Update_Budget_Line';
7111:
7112: -- Initialize the message table if requested.
7113:
7114: IF FND_API.TO_BOOLEAN( p_init_msg_list )
7115: THEN
7116:
7117: FND_MSG_PUB.initialize;
7118:
7124:
7125:
7126: -- Standard call to check for call compatibility.
7127:
7128: IF NOT FND_API.Compatible_API_Call ( g_api_version_number ,
7129: p_api_version_number ,
7130: l_api_name ,
7131: G_PKG_NAME )
7132: THEN
7711: end if;
7712: */
7713: ------------------------------------------------------------------------------------
7714:
7715: IF FND_API.TO_BOOLEAN( p_commit )
7716: THEN
7717: COMMIT;
7718: END IF;
7719: