49: BEGIN
50: -- Standard Start of API savepoint
51: SAVEPOINT create_item_PVT;
52: -- Standard call to check for call compatibility.
53: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
54: p_api_version_number,
55: l_api_name,
56: G_PKG_NAME)
57: THEN
54: p_api_version_number,
55: l_api_name,
56: G_PKG_NAME)
57: THEN
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END IF;
60: -- Initialize message list if p_init_msg_list is set to TRUE.
61: IF FND_API.to_Boolean( p_init_msg_list )
62: THEN
57: THEN
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END IF;
60: -- Initialize message list if p_init_msg_list is set to TRUE.
61: IF FND_API.to_Boolean( p_init_msg_list )
62: THEN
63: FND_MSG_PUB.initialize;
64: END IF;
65: -- Initialize API return status to SUCCESS
62: THEN
63: FND_MSG_PUB.initialize;
64: END IF;
65: -- Initialize API return status to SUCCESS
66: x_return_status := FND_API.G_RET_STS_SUCCESS;
67: SELECT IEM_KB_RESULTS_s1.nextval
68: INTO l_seq_id
69: FROM dual;
70:
147: p_ATTRIBUTE15
148: );
149:
150: -- Standard Check Of p_commit.
151: IF FND_API.To_Boolean(p_commit) THEN
152: COMMIT WORK;
153: END IF;
154: -- Standard callto get message count and if count is 1, get message info.
155: FND_MSG_PUB.Count_And_Get
156: ( p_count => x_msg_count,
157: p_data => x_msg_data
158: );
159: EXCEPTION
160: WHEN FND_API.G_EXC_ERROR THEN
161: ROLLBACK TO create_item_PVT;
162: x_return_status := FND_API.G_RET_STS_ERROR ;
163: FND_MSG_PUB.Count_And_Get
164: ( p_count => x_msg_count,
158: );
159: EXCEPTION
160: WHEN FND_API.G_EXC_ERROR THEN
161: ROLLBACK TO create_item_PVT;
162: x_return_status := FND_API.G_RET_STS_ERROR ;
163: FND_MSG_PUB.Count_And_Get
164: ( p_count => x_msg_count,
165: p_data => x_msg_data
166: );
163: FND_MSG_PUB.Count_And_Get
164: ( p_count => x_msg_count,
165: p_data => x_msg_data
166: );
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
168: ROLLBACK TO create_item_PVT;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
170: FND_MSG_PUB.Count_And_Get
171: ( p_count => x_msg_count,
165: p_data => x_msg_data
166: );
167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
168: ROLLBACK TO create_item_PVT;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
170: FND_MSG_PUB.Count_And_Get
171: ( p_count => x_msg_count,
172: p_data => x_msg_data
173: );
172: p_data => x_msg_data
173: );
174: WHEN OTHERS THEN
175: ROLLBACK TO create_item_PVT;
176: x_return_status := FND_API.G_RET_STS_ERROR;
177: IF FND_MSG_PUB.Check_Msg_Level
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: FND_MSG_PUB.Add_Exc_Msg
202: BEGIN
203: -- Standard Start of API savepoint
204: SAVEPOINT delete_item_PVT;
205: -- Standard call to check for call compatibility.
206: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
207: p_api_version_number,
208: l_api_name,
209: G_PKG_NAME)
210: THEN
207: p_api_version_number,
208: l_api_name,
209: G_PKG_NAME)
210: THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213: -- Initialize message list if p_init_msg_list is set to TRUE.
214: IF FND_API.to_Boolean( p_init_msg_list )
215: THEN
210: THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213: -- Initialize message list if p_init_msg_list is set to TRUE.
214: IF FND_API.to_Boolean( p_init_msg_list )
215: THEN
216: FND_MSG_PUB.initialize;
217: END IF;
218: -- Initialize API return status to SUCCESS
215: THEN
216: FND_MSG_PUB.initialize;
217: END IF;
218: -- Initialize API return status to SUCCESS
219: x_return_status := FND_API.G_RET_STS_SUCCESS;
220:
221: DELETE FROM IEM_KB_RESULTS
222: where kb_delete='Y';
223:
221: DELETE FROM IEM_KB_RESULTS
222: where kb_delete='Y';
223:
224: -- Standard Check Of p_commit.
225: IF FND_API.To_Boolean(p_commit) THEN
226: COMMIT WORK;
227: END IF;
228: -- Standard callto get message count and if count is 1, get message info.
229: FND_MSG_PUB.Count_And_Get
230: ( p_count => x_msg_count,
231: p_data => x_msg_data
232: );
233: EXCEPTION
234: WHEN FND_API.G_EXC_ERROR THEN
235: ROLLBACK TO delete_item_PVT;
236: x_return_status := FND_API.G_RET_STS_ERROR ;
237: FND_MSG_PUB.Count_And_Get
238: ( p_count => x_msg_count,
232: );
233: EXCEPTION
234: WHEN FND_API.G_EXC_ERROR THEN
235: ROLLBACK TO delete_item_PVT;
236: x_return_status := FND_API.G_RET_STS_ERROR ;
237: FND_MSG_PUB.Count_And_Get
238: ( p_count => x_msg_count,
239: p_data => x_msg_data
240: );
237: FND_MSG_PUB.Count_And_Get
238: ( p_count => x_msg_count,
239: p_data => x_msg_data
240: );
241: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
242: ROLLBACK TO delete_item_PVT;
243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
244: FND_MSG_PUB.Count_And_Get
245: ( p_count => x_msg_count,
239: p_data => x_msg_data
240: );
241: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
242: ROLLBACK TO delete_item_PVT;
243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
244: FND_MSG_PUB.Count_And_Get
245: ( p_count => x_msg_count,
246: p_data => x_msg_data
247: );
246: p_data => x_msg_data
247: );
248: WHEN OTHERS THEN
249: ROLLBACK TO delete_item_PVT;
250: x_return_status := FND_API.G_RET_STS_ERROR;
251: IF FND_MSG_PUB.Check_Msg_Level
252: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg
301: BEGIN
302: -- Standard Start of API savepoint
303: SAVEPOINT update_item_PVT;
304: -- Standard call to check for call compatibility.
305: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
306: p_api_version_number,
307: l_api_name,
308: G_PKG_NAME)
309: THEN
306: p_api_version_number,
307: l_api_name,
308: G_PKG_NAME)
309: THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
312: -- Initialize message list if p_init_msg_list is set to TRUE.
313: IF FND_API.to_Boolean( p_init_msg_list )
314: THEN
309: THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
312: -- Initialize message list if p_init_msg_list is set to TRUE.
313: IF FND_API.to_Boolean( p_init_msg_list )
314: THEN
315: FND_MSG_PUB.initialize;
316: END IF;
317: -- Initialize API return status to SUCCESS
314: THEN
315: FND_MSG_PUB.initialize;
316: END IF;
317: -- Initialize API return status to SUCCESS
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319: UPDATE IEM_KB_RESULTS
320: set kb_delete='Y'
321: where kb_result_id=p_kb_result_id ;
322:
320: set kb_delete='Y'
321: where kb_result_id=p_kb_result_id ;
322:
323: -- Standard Check Of p_commit.
324: IF FND_API.To_Boolean(p_commit) THEN
325: COMMIT WORK;
326: END IF;
327: -- Standard callto get message count and if count is 1, get message info.
328: FND_MSG_PUB.Count_And_Get
329: ( p_count => x_msg_count,
330: p_data => x_msg_data
331: );
332: EXCEPTION
333: WHEN FND_API.G_EXC_ERROR THEN
334: ROLLBACK TO update_item_PVT;
335: x_return_status := FND_API.G_RET_STS_ERROR ;
336: FND_MSG_PUB.Count_And_Get
337: ( p_count => x_msg_count,
331: );
332: EXCEPTION
333: WHEN FND_API.G_EXC_ERROR THEN
334: ROLLBACK TO update_item_PVT;
335: x_return_status := FND_API.G_RET_STS_ERROR ;
336: FND_MSG_PUB.Count_And_Get
337: ( p_count => x_msg_count,
338: p_data => x_msg_data
339: );
336: FND_MSG_PUB.Count_And_Get
337: ( p_count => x_msg_count,
338: p_data => x_msg_data
339: );
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: ROLLBACK TO update_item_PVT;
342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
343: FND_MSG_PUB.Count_And_Get
344: ( p_count => x_msg_count,
338: p_data => x_msg_data
339: );
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: ROLLBACK TO update_item_PVT;
342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
343: FND_MSG_PUB.Count_And_Get
344: ( p_count => x_msg_count,
345: p_data => x_msg_data
346: );
345: p_data => x_msg_data
346: );
347: WHEN OTHERS THEN
348: ROLLBACK TO update_item_PVT;
349: x_return_status := FND_API.G_RET_STS_ERROR;
350: IF FND_MSG_PUB.Check_Msg_Level
351: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
352: THEN
353: FND_MSG_PUB.Add_Exc_Msg