[Home] [Help]
39: l_org_id NUMBER := FND_API.G_MISS_NUM;
40: l_REASON_CODE_ID NUMBER;
41:
42: BEGIN
43: -- Standard Start of API savepoint
44: SAVEPOINT CREATE_Reason_PVT;
45:
46: -- Standard call to check for call compatibility.
47: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
42: BEGIN
43: -- Standard Start of API savepoint
44: SAVEPOINT CREATE_Reason_PVT;
45:
46: -- Standard call to check for call compatibility.
47: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
48: p_api_version_number,
49: l_api_name,
50: G_PKG_NAME)
155: -- End of API body
156: --
157: x_reason_code_id := l_reason_code_id;
158:
159: -- Standard check for p_commit
160: IF FND_API.to_Boolean( p_commit )
161: THEN
162: COMMIT WORK;
163: END IF;
167: IF OZF_DEBUG_HIGH_ON THEN
168: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
169: END IF;
170:
171: -- Standard call to get message count and if count is 1, get message info.
172: FND_MSG_PUB.Count_And_Get
173: (p_count => x_msg_count,
174: p_data => x_msg_data
175: );
176: EXCEPTION
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO CREATE_Reason_PVT;
179: x_return_status := FND_API.G_RET_STS_ERROR;
180: -- Standard call to get message count and if count=1, get the message
181: FND_MSG_PUB.Count_And_Get (
182: p_encoded => FND_API.G_FALSE,
183: p_count => x_msg_count,
184: p_data => x_msg_data
185: );
186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
187: ROLLBACK TO CREATE_Reason_PVT;
188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
189: -- Standard call to get message count and if count=1, get the message
190: FND_MSG_PUB.Count_And_Get (
191: p_encoded => FND_API.G_FALSE,
192: p_count => x_msg_count,
193: p_data => x_msg_data
198: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
199: THEN
200: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
201: END IF;
202: -- Standard call to get message count and if count=1, get the message
203: FND_MSG_PUB.Count_And_Get (
204: p_encoded => FND_API.G_FALSE,
205: p_count => x_msg_count,
206: p_data => x_msg_data
272: l_tar_reason_rec OZF_reason_PVT.reason_Rec_Type := P_reason_Rec;
273: l_rowid ROWID;
274:
275: BEGIN
276: -- Standard Start of API savepoint
277: SAVEPOINT UPDATE_Reason_PVT;
278:
279: -- Standard call to check for call compatibility.
280: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
275: BEGIN
276: -- Standard Start of API savepoint
277: SAVEPOINT UPDATE_Reason_PVT;
278:
279: -- Standard call to check for call compatibility.
280: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
281: p_api_version_number,
282: l_api_name,
283: G_PKG_NAME)
464: -- End of API body.
465: --
466: x_object_version_number := l_object_version_number;
467:
468: -- Standard check for p_commit
469: IF FND_API.to_Boolean( p_commit )
470: THEN
471: COMMIT WORK;
472: END IF;
476: IF OZF_DEBUG_HIGH_ON THEN
477: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
478: END IF;
479:
480: -- Standard call to get message count and if count is 1, get message info.
481: FND_MSG_PUB.Count_And_Get
482: (p_count => x_msg_count,
483: p_data => x_msg_data
484: );
485: EXCEPTION
486: WHEN FND_API.G_EXC_ERROR THEN
487: ROLLBACK TO UPDATE_Reason_PVT;
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: -- Standard call to get message count and if count=1, get the message
490: FND_MSG_PUB.Count_And_Get (
491: p_encoded => FND_API.G_FALSE,
492: p_count => x_msg_count,
493: p_data => x_msg_data
494: );
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: ROLLBACK TO UPDATE_Reason_PVT;
497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
498: -- Standard call to get message count and if count=1, get the message
499: FND_MSG_PUB.Count_And_Get (
500: p_encoded => FND_API.G_FALSE,
501: p_count => x_msg_count,
502: p_data => x_msg_data
507: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
508: THEN
509: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
510: END IF;
511: -- Standard call to get message count and if count=1, get the message
512: FND_MSG_PUB.Count_And_Get (
513: p_encoded => FND_API.G_FALSE,
514: p_count => x_msg_count,
515: p_data => x_msg_data
539: from ozf_claims_all
540: where reason_code_id = p_id;
541:
542: BEGIN
543: -- Standard Start of API savepoint
544: SAVEPOINT DELETE_Reason_PVT;
545:
546: -- Standard call to check for call compatibility.
547: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
542: BEGIN
543: -- Standard Start of API savepoint
544: SAVEPOINT DELETE_Reason_PVT;
545:
546: -- Standard call to check for call compatibility.
547: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
548: p_api_version_number,
549: l_api_name,
550: G_PKG_NAME)
593: --
594: -- End of API body
595: --
596:
597: -- Standard check for p_commit
598: IF FND_API.to_Boolean( p_commit )
599: THEN
600: COMMIT WORK;
601: END IF;
605: IF OZF_DEBUG_HIGH_ON THEN
606: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
607: END IF;
608:
609: -- Standard call to get message count and if count is 1, get message info.
610: FND_MSG_PUB.Count_And_Get
611: (p_count => x_msg_count,
612: p_data => x_msg_data
613: );
614: EXCEPTION
615: WHEN FND_API.G_EXC_ERROR THEN
616: ROLLBACK TO DELETE_Reason_PVT;
617: x_return_status := FND_API.G_RET_STS_ERROR;
618: -- Standard call to get message count and if count=1, get the message
619: FND_MSG_PUB.Count_And_Get (
620: p_encoded => FND_API.G_FALSE,
621: p_count => x_msg_count,
622: p_data => x_msg_data
623: );
624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
625: ROLLBACK TO DELETE_Reason_PVT;
626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
627: -- Standard call to get message count and if count=1, get the message
628: FND_MSG_PUB.Count_And_Get (
629: p_encoded => FND_API.G_FALSE,
630: p_count => x_msg_count,
631: p_data => x_msg_data
636: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
637: THEN
638: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
639: END IF;
640: -- Standard call to get message count and if count=1, get the message
641: FND_MSG_PUB.Count_And_Get (
642: p_encoded => FND_API.G_FALSE,
643: p_count => x_msg_count,
644: p_data => x_msg_data
665: -- x_msg_count OUT NUMBER
666: -- x_msg_data OUT VARCHAR2
667: -- Version : Current version 1.0
668: -- Note: This automatic generated procedure definition, it
669: -- includes standard IN/OUT parameters and basic operation,
670: -- developer must manually add parameters and business
671: -- logic as necessary.
672: --
673: -- End of Comments
712: WHERE reason_type_id = p_id;
713:
714: BEGIN
715:
716: -- Standard Start of API savepoint
717: SAVEPOINT UPDATE_Actions_PVT;
718:
719: -- Standard call to check for call compatibility.
720: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
715:
716: -- Standard Start of API savepoint
717: SAVEPOINT UPDATE_Actions_PVT;
718:
719: -- Standard call to check for call compatibility.
720: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
721: p_api_version_number,
722: l_api_name,
723: G_PKG_NAME)
878: --
879: -- End of API body
880: --
881:
882: -- Standard check for p_commit
883: IF FND_API.to_Boolean( p_commit )
884: THEN
885: COMMIT WORK;
886: END IF;
890: IF OZF_DEBUG_HIGH_ON THEN
891: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
892: END IF;
893:
894: -- Standard call to get message count and if count is 1, get message info.
895: FND_MSG_PUB.Count_And_Get
896: (p_count => x_msg_count,
897: p_data => x_msg_data
898: );
899: EXCEPTION
900: WHEN FND_API.G_EXC_ERROR THEN
901: ROLLBACK TO UPDATE_Actions_PVT;
902: x_return_status := FND_API.G_RET_STS_ERROR;
903: -- Standard call to get message count and if count=1, get the message
904: FND_MSG_PUB.Count_And_Get (
905: p_encoded => FND_API.G_FALSE,
906: p_count => x_msg_count,
907: p_data => x_msg_data
908: );
909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
910: ROLLBACK TO UPDATE_Actions_PVT;
911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
912: -- Standard call to get message count and if count=1, get the message
913: FND_MSG_PUB.Count_And_Get (
914: p_encoded => FND_API.G_FALSE,
915: p_count => x_msg_count,
916: p_data => x_msg_data
921: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
922: THEN
923: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
924: END IF;
925: -- Standard call to get message count and if count=1, get the message
926: FND_MSG_PUB.Count_And_Get (
927: p_encoded => FND_API.G_FALSE,
928: p_count => x_msg_count,
929: p_data => x_msg_data
951: -- x_msg_count OUT NUMBER
952: -- x_msg_data OUT VARCHAR2
953: -- Version : Current version 1.0
954: -- Note: This automatic generated procedure definition, it
955: -- includes standard IN/OUT parameters and basic operation,
956: -- developer must manually add parameters and business
957: -- logic as necessary.
958: --
959: -- End of Comments
974: l_api_version_number CONSTANT NUMBER := 1.0;
975: l_object_version_number NUMBER;
976:
977: BEGIN
978: -- Standard Start of API savepoint
979: SAVEPOINT DELETE_Action_PVT;
980:
981: -- Standard call to check for call compatibility.
982: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
977: BEGIN
978: -- Standard Start of API savepoint
979: SAVEPOINT DELETE_Action_PVT;
980:
981: -- Standard call to check for call compatibility.
982: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
983: p_api_version_number,
984: l_api_name,
985: G_PKG_NAME)
1026: --
1027: -- End of API body
1028: --
1029:
1030: -- Standard check for p_commit
1031: IF FND_API.to_Boolean( p_commit )
1032: THEN
1033: COMMIT WORK;
1034: END IF;
1038: IF OZF_DEBUG_HIGH_ON THEN
1039: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1040: END IF;
1041:
1042: -- Standard call to get message count and if count is 1, get message info.
1043: FND_MSG_PUB.Count_And_Get
1044: (p_count => x_msg_count,
1045: p_data => x_msg_data
1046: );
1047: EXCEPTION
1048: WHEN FND_API.G_EXC_ERROR THEN
1049: ROLLBACK TO DELETE_Action_PVT;
1050: x_return_status := FND_API.G_RET_STS_ERROR;
1051: -- Standard call to get message count and if count=1, get the message
1052: FND_MSG_PUB.Count_And_Get (
1053: p_encoded => FND_API.G_FALSE,
1054: p_count => x_msg_count,
1055: p_data => x_msg_data
1056: );
1057: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1058: ROLLBACK TO DELETE_Action_PVT;
1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060: -- Standard call to get message count and if count=1, get the message
1061: FND_MSG_PUB.Count_And_Get (
1062: p_encoded => FND_API.G_FALSE,
1063: p_count => x_msg_count,
1064: p_data => x_msg_data
1069: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1070: THEN
1071: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1072: END IF;
1073: -- Standard call to get message count and if count=1, get the message
1074: FND_MSG_PUB.Count_And_Get (
1075: p_encoded => FND_API.G_FALSE,
1076: p_count => x_msg_count,
1077: p_data => x_msg_data
1401: l_object_version_number NUMBER;
1402: l_reason_rec OZF_reason_PVT.reason_Rec_Type;
1403:
1404: BEGIN
1405: -- Standard Start of API savepoint
1406: SAVEPOINT VALIDATE_Reason_;
1407:
1408: -- Standard call to check for call compatibility.
1409: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1404: BEGIN
1405: -- Standard Start of API savepoint
1406: SAVEPOINT VALIDATE_Reason_;
1407:
1408: -- Standard call to check for call compatibility.
1409: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1410: p_api_version_number,
1411: l_api_name,
1412: G_PKG_NAME)
1466: IF OZF_DEBUG_HIGH_ON THEN
1467: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1468: END IF;
1469:
1470: -- Standard call to get message count and if count is 1, get message info.
1471: FND_MSG_PUB.Count_And_Get
1472: (p_count => x_msg_count,
1473: p_data => x_msg_data
1474: );
1475: EXCEPTION
1476: WHEN FND_API.G_EXC_ERROR THEN
1477: ROLLBACK TO VALIDATE_Reason_;
1478: x_return_status := FND_API.G_RET_STS_ERROR;
1479: -- Standard call to get message count and if count=1, get the message
1480: FND_MSG_PUB.Count_And_Get (
1481: p_encoded => FND_API.G_FALSE,
1482: p_count => x_msg_count,
1483: p_data => x_msg_data
1484: );
1485: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1486: ROLLBACK TO VALIDATE_Reason_;
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1488: -- Standard call to get message count and if count=1, get the message
1489: FND_MSG_PUB.Count_And_Get (
1490: p_encoded => FND_API.G_FALSE,
1491: p_count => x_msg_count,
1492: p_data => x_msg_data
1497: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1500: END IF;
1501: -- Standard call to get message count and if count=1, get the message
1502: FND_MSG_PUB.Count_And_Get (
1503: p_encoded => FND_API.G_FALSE,
1504: p_count => x_msg_count,
1505: p_data => x_msg_data
1593: -- Debug Message
1594: IF OZF_DEBUG_HIGH_ON THEN
1595: OZF_UTILITY_PVT.debug_message('API_INVALID_RECORD');
1596: END IF;
1597: -- Standard call to get message count and if count is 1, get message info.
1598: FND_MSG_PUB.Count_And_Get
1599: (p_count => x_msg_count,
1600: p_data => x_msg_data
1601: );