23: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amspdrsb.pls';
24:
25: PROCEDURE Create_Scoreresult(
26: p_api_version IN NUMBER,
27: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
28: p_commit IN VARCHAR2 := FND_API.G_FALSE,
29:
30: x_return_status OUT VARCHAR2,
31: x_msg_count OUT NUMBER,
24:
25: PROCEDURE Create_Scoreresult(
26: p_api_version IN NUMBER,
27: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
28: p_commit IN VARCHAR2 := FND_API.G_FALSE,
29:
30: x_return_status OUT VARCHAR2,
31: x_msg_count OUT NUMBER,
32: x_msg_data OUT VARCHAR2,
42: -- Standard Start of API savepoint
43: SAVEPOINT CREATE_Scoreresult_PUB;
44:
45: -- Standard call to check for call compatibility.
46: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
47: p_api_version,
48: l_api_name,
49: G_PKG_NAME)
50: THEN
47: p_api_version,
48: l_api_name,
49: G_PKG_NAME)
50: THEN
51: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
52: END IF;
53:
54: -- Initialize message list if p_init_msg_list is set to TRUE.
55: IF FND_API.to_Boolean( p_init_msg_list )
51: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
52: END IF;
53:
54: -- Initialize message list if p_init_msg_list is set to TRUE.
55: IF FND_API.to_Boolean( p_init_msg_list )
56: THEN
57: FND_MSG_PUB.initialize;
58: END IF;
59:
61: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
62:
63:
64: -- Initialize API return status to SUCCESS
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66:
67: --
68: -- API body
69: --
78:
79: -- Calling Private package: Create_Scoreresult
80: AMS_Scoreresult_PVT.Create_Scoreresult(
81: p_api_version => 1.0,
82: p_init_msg_list => FND_API.G_FALSE,
83: p_commit => FND_API.G_FALSE,
84: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
85: x_return_status => x_return_status,
86: x_msg_count => x_msg_count,
79: -- Calling Private package: Create_Scoreresult
80: AMS_Scoreresult_PVT.Create_Scoreresult(
81: p_api_version => 1.0,
82: p_init_msg_list => FND_API.G_FALSE,
83: p_commit => FND_API.G_FALSE,
84: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
85: x_return_status => x_return_status,
86: x_msg_count => x_msg_count,
87: x_msg_data => x_msg_data,
80: AMS_Scoreresult_PVT.Create_Scoreresult(
81: p_api_version => 1.0,
82: p_init_msg_list => FND_API.G_FALSE,
83: p_commit => FND_API.G_FALSE,
84: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
85: x_return_status => x_return_status,
86: x_msg_count => x_msg_count,
87: x_msg_data => x_msg_data,
88: p_scoreresult_rec => l_pvt_scoreresult_rec,
88: p_scoreresult_rec => l_pvt_scoreresult_rec,
89: x_score_result_id => x_score_result_id
90: );
91: -- Check return status from the above procedure call
92: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
93: RAISE FND_API.G_EXC_ERROR;
94: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
89: x_score_result_id => x_score_result_id
90: );
91: -- Check return status from the above procedure call
92: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
93: RAISE FND_API.G_EXC_ERROR;
94: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
97: --
90: );
91: -- Check return status from the above procedure call
92: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
93: RAISE FND_API.G_EXC_ERROR;
94: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
97: --
98: -- End of API body.
91: -- Check return status from the above procedure call
92: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
93: RAISE FND_API.G_EXC_ERROR;
94: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
97: --
98: -- End of API body.
99: --
98: -- End of API body.
99: --
100:
101: -- Standard check for p_commit
102: IF FND_API.to_Boolean( p_commit ) THEN
103: COMMIT WORK;
104: END IF;
105:
106:
114: );
115: EXCEPTION
116:
117: WHEN AMS_Utility_PVT.resource_locked THEN
118: x_return_status := FND_API.g_ret_sts_error;
119: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
120:
121: WHEN FND_API.G_EXC_ERROR THEN
122: ROLLBACK TO CREATE_Scoreresult_PUB;
117: WHEN AMS_Utility_PVT.resource_locked THEN
118: x_return_status := FND_API.g_ret_sts_error;
119: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
120:
121: WHEN FND_API.G_EXC_ERROR THEN
122: ROLLBACK TO CREATE_Scoreresult_PUB;
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: -- Standard call to get message count and if count=1, get the message
125: FND_MSG_PUB.Count_And_Get (
119: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
120:
121: WHEN FND_API.G_EXC_ERROR THEN
122: ROLLBACK TO CREATE_Scoreresult_PUB;
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: -- Standard call to get message count and if count=1, get the message
125: FND_MSG_PUB.Count_And_Get (
126: p_encoded => FND_API.G_FALSE,
127: p_count => x_msg_count,
122: ROLLBACK TO CREATE_Scoreresult_PUB;
123: x_return_status := FND_API.G_RET_STS_ERROR;
124: -- Standard call to get message count and if count=1, get the message
125: FND_MSG_PUB.Count_And_Get (
126: p_encoded => FND_API.G_FALSE,
127: p_count => x_msg_count,
128: p_data => x_msg_data
129: );
130:
127: p_count => x_msg_count,
128: p_data => x_msg_data
129: );
130:
131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
132: ROLLBACK TO CREATE_Scoreresult_PUB;
133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
134: -- Standard call to get message count and if count=1, get the message
135: FND_MSG_PUB.Count_And_Get (
129: );
130:
131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
132: ROLLBACK TO CREATE_Scoreresult_PUB;
133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
134: -- Standard call to get message count and if count=1, get the message
135: FND_MSG_PUB.Count_And_Get (
136: p_encoded => FND_API.G_FALSE,
137: p_count => x_msg_count,
132: ROLLBACK TO CREATE_Scoreresult_PUB;
133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
134: -- Standard call to get message count and if count=1, get the message
135: FND_MSG_PUB.Count_And_Get (
136: p_encoded => FND_API.G_FALSE,
137: p_count => x_msg_count,
138: p_data => x_msg_data
139: );
140:
139: );
140:
141: WHEN OTHERS THEN
142: ROLLBACK TO CREATE_Scoreresult_PUB;
143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
144: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
145: THEN
146: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
147: END IF;
146: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
147: END IF;
148: -- Standard call to get message count and if count=1, get the message
149: FND_MSG_PUB.Count_And_Get (
150: p_encoded => FND_API.G_FALSE,
151: p_count => x_msg_count,
152: p_data => x_msg_data
153: );
154: End Create_Scoreresult;
155:
156:
157: PROCEDURE Update_Scoreresult(
158: p_api_version IN NUMBER,
159: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
160: p_commit IN VARCHAR2 := FND_API.G_FALSE,
161:
162: x_return_status OUT VARCHAR2,
163: x_msg_count OUT NUMBER,
156:
157: PROCEDURE Update_Scoreresult(
158: p_api_version IN NUMBER,
159: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
160: p_commit IN VARCHAR2 := FND_API.G_FALSE,
161:
162: x_return_status OUT VARCHAR2,
163: x_msg_count OUT NUMBER,
164: x_msg_data OUT VARCHAR2,
175: -- Standard Start of API savepoint
176: SAVEPOINT UPDATE_Scoreresult_PUB;
177:
178: -- Standard call to check for call compatibility.
179: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
180: p_api_version,
181: l_api_name,
182: G_PKG_NAME)
183: THEN
180: p_api_version,
181: l_api_name,
182: G_PKG_NAME)
183: THEN
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186:
187: -- Initialize message list if p_init_msg_list is set to TRUE.
188: IF FND_API.to_Boolean( p_init_msg_list )
184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
185: END IF;
186:
187: -- Initialize message list if p_init_msg_list is set to TRUE.
188: IF FND_API.to_Boolean( p_init_msg_list )
189: THEN
190: FND_MSG_PUB.initialize;
191: END IF;
192:
194: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
195:
196:
197: -- Initialize API return status to SUCCESS
198: x_return_status := FND_API.G_RET_STS_SUCCESS;
199:
200: --
201: -- API body
202: --
211: l_pvt_scoreresult_rec.confidence := p_scoreresult_rec.confidence;
212:
213: AMS_Scoreresult_PVT.Update_Scoreresult(
214: p_api_version => 1.0,
215: p_init_msg_list => FND_API.G_FALSE,
216: p_commit => p_commit,
217: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
218: x_return_status => x_return_status,
219: x_msg_count => x_msg_count,
213: AMS_Scoreresult_PVT.Update_Scoreresult(
214: p_api_version => 1.0,
215: p_init_msg_list => FND_API.G_FALSE,
216: p_commit => p_commit,
217: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
218: x_return_status => x_return_status,
219: x_msg_count => x_msg_count,
220: x_msg_data => x_msg_data,
221: p_scoreresult_rec => l_pvt_scoreresult_rec,
221: p_scoreresult_rec => l_pvt_scoreresult_rec,
222: x_object_version_number => l_object_version_number
223: );
224: -- Check return status from the above procedure call
225: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
229: END IF;
222: x_object_version_number => l_object_version_number
223: );
224: -- Check return status from the above procedure call
225: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
229: END IF;
230: --
223: );
224: -- Check return status from the above procedure call
225: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
229: END IF;
230: --
231: -- End of API body
224: -- Check return status from the above procedure call
225: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
228: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
229: END IF;
230: --
231: -- End of API body
232: --
231: -- End of API body
232: --
233:
234: -- Standard check for p_commit
235: IF FND_API.to_Boolean( p_commit ) THEN
236: COMMIT WORK;
237: END IF;
238:
239:
247: );
248: EXCEPTION
249:
250: WHEN AMS_Utility_PVT.resource_locked THEN
251: x_return_status := FND_API.g_ret_sts_error;
252: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
253:
254: WHEN FND_API.G_EXC_ERROR THEN
255: ROLLBACK TO UPDATE_Scoreresult_PUB;
250: WHEN AMS_Utility_PVT.resource_locked THEN
251: x_return_status := FND_API.g_ret_sts_error;
252: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
253:
254: WHEN FND_API.G_EXC_ERROR THEN
255: ROLLBACK TO UPDATE_Scoreresult_PUB;
256: x_return_status := FND_API.G_RET_STS_ERROR;
257: -- Standard call to get message count and if count=1, get the message
258: FND_MSG_PUB.Count_And_Get (
252: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
253:
254: WHEN FND_API.G_EXC_ERROR THEN
255: ROLLBACK TO UPDATE_Scoreresult_PUB;
256: x_return_status := FND_API.G_RET_STS_ERROR;
257: -- Standard call to get message count and if count=1, get the message
258: FND_MSG_PUB.Count_And_Get (
259: p_encoded => FND_API.G_FALSE,
260: p_count => x_msg_count,
255: ROLLBACK TO UPDATE_Scoreresult_PUB;
256: x_return_status := FND_API.G_RET_STS_ERROR;
257: -- Standard call to get message count and if count=1, get the message
258: FND_MSG_PUB.Count_And_Get (
259: p_encoded => FND_API.G_FALSE,
260: p_count => x_msg_count,
261: p_data => x_msg_data
262: );
263:
260: p_count => x_msg_count,
261: p_data => x_msg_data
262: );
263:
264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
265: ROLLBACK TO UPDATE_Scoreresult_PUB;
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
267: -- Standard call to get message count and if count=1, get the message
268: FND_MSG_PUB.Count_And_Get (
262: );
263:
264: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
265: ROLLBACK TO UPDATE_Scoreresult_PUB;
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
267: -- Standard call to get message count and if count=1, get the message
268: FND_MSG_PUB.Count_And_Get (
269: p_encoded => FND_API.G_FALSE,
270: p_count => x_msg_count,
265: ROLLBACK TO UPDATE_Scoreresult_PUB;
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
267: -- Standard call to get message count and if count=1, get the message
268: FND_MSG_PUB.Count_And_Get (
269: p_encoded => FND_API.G_FALSE,
270: p_count => x_msg_count,
271: p_data => x_msg_data
272: );
273:
272: );
273:
274: WHEN OTHERS THEN
275: ROLLBACK TO UPDATE_Scoreresult_PUB;
276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
277: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
278: THEN
279: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
280: END IF;
279: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
280: END IF;
281: -- Standard call to get message count and if count=1, get the message
282: FND_MSG_PUB.Count_And_Get (
283: p_encoded => FND_API.G_FALSE,
284: p_count => x_msg_count,
285: p_data => x_msg_data
286: );
287: End Update_Scoreresult;
288:
289:
290: PROCEDURE Delete_Scoreresult(
291: p_api_version IN NUMBER,
292: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
293: p_commit IN VARCHAR2 := FND_API.G_FALSE,
294: x_return_status OUT VARCHAR2,
295: x_msg_count OUT NUMBER,
296: x_msg_data OUT VARCHAR2,
289:
290: PROCEDURE Delete_Scoreresult(
291: p_api_version IN NUMBER,
292: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
293: p_commit IN VARCHAR2 := FND_API.G_FALSE,
294: x_return_status OUT VARCHAR2,
295: x_msg_count OUT NUMBER,
296: x_msg_data OUT VARCHAR2,
297: p_score_result_id IN NUMBER,
304: -- Standard Start of API savepoint
305: SAVEPOINT DELETE_Scoreresult_PUB;
306:
307: -- Standard call to check for call compatibility.
308: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
309: p_api_version,
310: l_api_name,
311: G_PKG_NAME)
312: THEN
309: p_api_version,
310: l_api_name,
311: G_PKG_NAME)
312: THEN
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
315:
316: -- Initialize message list if p_init_msg_list is set to TRUE.
317: IF FND_API.to_Boolean( p_init_msg_list )
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
315:
316: -- Initialize message list if p_init_msg_list is set to TRUE.
317: IF FND_API.to_Boolean( p_init_msg_list )
318: THEN
319: FND_MSG_PUB.initialize;
320: END IF;
321:
323: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
324:
325:
326: -- Initialize API return status to SUCCESS
327: x_return_status := FND_API.G_RET_STS_SUCCESS;
328:
329: --
330: -- API body
331: --
330: -- API body
331: --
332: AMS_Scoreresult_PVT.Delete_Scoreresult(
333: p_api_version => 1.0,
334: p_init_msg_list => FND_API.G_FALSE,
335: p_commit => p_commit,
336: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
337: x_return_status => x_return_status,
338: x_msg_count => x_msg_count,
332: AMS_Scoreresult_PVT.Delete_Scoreresult(
333: p_api_version => 1.0,
334: p_init_msg_list => FND_API.G_FALSE,
335: p_commit => p_commit,
336: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
337: x_return_status => x_return_status,
338: x_msg_count => x_msg_count,
339: x_msg_data => x_msg_data,
340: p_score_result_id => p_score_result_id,
340: p_score_result_id => p_score_result_id,
341: p_object_version_number => p_object_version_number
342: );
343: -- Check return status from the above procedure call
344: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
345: RAISE FND_API.G_EXC_ERROR;
346: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
348: END IF;
341: p_object_version_number => p_object_version_number
342: );
343: -- Check return status from the above procedure call
344: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
345: RAISE FND_API.G_EXC_ERROR;
346: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
348: END IF;
349: --
342: );
343: -- Check return status from the above procedure call
344: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
345: RAISE FND_API.G_EXC_ERROR;
346: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
348: END IF;
349: --
350: -- End of API body
343: -- Check return status from the above procedure call
344: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
345: RAISE FND_API.G_EXC_ERROR;
346: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
348: END IF;
349: --
350: -- End of API body
351: --
350: -- End of API body
351: --
352:
353: -- Standard check for p_commit
354: IF FND_API.to_Boolean( p_commit ) THEN
355: COMMIT WORK;
356: END IF;
357:
358:
366: );
367: EXCEPTION
368:
369: WHEN AMS_Utility_PVT.resource_locked THEN
370: x_return_status := FND_API.g_ret_sts_error;
371: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
372:
373: WHEN FND_API.G_EXC_ERROR THEN
374: ROLLBACK TO DELETE_Scoreresult_PUB;
369: WHEN AMS_Utility_PVT.resource_locked THEN
370: x_return_status := FND_API.g_ret_sts_error;
371: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
372:
373: WHEN FND_API.G_EXC_ERROR THEN
374: ROLLBACK TO DELETE_Scoreresult_PUB;
375: x_return_status := FND_API.G_RET_STS_ERROR;
376: -- Standard call to get message count and if count=1, get the message
377: FND_MSG_PUB.Count_And_Get (
371: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
372:
373: WHEN FND_API.G_EXC_ERROR THEN
374: ROLLBACK TO DELETE_Scoreresult_PUB;
375: x_return_status := FND_API.G_RET_STS_ERROR;
376: -- Standard call to get message count and if count=1, get the message
377: FND_MSG_PUB.Count_And_Get (
378: p_encoded => FND_API.G_FALSE,
379: p_count => x_msg_count,
374: ROLLBACK TO DELETE_Scoreresult_PUB;
375: x_return_status := FND_API.G_RET_STS_ERROR;
376: -- Standard call to get message count and if count=1, get the message
377: FND_MSG_PUB.Count_And_Get (
378: p_encoded => FND_API.G_FALSE,
379: p_count => x_msg_count,
380: p_data => x_msg_data
381: );
382:
379: p_count => x_msg_count,
380: p_data => x_msg_data
381: );
382:
383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: ROLLBACK TO DELETE_Scoreresult_PUB;
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: -- Standard call to get message count and if count=1, get the message
387: FND_MSG_PUB.Count_And_Get (
381: );
382:
383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: ROLLBACK TO DELETE_Scoreresult_PUB;
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: -- Standard call to get message count and if count=1, get the message
387: FND_MSG_PUB.Count_And_Get (
388: p_encoded => FND_API.G_FALSE,
389: p_count => x_msg_count,
384: ROLLBACK TO DELETE_Scoreresult_PUB;
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: -- Standard call to get message count and if count=1, get the message
387: FND_MSG_PUB.Count_And_Get (
388: p_encoded => FND_API.G_FALSE,
389: p_count => x_msg_count,
390: p_data => x_msg_data
391: );
392:
391: );
392:
393: WHEN OTHERS THEN
394: ROLLBACK TO DELETE_Scoreresult_PUB;
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
397: THEN
398: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
399: END IF;
398: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
399: END IF;
400: -- Standard call to get message count and if count=1, get the message
401: FND_MSG_PUB.Count_And_Get (
402: p_encoded => FND_API.G_FALSE,
403: p_count => x_msg_count,
404: p_data => x_msg_data
405: );
406: End Delete_Scoreresult;
407:
408:
409: PROCEDURE Lock_Scoreresult(
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
412: x_return_status OUT VARCHAR2,
413: x_msg_count OUT NUMBER,
414: x_msg_data OUT VARCHAR2,
415:
421: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
422: BEGIN
423:
424: -- Standard call to check for call compatibility.
425: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
426: p_api_version,
427: l_api_name,
428: G_PKG_NAME)
429: THEN
426: p_api_version,
427: l_api_name,
428: G_PKG_NAME)
429: THEN
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432:
433: -- Initialize message list if p_init_msg_list is set to TRUE.
434: IF FND_API.to_Boolean( p_init_msg_list )
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432:
433: -- Initialize message list if p_init_msg_list is set to TRUE.
434: IF FND_API.to_Boolean( p_init_msg_list )
435: THEN
436: FND_MSG_PUB.initialize;
437: END IF;
438:
440: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
441:
442:
443: -- Initialize API return status to SUCCESS
444: x_return_status := FND_API.G_RET_STS_SUCCESS;
445:
446: --
447: -- API body
448: --
449: -- Calling Private package: Create_Scoreresult
450: -- Hint: Primary key needs to be returned
451: AMS_Scoreresult_PVT.Lock_Scoreresult(
452: p_api_version => 1.0,
453: p_init_msg_list => FND_API.G_FALSE,
454: x_return_status => x_return_status,
455: x_msg_count => x_msg_count,
456: x_msg_data => x_msg_data,
457: p_score_result_id => p_score_result_id,
457: p_score_result_id => p_score_result_id,
458: p_object_version => p_object_version
459: );
460: -- Check return status from the above procedure call
461: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
462: RAISE FND_API.G_EXC_ERROR;
463: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
465: END IF;
458: p_object_version => p_object_version
459: );
460: -- Check return status from the above procedure call
461: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
462: RAISE FND_API.G_EXC_ERROR;
463: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
465: END IF;
466: --
459: );
460: -- Check return status from the above procedure call
461: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
462: RAISE FND_API.G_EXC_ERROR;
463: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
465: END IF;
466: --
467: -- End of API body.
460: -- Check return status from the above procedure call
461: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
462: RAISE FND_API.G_EXC_ERROR;
463: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
465: END IF;
466: --
467: -- End of API body.
468: --
472:
473: EXCEPTION
474:
475: WHEN AMS_Utility_PVT.resource_locked THEN
476: x_return_status := FND_API.g_ret_sts_error;
477: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
478:
479: WHEN FND_API.G_EXC_ERROR THEN
480: ROLLBACK TO LOCK_Scoreresult_PUB;
475: WHEN AMS_Utility_PVT.resource_locked THEN
476: x_return_status := FND_API.g_ret_sts_error;
477: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
478:
479: WHEN FND_API.G_EXC_ERROR THEN
480: ROLLBACK TO LOCK_Scoreresult_PUB;
481: x_return_status := FND_API.G_RET_STS_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (
477: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
478:
479: WHEN FND_API.G_EXC_ERROR THEN
480: ROLLBACK TO LOCK_Scoreresult_PUB;
481: x_return_status := FND_API.G_RET_STS_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (
484: p_encoded => FND_API.G_FALSE,
485: p_count => x_msg_count,
480: ROLLBACK TO LOCK_Scoreresult_PUB;
481: x_return_status := FND_API.G_RET_STS_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (
484: p_encoded => FND_API.G_FALSE,
485: p_count => x_msg_count,
486: p_data => x_msg_data
487: );
488:
485: p_count => x_msg_count,
486: p_data => x_msg_data
487: );
488:
489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
490: ROLLBACK TO LOCK_Scoreresult_PUB;
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: -- Standard call to get message count and if count=1, get the message
493: FND_MSG_PUB.Count_And_Get (
487: );
488:
489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
490: ROLLBACK TO LOCK_Scoreresult_PUB;
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: -- Standard call to get message count and if count=1, get the message
493: FND_MSG_PUB.Count_And_Get (
494: p_encoded => FND_API.G_FALSE,
495: p_count => x_msg_count,
490: ROLLBACK TO LOCK_Scoreresult_PUB;
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: -- Standard call to get message count and if count=1, get the message
493: FND_MSG_PUB.Count_And_Get (
494: p_encoded => FND_API.G_FALSE,
495: p_count => x_msg_count,
496: p_data => x_msg_data
497: );
498:
497: );
498:
499: WHEN OTHERS THEN
500: ROLLBACK TO LOCK_Scoreresult_PUB;
501: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
502: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
503: THEN
504: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
505: END IF;
504: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
505: END IF;
506: -- Standard call to get message count and if count=1, get the message
507: FND_MSG_PUB.Count_And_Get (
508: p_encoded => FND_API.G_FALSE,
509: p_count => x_msg_count,
510: p_data => x_msg_data
511: );
512: End Lock_Scoreresult;
549: -- Standard Start of API savepoint
550: SAVEPOINT CREATE_Scoreresult_PUB;
551:
552: -- Initialize API return status to SUCCESS
553: x_return_status := FND_API.G_RET_STS_SUCCESS;
554:
555: -- Construct record for private API
556: l_scoreresult_rec.score_id := p_score_id;
557: -- l_scoreresult_rec.tree_node := p_tree_node;
561:
562: -- validate the values
563: AMS_ScoreResult_PVT.validate_scoreresult (
564: p_api_version => 1.0,
565: p_init_msg_list => FND_API.G_TRUE,
566: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
567: p_validation_mode => JTF_PLSQL_API.G_CREATE,
568: p_scoreresult_rec => l_scoreresult_rec,
569: x_return_status => x_return_status,
562: -- validate the values
563: AMS_ScoreResult_PVT.validate_scoreresult (
564: p_api_version => 1.0,
565: p_init_msg_list => FND_API.G_TRUE,
566: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
567: p_validation_mode => JTF_PLSQL_API.G_CREATE,
568: p_scoreresult_rec => l_scoreresult_rec,
569: x_return_status => x_return_status,
570: x_msg_count => l_msg_count,
570: x_msg_count => l_msg_count,
571: x_msg_data => l_msg_data
572: );
573: -- Check return status from the above procedure call
574: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
575: RAISE FND_API.G_EXC_ERROR;
576: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;
571: x_msg_data => l_msg_data
572: );
573: -- Check return status from the above procedure call
574: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
575: RAISE FND_API.G_EXC_ERROR;
576: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;
579:
572: );
573: -- Check return status from the above procedure call
574: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
575: RAISE FND_API.G_EXC_ERROR;
576: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;
579:
580: -- get a unique id
573: -- Check return status from the above procedure call
574: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
575: RAISE FND_API.G_EXC_ERROR;
576: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;
579:
580: -- get a unique id
581: LOOP
609: );
610:
611: x_score_result_id := l_score_result_id;
612: EXCEPTION
613: WHEN FND_API.G_EXC_ERROR THEN
614: ROLLBACK TO CREATE_Scoreresult_PUB;
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
617: ROLLBACK TO CREATE_Scoreresult_PUB;
611: x_score_result_id := l_score_result_id;
612: EXCEPTION
613: WHEN FND_API.G_EXC_ERROR THEN
614: ROLLBACK TO CREATE_Scoreresult_PUB;
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
617: ROLLBACK TO CREATE_Scoreresult_PUB;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: WHEN OTHERS THEN
612: EXCEPTION
613: WHEN FND_API.G_EXC_ERROR THEN
614: ROLLBACK TO CREATE_Scoreresult_PUB;
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
617: ROLLBACK TO CREATE_Scoreresult_PUB;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: WHEN OTHERS THEN
620: ROLLBACK TO CREATE_Scoreresult_PUB;
614: ROLLBACK TO CREATE_Scoreresult_PUB;
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
617: ROLLBACK TO CREATE_Scoreresult_PUB;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: WHEN OTHERS THEN
620: ROLLBACK TO CREATE_Scoreresult_PUB;
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
622: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
617: ROLLBACK TO CREATE_Scoreresult_PUB;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: WHEN OTHERS THEN
620: ROLLBACK TO CREATE_Scoreresult_PUB;
621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
622: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
623: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
624: END IF;
625: END Create_ScoreResult;