[Home] [Help]
59: FROM AMS_IBA_PS_CNDCLSES_B
60: WHERE CND_CLAUSE_ID = l_id;
61:
62: BEGIN
63: -- Standard Start of API savepoint
64: SAVEPOINT CREATE_Ps_Cndclses_PVT;
65:
66: -- Standard call to check for call compatibility.
67: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
62: BEGIN
63: -- Standard Start of API savepoint
64: SAVEPOINT CREATE_Ps_Cndclses_PVT;
65:
66: -- Standard call to check for call compatibility.
67: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
68: p_api_version_number,
69: l_api_name,
70: G_PKG_NAME)
189: --
190:
191: x_cnd_clause_id := l_cnd_clause_id;
192:
193: -- Standard check for p_commit
194: IF FND_API.to_Boolean( p_commit )
195: THEN
196: COMMIT WORK;
197: END IF;
202:
203: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
204: END IF;
205:
206: -- Standard call to get message count and if count is 1, get message info.
207: FND_MSG_PUB.Count_And_Get
208: (p_count => x_msg_count,
209: p_data => x_msg_data
210: );
216:
217: WHEN FND_API.G_EXC_ERROR THEN
218: ROLLBACK TO CREATE_Ps_Cndclses_PVT;
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: -- Standard call to get message count and if count=1, get the message
221: FND_MSG_PUB.Count_And_Get (
222: p_encoded => FND_API.G_FALSE,
223: p_count => x_msg_count,
224: p_data => x_msg_data
226:
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: ROLLBACK TO CREATE_Ps_Cndclses_PVT;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: -- Standard call to get message count and if count=1, get the message
231: FND_MSG_PUB.Count_And_Get (
232: p_encoded => FND_API.G_FALSE,
233: p_count => x_msg_count,
234: p_data => x_msg_data
240: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
241: THEN
242: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
243: END IF;
244: -- Standard call to get message count and if count=1, get the message
245: FND_MSG_PUB.Count_And_Get (
246: p_encoded => FND_API.G_FALSE,
247: p_count => x_msg_count,
248: p_data => x_msg_data
281: l_tar_ps_cndclses_rec AMS_Ps_Cndclses_PVT.ps_cndclses_rec_type := P_ps_cndclses_rec;
282: l_rowid ROWID;
283:
284: BEGIN
285: -- Standard Start of API savepoint
286: SAVEPOINT UPDATE_Ps_Cndclses_PVT;
287:
288: -- Standard call to check for call compatibility.
289: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
284: BEGIN
285: -- Standard Start of API savepoint
286: SAVEPOINT UPDATE_Ps_Cndclses_PVT;
287:
288: -- Standard call to check for call compatibility.
289: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
290: p_api_version_number,
291: l_api_name,
292: G_PKG_NAME)
395: --
396: -- End of API body.
397: --
398:
399: -- Standard check for p_commit
400: IF FND_API.to_Boolean( p_commit )
401: THEN
402: COMMIT WORK;
403: END IF;
408:
409: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
410: END IF;
411:
412: -- Standard call to get message count and if count is 1, get message info.
413: FND_MSG_PUB.Count_And_Get
414: (p_count => x_msg_count,
415: p_data => x_msg_data
416: );
422:
423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO UPDATE_Ps_Cndclses_PVT;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: -- Standard call to get message count and if count=1, get the message
427: FND_MSG_PUB.Count_And_Get (
428: p_encoded => FND_API.G_FALSE,
429: p_count => x_msg_count,
430: p_data => x_msg_data
432:
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: ROLLBACK TO UPDATE_Ps_Cndclses_PVT;
435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
436: -- Standard call to get message count and if count=1, get the message
437: FND_MSG_PUB.Count_And_Get (
438: p_encoded => FND_API.G_FALSE,
439: p_count => x_msg_count,
440: p_data => x_msg_data
446: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
447: THEN
448: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
449: END IF;
450: -- Standard call to get message count and if count=1, get the message
451: FND_MSG_PUB.Count_And_Get (
452: p_encoded => FND_API.G_FALSE,
453: p_count => x_msg_count,
454: p_data => x_msg_data
477: l_count Number;
478: l_cnd_rcode VARCHAR2(30);
479:
480: BEGIN
481: -- Standard Start of API savepoint
482: SAVEPOINT DELETE_Ps_Cndclses_PVT;
483:
484: -- Standard call to check for call compatibility.
485: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
480: BEGIN
481: -- Standard Start of API savepoint
482: SAVEPOINT DELETE_Ps_Cndclses_PVT;
483:
484: -- Standard call to check for call compatibility.
485: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
486: p_api_version_number,
487: l_api_name,
488: G_PKG_NAME)
546: --
547: -- End of API body
548: --
549:
550: -- Standard check for p_commit
551: IF FND_API.to_Boolean(p_commit)
552: THEN
553: COMMIT WORK;
554: END IF;
558:
559: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
560: END IF;
561:
562: -- Standard call to get message count and if count is 1, get message info.
563: FND_MSG_PUB.Count_And_Get
564: (p_count => x_msg_count,
565: p_data => x_msg_data
566: );
573:
574: WHEN FND_API.G_EXC_ERROR THEN
575: ROLLBACK TO DELETE_Ps_Cndclses_PVT;
576: x_return_status := FND_API.G_RET_STS_ERROR;
577: -- Standard call to get message count and if count=1, get the message
578: FND_MSG_PUB.Count_And_Get (
579: p_encoded => FND_API.G_FALSE,
580: p_count => x_msg_count,
581: p_data => x_msg_data
583:
584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
585: ROLLBACK TO DELETE_Ps_Cndclses_PVT;
586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: -- Standard call to get message count and if count=1, get the message
588: FND_MSG_PUB.Count_And_Get (
589: p_encoded => FND_API.G_FALSE,
590: p_count => x_msg_count,
591: p_data => x_msg_data
597: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
598: THEN
599: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
600: END IF;
601: -- Standard call to get message count and if count=1, get the message
602: FND_MSG_PUB.Count_And_Get (
603: p_encoded => FND_API.G_FALSE,
604: p_count => x_msg_count,
605: p_data => x_msg_data
645: THEN
646: FND_MSG_PUB.initialize;
647: END IF;
648:
649: -- Standard call to check for call compatibility.
650: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
651: p_api_version_number,
652: l_api_name,
653: G_PKG_NAME)
696:
697: WHEN FND_API.G_EXC_ERROR THEN
698: ROLLBACK TO LOCK_Ps_Cndclses_PVT;
699: x_return_status := FND_API.G_RET_STS_ERROR;
700: -- Standard call to get message count and if count=1, get the message
701: FND_MSG_PUB.Count_And_Get (
702: p_encoded => FND_API.G_FALSE,
703: p_count => x_msg_count,
704: p_data => x_msg_data
706:
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: ROLLBACK TO LOCK_Ps_Cndclses_PVT;
709: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
710: -- Standard call to get message count and if count=1, get the message
711: FND_MSG_PUB.Count_And_Get (
712: p_encoded => FND_API.G_FALSE,
713: p_count => x_msg_count,
714: p_data => x_msg_data
720: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
721: THEN
722: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
723: END IF;
724: -- Standard call to get message count and if count=1, get the message
725: FND_MSG_PUB.Count_And_Get (
726: p_encoded => FND_API.G_FALSE,
727: p_count => x_msg_count,
728: p_data => x_msg_data
1013: l_object_version_number NUMBER;
1014: l_ps_cndclses_rec AMS_Ps_Cndclses_PVT.ps_cndclses_rec_type;
1015:
1016: BEGIN
1017: -- Standard Start of API savepoint
1018: SAVEPOINT VALIDATE_Ps_Cndclses_;
1019:
1020: -- Standard call to check for call compatibility.
1021: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1016: BEGIN
1017: -- Standard Start of API savepoint
1018: SAVEPOINT VALIDATE_Ps_Cndclses_;
1019:
1020: -- Standard call to check for call compatibility.
1021: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1022: p_api_version_number,
1023: l_api_name,
1024: G_PKG_NAME)
1079: IF (AMS_DEBUG_HIGH_ON) THEN
1080: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1081: END IF;
1082:
1083: -- Standard call to get message count and if count is 1, get message info.
1084: FND_MSG_PUB.Count_And_Get
1085: (p_count => x_msg_count,
1086: p_data => x_msg_data
1087: );
1093:
1094: WHEN FND_API.G_EXC_ERROR THEN
1095: ROLLBACK TO VALIDATE_Ps_Cndclses_;
1096: x_return_status := FND_API.G_RET_STS_ERROR;
1097: -- Standard call to get message count and if count=1, get the message
1098: FND_MSG_PUB.Count_And_Get (
1099: p_encoded => FND_API.G_FALSE,
1100: p_count => x_msg_count,
1101: p_data => x_msg_data
1103:
1104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1105: ROLLBACK TO VALIDATE_Ps_Cndclses_;
1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1107: -- Standard call to get message count and if count=1, get the message
1108: FND_MSG_PUB.Count_And_Get (
1109: p_encoded => FND_API.G_FALSE,
1110: p_count => x_msg_count,
1111: p_data => x_msg_data
1117: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1118: THEN
1119: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1120: END IF;
1121: -- Standard call to get message count and if count=1, get the message
1122: FND_MSG_PUB.Count_And_Get (
1123: p_encoded => FND_API.G_FALSE,
1124: p_count => x_msg_count,
1125: p_data => x_msg_data
1155: IF (AMS_DEBUG_HIGH_ON) THEN
1156:
1157: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1158: END IF;
1159: -- Standard call to get message count and if count is 1, get message info.
1160: FND_MSG_PUB.Count_And_Get
1161: (p_count => x_msg_count,
1162: p_data => x_msg_data
1163: );