[Home] [Help]
41: --Added for 7290916
42: l_claims_int_rec claims_int_rec_type:= p_claims_int_rec;
43:
44: BEGIN
45: -- Standard Start of API savepoint
46: SAVEPOINT CREATE_Claims_Int_PUB;
47:
48: -- Standard call to check for call compatibility.
49: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
44: BEGIN
45: -- Standard Start of API savepoint
46: SAVEPOINT CREATE_Claims_Int_PUB;
47:
48: -- Standard call to check for call compatibility.
49: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
50: p_api_version_number,
51: l_api_name,
52: G_PKG_NAME)
220: --
221: -- End of API body.
222: --
223:
224: -- Standard check for p_commit
225: IF FND_API.to_Boolean( p_commit )
226: THEN
227: COMMIT WORK;
228: END IF;
232: IF g_debug THEN
233: OZF_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
234: END IF;
235:
236: -- Standard call to get message count and if count is 1, get message info.
237: FND_MSG_PUB.Count_And_Get
238: (p_count => x_msg_count,
239: p_data => x_msg_data
240: );
246:
247: WHEN FND_API.G_EXC_ERROR THEN
248: ROLLBACK TO CREATE_Claims_Int_PUB;
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: -- Standard call to get message count and if count=1, get the message
251: FND_MSG_PUB.Count_And_Get (
252: p_encoded => FND_API.G_FALSE,
253: p_count => x_msg_count,
254: p_data => x_msg_data
256:
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: ROLLBACK TO CREATE_Claims_Int_PUB;
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
260: -- Standard call to get message count and if count=1, get the message
261: FND_MSG_PUB.Count_And_Get (
262: p_encoded => FND_API.G_FALSE,
263: p_count => x_msg_count,
264: p_data => x_msg_data
270: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
271: THEN
272: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
273: END IF;
274: -- Standard call to get message count and if count=1, get the message
275: FND_MSG_PUB.Count_And_Get (
276: p_encoded => FND_API.G_FALSE,
277: p_count => x_msg_count,
278: p_data => x_msg_data
298: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
299: l_object_version_number NUMBER;
300: l_pvt_claims_int_rec OZF_Claims_Int_PVT.claims_int_rec_type;
301: BEGIN
302: -- Standard Start of API savepoint
303: SAVEPOINT UPDATE_Claims_Int_PUB;
304:
305: -- Standard call to check for call compatibility.
306: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
301: BEGIN
302: -- Standard Start of API savepoint
303: SAVEPOINT UPDATE_Claims_Int_PUB;
304:
305: -- Standard call to check for call compatibility.
306: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
307: p_api_version_number,
308: l_api_name,
309: G_PKG_NAME)
350: --
351: -- End of API body
352: --
353:
354: -- Standard check for p_commit
355: IF FND_API.to_Boolean( p_commit )
356: THEN
357: COMMIT WORK;
358: END IF;
362: IF g_debug THEN
363: OZF_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
364: END IF;
365:
366: -- Standard call to get message count and if count is 1, get message info.
367: FND_MSG_PUB.Count_And_Get
368: (p_count => x_msg_count,
369: p_data => x_msg_data
370: );
376:
377: WHEN FND_API.G_EXC_ERROR THEN
378: ROLLBACK TO UPDATE_Claims_Int_PUB;
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: -- Standard call to get message count and if count=1, get the message
381: FND_MSG_PUB.Count_And_Get (
382: p_encoded => FND_API.G_FALSE,
383: p_count => x_msg_count,
384: p_data => x_msg_data
386:
387: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
388: ROLLBACK TO UPDATE_Claims_Int_PUB;
389: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
390: -- Standard call to get message count and if count=1, get the message
391: FND_MSG_PUB.Count_And_Get (
392: p_encoded => FND_API.G_FALSE,
393: p_count => x_msg_count,
394: p_data => x_msg_data
400: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
401: THEN
402: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
403: END IF;
404: -- Standard call to get message count and if count=1, get the message
405: FND_MSG_PUB.Count_And_Get (
406: p_encoded => FND_API.G_FALSE,
407: p_count => x_msg_count,
408: p_data => x_msg_data
427: l_INTERFACE_CLAIM_ID NUMBER := p_INTERFACE_CLAIM_ID;
428: l_object_version_number NUMBER := p_object_version_number;
429: l_pvt_claims_int_rec OZF_Claims_Int_PVT.claims_int_rec_type;
430: BEGIN
431: -- Standard Start of API savepoint
432: SAVEPOINT DELETE_Claims_Int_PUB;
433:
434: -- Standard call to check for call compatibility.
435: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
430: BEGIN
431: -- Standard Start of API savepoint
432: SAVEPOINT DELETE_Claims_Int_PUB;
433:
434: -- Standard call to check for call compatibility.
435: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
436: p_api_version_number,
437: l_api_name,
438: G_PKG_NAME)
479: --
480: -- End of API body
481: --
482:
483: -- Standard check for p_commit
484: IF FND_API.to_Boolean( p_commit )
485: THEN
486: COMMIT WORK;
487: END IF;
491: IF g_debug THEN
492: OZF_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
493: END IF;
494:
495: -- Standard call to get message count and if count is 1, get message info.
496: FND_MSG_PUB.Count_And_Get
497: (p_count => x_msg_count,
498: p_data => x_msg_data
499: );
505:
506: WHEN FND_API.G_EXC_ERROR THEN
507: ROLLBACK TO DELETE_Claims_Int_PUB;
508: x_return_status := FND_API.G_RET_STS_ERROR;
509: -- Standard call to get message count and if count=1, get the message
510: FND_MSG_PUB.Count_And_Get (
511: p_encoded => FND_API.G_FALSE,
512: p_count => x_msg_count,
513: p_data => x_msg_data
515:
516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
517: ROLLBACK TO DELETE_Claims_Int_PUB;
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: -- Standard call to get message count and if count=1, get the message
520: FND_MSG_PUB.Count_And_Get (
521: p_encoded => FND_API.G_FALSE,
522: p_count => x_msg_count,
523: p_data => x_msg_data
529: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
530: THEN
531: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
532: END IF;
533: -- Standard call to get message count and if count=1, get the message
534: FND_MSG_PUB.Count_And_Get (
535: p_encoded => FND_API.G_FALSE,
536: p_count => x_msg_count,
537: p_data => x_msg_data
555: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
556: l_pvt_claims_int_rec OZF_Claims_Int_PVT.claims_int_rec_type;
557: BEGIN
558:
559: -- Standard call to check for call compatibility.
560: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
561: p_api_version_number,
562: l_api_name,
563: G_PKG_NAME)
618:
619: WHEN FND_API.G_EXC_ERROR THEN
620: ROLLBACK TO LOCK_Claims_Int_PUB;
621: x_return_status := FND_API.G_RET_STS_ERROR;
622: -- Standard call to get message count and if count=1, get the message
623: FND_MSG_PUB.Count_And_Get (
624: p_encoded => FND_API.G_FALSE,
625: p_count => x_msg_count,
626: p_data => x_msg_data
628:
629: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
630: ROLLBACK TO LOCK_Claims_Int_PUB;
631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
632: -- Standard call to get message count and if count=1, get the message
633: FND_MSG_PUB.Count_And_Get (
634: p_encoded => FND_API.G_FALSE,
635: p_count => x_msg_count,
636: p_data => x_msg_data
642: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
643: THEN
644: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
645: END IF;
646: -- Standard call to get message count and if count=1, get the message
647: FND_MSG_PUB.Count_And_Get (
648: p_encoded => FND_API.G_FALSE,
649: p_count => x_msg_count,
650: p_data => x_msg_data