53: l_dup_return_status VARCHAR2(1);
54:
55:
56: BEGIN
57: -- Standard Start of API savepoint
58: SAVEPOINT Create_Item_Sec_Assoc;
59:
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.Compatible_API_Call ( l_api_version,
56: BEGIN
57: -- Standard Start of API savepoint
58: SAVEPOINT Create_Item_Sec_Assoc;
59:
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.Compatible_API_Call ( l_api_version,
62: p_api_version,
63: l_api_name,
64: G_PKG_NAME)
141: RAISE FND_API.G_EXC_ERROR;
142: END IF;
143:
144:
145: -- Standard check for p_commit
146: IF FND_API.to_Boolean( p_commit )
147: THEN
148: COMMIT WORK;
149: END IF;
151:
152: -- Debug Message
153: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
154:
155: -- Standard call to get message count and if count is 1, get message info.
156: FND_MSG_PUB.Count_And_Get
157: (p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160: EXCEPTION
161: WHEN FND_API.G_EXC_ERROR THEN
162: ROLLBACK TO Create_Item_Sec_Assoc;
163: x_return_status := FND_API.G_RET_STS_ERROR;
164: -- Standard call to get message count and if count=1, get the message
165: FND_MSG_PUB.Count_And_Get (
166: p_encoded => FND_API.G_FALSE,
167: p_count => x_msg_count,
168: p_data => x_msg_data
169: );
170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
171: ROLLBACK TO Create_Item_Sec_Assoc;
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173: -- Standard call to get message count and if count=1, get the message
174: FND_MSG_PUB.Count_And_Get (
175: p_encoded => FND_API.G_FALSE,
176: p_count => x_msg_count,
177: p_data => x_msg_data
182: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
183: THEN
184: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
185: END IF;
186: -- Standard call to get message count and if count=1, get the message
187: FND_MSG_PUB.Count_And_Get (
188: p_encoded => FND_API.G_FALSE,
189: p_count => x_msg_count,
190: p_data => x_msg_data
226:
227:
228:
229: BEGIN
230: -- Standard Start of API savepoint
231: SAVEPOINT Delete_item_sec_assoc;
232:
233: -- Standard call to check for call compatibility.
234: IF NOT FND_API.Compatible_API_Call ( l_api_version,
229: BEGIN
230: -- Standard Start of API savepoint
231: SAVEPOINT Delete_item_sec_assoc;
232:
233: -- Standard call to check for call compatibility.
234: IF NOT FND_API.Compatible_API_Call ( l_api_version,
235: p_api_version,
236: l_api_name,
237: G_PKG_NAME)
295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
296: END IF;
297:
298:
299: -- Standard check for p_commit
300: IF FND_API.to_Boolean( p_commit )
301: THEN
302: COMMIT WORK;
303: END IF;
305:
306: -- Debug Message
307: -- AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
308:
309: -- Standard call to get message count and if count is 1, get message info.
310: FND_MSG_PUB.Count_And_Get
311: (p_count => x_msg_count,
312: p_data => x_msg_data
313: );
314: EXCEPTION
315: WHEN FND_API.G_EXC_ERROR THEN
316: ROLLBACK TO Delete_item_sec_assoc;
317: x_return_status := FND_API.G_RET_STS_ERROR;
318: -- Standard call to get message count and if count=1, get the message
319: FND_MSG_PUB.Count_And_Get (
320: p_encoded => FND_API.G_FALSE,
321: p_count => x_msg_count,
322: p_data => x_msg_data
323: );
324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
325: ROLLBACK TO Delete_item_sec_assoc;
326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
327: -- Standard call to get message count and if count=1, get the message
328: FND_MSG_PUB.Count_And_Get (
329: p_encoded => FND_API.G_FALSE,
330: p_count => x_msg_count,
331: p_data => x_msg_data
336: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
337: THEN
338: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
339: END IF;
340: -- Standard call to get message count and if count=1, get the message
341: FND_MSG_PUB.Count_And_Get (
342: p_encoded => FND_API.G_FALSE,
343: p_count => x_msg_count,
344: p_data => x_msg_data