[Home] [Help]
191: )
192: IS
193:
194: --
195: -- Standard API information constants.
196: --
197: L_API_VERSION CONSTANT NUMBER := 1.0;
198: L_API_NAME CONSTANT VARCHAR2(30) := 'EXECUTE_FORMULA';
199: L_FULL_NAME CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| L_API_NAME;
305: FND_MSG_PUB.Initialize;
306: END IF;
307:
308: --
309: -- Standard check for API version compatibility.
310: --
311: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
312: p_api_version,
313: L_API_NAME,
943: p_formula_rec IN ams_formula_rec_type,
944: x_return_status OUT NOCOPY VARCHAR2
945: )
946: IS
947: l_item_name VARCHAR2(30); -- Used to standardize error messages.
948: l_formula_rec ams_formula_rec_type := p_formula_rec;
949: l_return_status VARCHAR2(1);
950:
951: BEGIN
996: p_formula_entry_rec IN ams_formula_entry_rec_type,
997: x_return_status OUT NOCOPY VARCHAR2
998: )
999: IS
1000: l_item_name VARCHAR2(30); -- Used to standardize error messages.
1001: l_formula_entry_rec ams_formula_entry_rec_type := p_formula_entry_rec;
1002: l_return_status VARCHAR2(1);
1003:
1004:
1331: FND_MSG_PUB.Initialize;
1332: END IF;
1333:
1334: --
1335: -- Standard check for API version compatibility.
1336: --
1337: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1338: p_api_version,
1339: L_API_NAME,
1405: -- End API Body.
1406: --
1407:
1408: --
1409: -- Standard API to get message count, and if 1,
1410: -- set the message data OUT variable.
1411: --
1412: FND_MSG_PUB.Count_And_Get (
1413: p_count => x_msg_count,
1493: FND_MSG_PUB.Initialize;
1494: END IF;
1495:
1496: --
1497: -- Standard check for API version compatibility.
1498: --
1499: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1500: p_api_version,
1501: L_API_NAME,
1567: -- End API Body.
1568: --
1569:
1570: --
1571: -- Standard API to get message count, and if 1,
1572: -- set the message data OUT variable.
1573: --
1574: FND_MSG_PUB.Count_And_Get (
1575: p_count => x_msg_count,
1639: x_formula_id OUT NOCOPY NUMBER
1640: ) IS
1641:
1642: --
1643: -- Standard API information constants.
1644: --
1645: L_API_VERSION CONSTANT NUMBER := 1.0;
1646: L_API_NAME CONSTANT VARCHAR2(30) := 'CREATE_FORMULA';
1647: L_FULL_NAME CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| L_API_NAME;
1679: FND_MSG_PUB.Initialize;
1680: END IF;
1681:
1682: --
1683: -- Standard check for API version compatibility.
1684: --
1685: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1686: p_api_version,
1687: L_API_NAME,
1819: -- End API Body.
1820: --
1821:
1822: --
1823: -- Standard check for commit request.
1824: --
1825: IF FND_API.To_Boolean (p_commit) THEN
1826: COMMIT WORK;
1827: END IF;
1826: COMMIT WORK;
1827: END IF;
1828:
1829: --
1830: -- Standard API to get message count, and if 1,
1831: -- set the message data OUT variable.
1832: --
1833: FND_MSG_PUB.Count_And_Get (
1834: p_count => x_msg_count,
1915: x_formula_entry_id OUT NOCOPY NUMBER
1916: ) IS
1917:
1918: --
1919: -- Standard API information constants.
1920: --
1921: L_API_VERSION CONSTANT NUMBER := 1.0;
1922: L_API_NAME CONSTANT VARCHAR2(30) := 'CREATE_FORMULA_ENTRY';
1923: L_FULL_NAME CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| L_API_NAME;
1955: FND_MSG_PUB.Initialize;
1956: END IF;
1957:
1958: --
1959: -- Standard check for API version compatibility.
1960: --
1961: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
1962: p_api_version,
1963: L_API_NAME,
2099: -- End API Body.
2100: --
2101:
2102: --
2103: -- Standard check for commit request.
2104: --
2105: IF FND_API.To_Boolean (p_commit) THEN
2106: COMMIT WORK;
2107: END IF;
2106: COMMIT WORK;
2107: END IF;
2108:
2109: --
2110: -- Standard API to get message count, and if 1,
2111: -- set the message data OUT variable.
2112: --
2113: FND_MSG_PUB.Count_And_Get (
2114: p_count => x_msg_count,
2220: FND_MSG_PUB.Initialize;
2221: END IF;
2222:
2223: --
2224: -- Standard check for API version compatibility.
2225: --
2226: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
2227: p_api_version,
2228: L_API_NAME,
2337: COMMIT;
2338: END IF;
2339:
2340: --
2341: -- Standard API to get message count, and if 1,
2342: -- set the message data OUT variable.
2343: --
2344: FND_MSG_PUB.Count_And_Get (
2345: p_count => x_msg_count,
2445: FND_MSG_PUB.Initialize;
2446: END IF;
2447:
2448: --
2449: -- Standard check for API version compatibility.
2450: --
2451: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
2452: p_api_version,
2453: L_API_NAME,
2565: COMMIT;
2566: END IF;
2567:
2568: --
2569: -- Standard API to get message count, and if 1,
2570: -- set the message data OUT variable.
2571: --
2572: FND_MSG_PUB.Count_And_Get (
2573: p_count => x_msg_count,
2665: FND_MSG_PUB.Initialize;
2666: END IF;
2667:
2668: --
2669: -- Standard check for API version compatibility.
2670: --
2671: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
2672: p_api_version,
2673: L_API_NAME,
2729: END IF;
2730:
2731:
2732: --
2733: -- Standard API to get message count, and if 1,
2734: -- set the message data OUT variable.
2735: --
2736: FND_MSG_PUB.Count_And_Get (
2737: p_count => x_msg_count,
2820: FND_MSG_PUB.Initialize;
2821: END IF;
2822:
2823: --
2824: -- Standard check for API version compatibility.
2825: --
2826: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
2827: p_api_version,
2828: L_API_NAME,
2880: END IF;
2881:
2882:
2883: --
2884: -- Standard API to get message count, and if 1,
2885: -- set the message data OUT variable.
2886: --
2887: FND_MSG_PUB.Count_And_Get (
2888: p_count => x_msg_count,
2972: FND_MSG_PUB.Initialize;
2973: END IF;
2974:
2975: --
2976: -- Standard check for API version compatibility.
2977: --
2978: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
2979: p_api_version,
2980: L_API_NAME,
3011: CLOSE c_formula_info;
3012:
3013:
3014: --
3015: -- Standard API to get message count, and if 1,
3016: -- set the message data OUT variable.
3017: --
3018: FND_MSG_PUB.Count_And_Get (
3019: p_count => x_msg_count,
3122: FND_MSG_PUB.Initialize;
3123: END IF;
3124:
3125: --
3126: -- Standard check for API version compatibility.
3127: --
3128: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
3129: p_api_version,
3130: L_API_NAME,
3161: CLOSE c_formula_entry_info;
3162:
3163:
3164: --
3165: -- Standard API to get message count, and if 1,
3166: -- set the message data OUT variable.
3167: --
3168: FND_MSG_PUB.Count_And_Get (
3169: p_count => x_msg_count,