[Home] [Help]
39: L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Ps_Rule';
40: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
41: l_pvt_ps_rules_rec AMS_Ps_Rule_PVT.ps_rules_rec_type;
42: BEGIN
43: -- Standard Start of API savepoint
44: SAVEPOINT CREATE_Ps_Rule_PUB;
45:
46: -- Standard call to check for call compatibility.
47: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
42: BEGIN
43: -- Standard Start of API savepoint
44: SAVEPOINT CREATE_Ps_Rule_PUB;
45:
46: -- Standard call to check for call compatibility.
47: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
48: p_api_version_number,
49: l_api_name,
50: G_PKG_NAME)
94: --
95: -- End of API body.
96: --
97:
98: -- Standard check for p_commit
99: IF FND_API.to_Boolean( p_commit )
100: THEN
101: COMMIT WORK;
102: END IF;
107:
108: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
109: END IF;
110:
111: -- Standard call to get message count and if count is 1, get message info.
112: FND_MSG_PUB.Count_And_Get
113: (p_count => x_msg_count,
114: p_data => x_msg_data
115: );
121:
122: WHEN FND_API.G_EXC_ERROR THEN
123: ROLLBACK TO CREATE_Ps_Rule_PUB;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: -- Standard call to get message count and if count=1, get the message
126: FND_MSG_PUB.Count_And_Get (
127: p_encoded => FND_API.G_FALSE,
128: p_count => x_msg_count,
129: p_data => x_msg_data
131:
132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
133: ROLLBACK TO CREATE_Ps_Rule_PUB;
134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
135: -- Standard call to get message count and if count=1, get the message
136: FND_MSG_PUB.Count_And_Get (
137: p_encoded => FND_API.G_FALSE,
138: p_count => x_msg_count,
139: p_data => x_msg_data
145: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
146: THEN
147: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
148: END IF;
149: -- Standard call to get message count and if count=1, get the message
150: FND_MSG_PUB.Count_And_Get (
151: p_encoded => FND_API.G_FALSE,
152: p_count => x_msg_count,
153: p_data => x_msg_data
179: l_pvt_ps_rules_rec AMS_Ps_Rule_PVT.ps_rules_rec_type;
180: l_ps_filter_tbl AMS_Ps_Rule_PVT.ps_rules_tuple_tbl_type;
181: l_ps_strategy_tbl AMS_Ps_Rule_PVT.ps_rules_tuple_tbl_type;
182: BEGIN
183: -- Standard Start of API savepoint
184: SAVEPOINT UPDATE_Ps_Rule_PUB;
185:
186: -- Standard call to check for call compatibility.
187: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
182: BEGIN
183: -- Standard Start of API savepoint
184: SAVEPOINT UPDATE_Ps_Rule_PUB;
185:
186: -- Standard call to check for call compatibility.
187: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
188: p_api_version_number,
189: l_api_name,
190: G_PKG_NAME)
234: --
235: -- End of API body
236: --
237:
238: -- Standard check for p_commit
239: IF FND_API.to_Boolean( p_commit )
240: THEN
241: COMMIT WORK;
242: END IF;
247:
248: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
249: END IF;
250:
251: -- Standard call to get message count and if count is 1, get message info.
252: FND_MSG_PUB.Count_And_Get
253: (p_count => x_msg_count,
254: p_data => x_msg_data
255: );
261:
262: WHEN FND_API.G_EXC_ERROR THEN
263: ROLLBACK TO UPDATE_Ps_Rule_PUB;
264: x_return_status := FND_API.G_RET_STS_ERROR;
265: -- Standard call to get message count and if count=1, get the message
266: FND_MSG_PUB.Count_And_Get (
267: p_encoded => FND_API.G_FALSE,
268: p_count => x_msg_count,
269: p_data => x_msg_data
271:
272: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
273: ROLLBACK TO UPDATE_Ps_Rule_PUB;
274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
275: -- Standard call to get message count and if count=1, get the message
276: FND_MSG_PUB.Count_And_Get (
277: p_encoded => FND_API.G_FALSE,
278: p_count => x_msg_count,
279: p_data => x_msg_data
285: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
286: THEN
287: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
288: END IF;
289: -- Standard call to get message count and if count=1, get the message
290: FND_MSG_PUB.Count_And_Get (
291: p_encoded => FND_API.G_FALSE,
292: p_count => x_msg_count,
293: p_data => x_msg_data
312: l_RULE_ID NUMBER := p_RULE_ID;
313: l_object_version_number NUMBER := p_object_version_number;
314: l_pvt_ps_rules_rec AMS_Ps_Rule_PVT.ps_rules_rec_type;
315: BEGIN
316: -- Standard Start of API savepoint
317: SAVEPOINT DELETE_Ps_Rule_PUB;
318:
319: -- Standard call to check for call compatibility.
320: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
315: BEGIN
316: -- Standard Start of API savepoint
317: SAVEPOINT DELETE_Ps_Rule_PUB;
318:
319: -- Standard call to check for call compatibility.
320: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
321: p_api_version_number,
322: l_api_name,
323: G_PKG_NAME)
365: --
366: -- End of API body
367: --
368:
369: -- Standard check for p_commit
370: IF FND_API.to_Boolean( p_commit )
371: THEN
372: COMMIT WORK;
373: END IF;
378:
379: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
380: END IF;
381:
382: -- Standard call to get message count and if count is 1, get message info.
383: FND_MSG_PUB.Count_And_Get
384: (p_count => x_msg_count,
385: p_data => x_msg_data
386: );
392:
393: WHEN FND_API.G_EXC_ERROR THEN
394: ROLLBACK TO DELETE_Ps_Rule_PUB;
395: x_return_status := FND_API.G_RET_STS_ERROR;
396: -- Standard call to get message count and if count=1, get the message
397: FND_MSG_PUB.Count_And_Get (
398: p_encoded => FND_API.G_FALSE,
399: p_count => x_msg_count,
400: p_data => x_msg_data
402:
403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
404: ROLLBACK TO DELETE_Ps_Rule_PUB;
405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
406: -- Standard call to get message count and if count=1, get the message
407: FND_MSG_PUB.Count_And_Get (
408: p_encoded => FND_API.G_FALSE,
409: p_count => x_msg_count,
410: p_data => x_msg_data
416: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
417: THEN
418: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
419: END IF;
420: -- Standard call to get message count and if count=1, get the message
421: FND_MSG_PUB.Count_And_Get (
422: p_encoded => FND_API.G_FALSE,
423: p_count => x_msg_count,
424: p_data => x_msg_data
442: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
443: l_pvt_ps_rules_rec AMS_Ps_Rule_PVT.ps_rules_rec_type;
444: BEGIN
445:
446: -- Standard call to check for call compatibility.
447: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
448: p_api_version_number,
449: l_api_name,
450: G_PKG_NAME)
507:
508: WHEN FND_API.G_EXC_ERROR THEN
509: ROLLBACK TO LOCK_Ps_Rule_PUB;
510: x_return_status := FND_API.G_RET_STS_ERROR;
511: -- Standard call to get message count and if count=1, get the message
512: FND_MSG_PUB.Count_And_Get (
513: p_encoded => FND_API.G_FALSE,
514: p_count => x_msg_count,
515: p_data => x_msg_data
517:
518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
519: ROLLBACK TO LOCK_Ps_Rule_PUB;
520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
521: -- Standard call to get message count and if count=1, get the message
522: FND_MSG_PUB.Count_And_Get (
523: p_encoded => FND_API.G_FALSE,
524: p_count => x_msg_count,
525: p_data => x_msg_data
531: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
532: THEN
533: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
534: END IF;
535: -- Standard call to get message count and if count=1, get the message
536: FND_MSG_PUB.Count_And_Get (
537: p_encoded => FND_API.G_FALSE,
538: p_count => x_msg_count,
539: p_data => x_msg_data