1: PACKAGE BODY GMD_SUBSTITUTION_PUB AS
2: /* $Header: GMDPSUBB.pls 120.0.12000000.1 2007/01/31 16:16:43 appldev noship $ */
3:
4: -- Common cursors used
5: CURSOR get_substitution_id(vSubstitution_name VARCHAR2
186: /* Make sure we are call compatible */
187: IF NOT FND_API.compatible_api_call ( 1.0
188: ,p_api_version
189: ,'Create_substitution'
190: ,gmd_substitution_pub.m_pkg_name) THEN
191: RAISE invalid_version;
192: END IF;
193:
194: /* Required fields at header level */
632: ,p_data => x_message_list);
633: ROLLBACK TO SAVEPOINT substitution_api;
634: WHEN OTHERS THEN
635: x_return_status := FND_API.g_ret_sts_unexp_error;
636: fnd_msg_pub.add_exc_msg (gmd_substitution_pub.m_pkg_name, l_api_name);
637: fnd_msg_pub.count_and_get (
638: p_count => x_message_count
639: ,p_encoded => FND_API.g_false
640: ,p_data => x_message_list);
717: /* Make sure we are call compatible */
718: IF NOT FND_API.compatible_api_call ( 1.0
719: ,p_api_version
720: ,'Create_formula_association'
721: ,gmd_substitution_pub.m_pkg_name) THEN
722: RAISE invalid_version;
723: END IF;
724:
725: -- Substitution id or (substitution_name and Substitution_version)
881: ,p_data => x_message_list);
882: ROLLBACK TO SAVEPOINT substitution_api;
883: WHEN OTHERS THEN
884: x_return_status := FND_API.g_ret_sts_unexp_error;
885: fnd_msg_pub.add_exc_msg (gmd_substitution_pub.m_pkg_name, l_api_name);
886: fnd_msg_pub.count_and_get (
887: p_count => x_message_count
888: ,p_encoded => FND_API.g_false
889: ,p_data => x_message_list);
953: /* Make sure we are call compatible */
954: IF NOT FND_API.compatible_api_call ( 1.0
955: ,p_api_version
956: ,'Update_substitution_header'
957: ,gmd_substitution_pub.m_pkg_name) THEN
958: RAISE invalid_version;
959: END IF;
960:
961: /* Required fields at header level */
1169: x_return_status := FND_API.G_RET_STS_ERROR;
1170: ROLLBACK TO SAVEPOINT substitution_api;
1171: WHEN OTHERS THEN
1172: x_return_status := FND_API.g_ret_sts_unexp_error;
1173: fnd_msg_pub.add_exc_msg (gmd_substitution_pub.m_pkg_name, l_api_name);
1174: fnd_msg_pub.count_and_get (
1175: p_count => x_message_count
1176: ,p_encoded => FND_API.g_false
1177: ,p_data => x_message_list);
1258: /* Make sure we are call compatible */
1259: IF NOT FND_API.compatible_api_call ( 1.0
1260: ,p_api_version
1261: ,'Update_substitution_header'
1262: ,gmd_substitution_pub.m_pkg_name) THEN
1263: RAISE invalid_version;
1264: END IF;
1265:
1266: /* Required fields at detail level */
1442: x_return_status := FND_API.G_RET_STS_ERROR;
1443: ROLLBACK TO SAVEPOINT substitution_api;
1444: WHEN OTHERS THEN
1445: x_return_status := FND_API.g_ret_sts_unexp_error;
1446: fnd_msg_pub.add_exc_msg (gmd_substitution_pub.m_pkg_name, l_api_name);
1447: fnd_msg_pub.count_and_get (
1448: p_count => x_message_count
1449: ,p_encoded => FND_API.g_false
1450: ,p_data => x_message_list);
1521: /* Make sure we are call compatible */
1522: IF NOT FND_API.compatible_api_call ( 1.0
1523: ,p_api_version
1524: ,'Delete_formula_association'
1525: ,gmd_substitution_pub.m_pkg_name) THEN
1526: RAISE invalid_version;
1527: END IF;
1528:
1529: /* Required fields */
1634: x_return_status := FND_API.G_RET_STS_ERROR;
1635: ROLLBACK TO SAVEPOINT substitution_api;
1636: WHEN OTHERS THEN
1637: x_return_status := FND_API.g_ret_sts_unexp_error;
1638: fnd_msg_pub.add_exc_msg (gmd_substitution_pub.m_pkg_name, l_api_name);
1639: fnd_msg_pub.count_and_get (
1640: p_count => x_message_count
1641: ,p_encoded => FND_API.g_false
1642: ,p_data => x_message_list);
1642: ,p_data => x_message_list);
1643: ROLLBACK TO SAVEPOINT substitution_api;
1644: END Delete_formula_association;
1645:
1646: END GMD_SUBSTITUTION_PUB;