[Home] [Help]
52: WHERE EXISTS (SELECT 1 FROM OZF_CLAIM_LINES_INT_ALL
53: WHERE INTERFACE_CLAIM_LINE_ID = l_id);
54:
55: BEGIN
56: -- Standard Start of API savepoint
57: SAVEPOINT CREATE_Claim_Lines_Int_PVT;
58:
59: -- Standard call to check for call compatibility.
60: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
55: BEGIN
56: -- Standard Start of API savepoint
57: SAVEPOINT CREATE_Claim_Lines_Int_PVT;
58:
59: -- Standard call to check for call compatibility.
60: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
61: p_api_version_number,
62: l_api_name,
63: G_PKG_NAME)
204: --
205: -- End of API body
206: --
207:
208: -- Standard check for p_commit
209: IF FND_API.to_Boolean( p_commit )
210: THEN
211: COMMIT WORK;
212: END IF;
216: IF g_debug THEN
217: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
218: END IF;
219:
220: -- Standard call to get message count and if count is 1, get message info.
221: FND_MSG_PUB.Count_And_Get
222: (p_count => x_msg_count,
223: p_data => x_msg_data
224: );
230:
231: WHEN FND_API.G_EXC_ERROR THEN
232: ROLLBACK TO CREATE_Claim_Lines_Int_PVT;
233: x_return_status := FND_API.G_RET_STS_ERROR;
234: -- Standard call to get message count and if count=1, get the message
235: FND_MSG_PUB.Count_And_Get (
236: p_encoded => FND_API.G_FALSE,
237: p_count => x_msg_count,
238: p_data => x_msg_data
240:
241: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
242: ROLLBACK TO CREATE_Claim_Lines_Int_PVT;
243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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
254: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
255: THEN
256: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
257: END IF;
258: -- Standard call to get message count and if count=1, get the message
259: FND_MSG_PUB.Count_And_Get (
260: p_encoded => FND_API.G_FALSE,
261: p_count => x_msg_count,
262: p_data => x_msg_data
294: l_tar_claim_lines_int_rec OZF_Claim_Lines_Int_PVT.claim_lines_int_rec_type := P_claim_lines_int_rec;
295: l_rowid ROWID;
296:
297: BEGIN
298: -- Standard Start of API savepoint
299: SAVEPOINT UPDATE_Claim_Lines_Int_PVT;
300:
301: -- Standard call to check for call compatibility.
302: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
297: BEGIN
298: -- Standard Start of API savepoint
299: SAVEPOINT UPDATE_Claim_Lines_Int_PVT;
300:
301: -- Standard call to check for call compatibility.
302: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
303: p_api_version_number,
304: l_api_name,
305: G_PKG_NAME)
447: --
448: -- End of API body.
449: --
450:
451: -- Standard check for p_commit
452: IF FND_API.to_Boolean( p_commit )
453: THEN
454: COMMIT WORK;
455: END IF;
459: IF g_debug THEN
460: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
461: END IF;
462:
463: -- Standard call to get message count and if count is 1, get message info.
464: FND_MSG_PUB.Count_And_Get
465: (p_count => x_msg_count,
466: p_data => x_msg_data
467: );
473:
474: WHEN FND_API.G_EXC_ERROR THEN
475: ROLLBACK TO UPDATE_Claim_Lines_Int_PVT;
476: x_return_status := FND_API.G_RET_STS_ERROR;
477: -- Standard call to get message count and if count=1, get the message
478: FND_MSG_PUB.Count_And_Get (
479: p_encoded => FND_API.G_FALSE,
480: p_count => x_msg_count,
481: p_data => x_msg_data
483:
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: ROLLBACK TO UPDATE_Claim_Lines_Int_PVT;
486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
487: -- Standard call to get message count and if count=1, get the message
488: FND_MSG_PUB.Count_And_Get (
489: p_encoded => FND_API.G_FALSE,
490: p_count => x_msg_count,
491: p_data => x_msg_data
497: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
498: THEN
499: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
500: END IF;
501: -- Standard call to get message count and if count=1, get the message
502: FND_MSG_PUB.Count_And_Get (
503: p_encoded => FND_API.G_FALSE,
504: p_count => x_msg_count,
505: p_data => x_msg_data
524: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
525: l_object_version_number NUMBER;
526:
527: BEGIN
528: -- Standard Start of API savepoint
529: SAVEPOINT DELETE_Claim_Lines_Int_PVT;
530:
531: -- Standard call to check for call compatibility.
532: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
527: BEGIN
528: -- Standard Start of API savepoint
529: SAVEPOINT DELETE_Claim_Lines_Int_PVT;
530:
531: -- Standard call to check for call compatibility.
532: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
533: p_api_version_number,
534: l_api_name,
535: G_PKG_NAME)
566: --
567: -- End of API body
568: --
569:
570: -- Standard check for p_commit
571: IF FND_API.to_Boolean( p_commit )
572: THEN
573: COMMIT WORK;
574: END IF;
578: IF g_debug THEN
579: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
580: END IF;
581:
582: -- Standard call to get message count and if count is 1, get message info.
583: FND_MSG_PUB.Count_And_Get
584: (p_count => x_msg_count,
585: p_data => x_msg_data
586: );
592:
593: WHEN FND_API.G_EXC_ERROR THEN
594: ROLLBACK TO DELETE_Claim_Lines_Int_PVT;
595: x_return_status := FND_API.G_RET_STS_ERROR;
596: -- Standard call to get message count and if count=1, get the message
597: FND_MSG_PUB.Count_And_Get (
598: p_encoded => FND_API.G_FALSE,
599: p_count => x_msg_count,
600: p_data => x_msg_data
602:
603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
604: ROLLBACK TO DELETE_Claim_Lines_Int_PVT;
605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
606: -- Standard call to get message count and if count=1, get the message
607: FND_MSG_PUB.Count_And_Get (
608: p_encoded => FND_API.G_FALSE,
609: p_count => x_msg_count,
610: p_data => x_msg_data
616: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
617: THEN
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
619: END IF;
620: -- Standard call to get message count and if count=1, get the message
621: FND_MSG_PUB.Count_And_Get (
622: p_encoded => FND_API.G_FALSE,
623: p_count => x_msg_count,
624: p_data => x_msg_data
665: THEN
666: FND_MSG_PUB.initialize;
667: END IF;
668:
669: -- Standard call to check for call compatibility.
670: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
671: p_api_version_number,
672: l_api_name,
673: G_PKG_NAME)
716:
717: WHEN FND_API.G_EXC_ERROR THEN
718: ROLLBACK TO LOCK_Claim_Lines_Int_PVT;
719: x_return_status := FND_API.G_RET_STS_ERROR;
720: -- Standard call to get message count and if count=1, get the message
721: FND_MSG_PUB.Count_And_Get (
722: p_encoded => FND_API.G_FALSE,
723: p_count => x_msg_count,
724: p_data => x_msg_data
726:
727: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
728: ROLLBACK TO LOCK_Claim_Lines_Int_PVT;
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
730: -- Standard call to get message count and if count=1, get the message
731: FND_MSG_PUB.Count_And_Get (
732: p_encoded => FND_API.G_FALSE,
733: p_count => x_msg_count,
734: p_data => x_msg_data
740: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
741: THEN
742: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
743: END IF;
744: -- Standard call to get message count and if count=1, get the message
745: FND_MSG_PUB.Count_And_Get (
746: p_encoded => FND_API.G_FALSE,
747: p_count => x_msg_count,
748: p_data => x_msg_data
1538: l_object_version_number NUMBER;
1539: l_claim_lines_int_rec OZF_Claim_Lines_Int_PVT.claim_lines_int_rec_type;
1540:
1541: BEGIN
1542: -- Standard Start of API savepoint
1543: SAVEPOINT VALIDATE_Claim_Lines_Int_;
1544:
1545: -- Standard call to check for call compatibility.
1546: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1541: BEGIN
1542: -- Standard Start of API savepoint
1543: SAVEPOINT VALIDATE_Claim_Lines_Int_;
1544:
1545: -- Standard call to check for call compatibility.
1546: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1547: p_api_version_number,
1548: l_api_name,
1549: G_PKG_NAME)
1606: IF g_debug THEN
1607: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1608: END IF;
1609:
1610: -- Standard call to get message count and if count is 1, get message info.
1611: FND_MSG_PUB.Count_And_Get
1612: (p_count => x_msg_count,
1613: p_data => x_msg_data
1614: );
1620:
1621: WHEN FND_API.G_EXC_ERROR THEN
1622: ROLLBACK TO VALIDATE_Claim_Lines_Int_;
1623: x_return_status := FND_API.G_RET_STS_ERROR;
1624: -- Standard call to get message count and if count=1, get the message
1625: FND_MSG_PUB.Count_And_Get (
1626: p_encoded => FND_API.G_FALSE,
1627: p_count => x_msg_count,
1628: p_data => x_msg_data
1630:
1631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1632: ROLLBACK TO VALIDATE_Claim_Lines_Int_;
1633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1634: -- Standard call to get message count and if count=1, get the message
1635: FND_MSG_PUB.Count_And_Get (
1636: p_encoded => FND_API.G_FALSE,
1637: p_count => x_msg_count,
1638: p_data => x_msg_data
1644: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1645: THEN
1646: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1647: END IF;
1648: -- Standard call to get message count and if count=1, get the message
1649: FND_MSG_PUB.Count_And_Get (
1650: p_encoded => FND_API.G_FALSE,
1651: p_count => x_msg_count,
1652: p_data => x_msg_data
1681: -- Debug Message
1682: IF g_debug THEN
1683: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1684: END IF;
1685: -- Standard call to get message count and if count is 1, get message info.
1686: FND_MSG_PUB.Count_And_Get
1687: (p_count => x_msg_count,
1688: p_data => x_msg_data
1689: );