[Home] [Help]
205: FROM hz_cust_accounts
206: WHERE cust_account_id = p_cust_account_id;
207:
208: BEGIN
209: -- Standard begin of API savepoint
210: SAVEPOINT CREATE_CLAIMS_PVT;
211:
212: -- Standard call to check for call compatibility.
213: IF NOT FND_API.Compatible_API_Call ( l_api_version,
208: BEGIN
209: -- Standard begin of API savepoint
210: SAVEPOINT CREATE_CLAIMS_PVT;
211:
212: -- Standard call to check for call compatibility.
213: IF NOT FND_API.Compatible_API_Call ( l_api_version,
214: p_api_version,
215: l_api_name,
216: G_PKG_NAME)
505: l_claim_line_pub_tbl(i).quantity := l_txn_line_tbl(i).Claim_Quantity;
506: l_claim_line_pub_tbl(i).quantity_uom := l_txn_line_tbl(i).UOM;
507: END LOOP;
508:
509: --Invoke the standard API with the above defined parameters.
510: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
511: p_init_msg_list => FND_API.G_TRUE,
512: p_commit => FND_API.G_FALSE,
513: p_validation_level => p_validation_level,
676: END IF;
677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
678: END;
679: l_claim_pub_rec.object_version_number := l_object_version_number;
680: --Invoke the standard API with the above defined parameters.
681: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
682: ,p_init_msg_list => FND_API.G_FALSE
683: ,p_commit => FND_API.G_FALSE
684: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
743: l_claim_line_pub_tbl(l_count).quantity_uom := get_claim_lines_rec.uom;
744: l_count := l_count + 1;
745: END LOOP;
746:
747: --Invoke the standard API with the above defined parameters.
748: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
749: p_init_msg_list => FND_API.G_TRUE,
750: p_commit => FND_API.G_FALSE,
751: p_validation_level => p_validation_level,
815: END IF;
816: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
817: END;
818: l_claim_pub_rec.object_version_number := l_object_version_number;
819: --Invoke the standard API with the above defined parameters.
820: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
821: ,p_init_msg_list => FND_API.G_FALSE
822: ,p_commit => FND_API.G_FALSE
823: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
956: l_claim_line_pub_tbl(l_count).quantity_uom := get_cust_claim_lines_rec.uom;
957: l_count := l_count + 1;
958: END LOOP;
959:
960: --Invoke the standard API with the above defined parameters.
961: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
962: p_init_msg_list => FND_API.G_TRUE,
963: p_commit => FND_API.G_FALSE,
964: p_validation_level => p_validation_level,
1029: END IF;
1030: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1031: END;
1032: l_claim_pub_rec.object_version_number := l_object_version_number;
1033: --Invoke the standard API with the above defined parameters.
1034: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1035: ,p_init_msg_list => FND_API.G_FALSE
1036: ,p_commit => FND_API.G_FALSE
1037: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1209:
1210: -- Debug Message
1211: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_PROCEDURE, l_module, 'Public API: ' || l_api_name || 'end');
1212:
1213: -- Standard check for p_commit
1214: IF FND_API.to_Boolean( p_commit )
1215: THEN
1216: COMMIT;
1217: END IF;
1214: IF FND_API.to_Boolean( p_commit )
1215: THEN
1216: COMMIT;
1217: END IF;
1218: -- Standard call to get message count and if count is 1, get message info.
1219: FND_MSG_PUB.Count_And_Get
1220: (p_count => x_msg_count,
1221: p_data => x_msg_data
1222: );
1238: END IF;
1239: WHEN FND_API.G_EXC_ERROR THEN
1240: ROLLBACK TO CREATE_CLAIMS_PVT;
1241: x_return_status := FND_API.G_RET_STS_ERROR;
1242: -- Standard call to get message count and if count=1, get the message
1243: FND_MSG_PUB.Count_And_Get (
1244: p_encoded => FND_API.G_FALSE,
1245: p_count => x_msg_count,
1246: p_data => x_msg_data
1252: END IF;
1253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1254: ROLLBACK TO CREATE_CLAIMS_PVT;
1255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1256: -- Standard call to get message count and if count=1, get the message
1257: FND_MSG_PUB.Count_And_Get (
1258: p_encoded => FND_API.G_FALSE,
1259: p_count => x_msg_count,
1260: p_data => x_msg_data
1274: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1275: THEN
1276: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1277: END IF;
1278: -- Standard call to get message count and if count=1, get the message
1279: FND_MSG_PUB.Count_And_Get (
1280: p_encoded => FND_API.G_FALSE,
1281: p_count => x_msg_count,
1282: p_data => x_msg_data
1344: l_reason VARCHAR2(4000);
1345: L_CLAIM_LINE_OBJ_VER NUMBER;
1346:
1347: BEGIN
1348: -- Standard begin of API savepoint
1349: SAVEPOINT Update_Claims_PVT;
1350: -- Standard call to check for call compatibility.
1351: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1352: p_api_version,
1346:
1347: BEGIN
1348: -- Standard begin of API savepoint
1349: SAVEPOINT Update_Claims_PVT;
1350: -- Standard call to check for call compatibility.
1351: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1352: p_api_version,
1353: l_api_name,
1354: G_PKG_NAME)
1511:
1512: END LOOP;
1513: END IF;
1514:
1515: --Invoke the standard API with the above defined parameters.
1516: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1517: ,p_init_msg_list => FND_API.G_FALSE
1518: ,p_commit => FND_API.G_False
1519: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1574: END IF;
1575: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1576: END;
1577: l_claim_pub_rec.object_version_number := l_object_version_number;
1578: --Invoke the standard API with the above defined parameters.
1579: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1580: ,p_init_msg_list => FND_API.G_FALSE
1581: ,p_commit => FND_API.G_FALSE
1582: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1628:
1629: -- Debug Message
1630: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_PROCEDURE, l_module, 'Public API: ' || l_api_name || 'end');
1631:
1632: -- Standard check for p_commit
1633: IF FND_API.to_Boolean( p_commit )
1634: THEN
1635: COMMIT;
1636: END IF;
1633: IF FND_API.to_Boolean( p_commit )
1634: THEN
1635: COMMIT;
1636: END IF;
1637: -- Standard call to get message count and if count is 1, get message info.
1638: FND_MSG_PUB.Count_And_Get
1639: (p_count => x_msg_count,
1640: p_data => x_msg_data
1641: );
1657: END IF;
1658: WHEN FND_API.G_EXC_ERROR THEN
1659: ROLLBACK TO UPDATE_CLAIMS_PVT;
1660: x_return_status := FND_API.G_RET_STS_ERROR;
1661: -- Standard call to get message count and if count=1, get the message
1662: FND_MSG_PUB.Count_And_Get (
1663: p_encoded => FND_API.G_FALSE,
1664: p_count => x_msg_count,
1665: p_data => x_msg_data
1671: END IF;
1672: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1673: ROLLBACK TO UPDATE_CLAIMS_PVT;
1674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1675: -- Standard call to get message count and if count=1, get the message
1676: FND_MSG_PUB.Count_And_Get (
1677: p_encoded => FND_API.G_FALSE,
1678: p_count => x_msg_count,
1679: p_data => x_msg_data
1694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1695: THEN
1696: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1697: END IF;
1698: -- Standard call to get message count and if count=1, get the message
1699: FND_MSG_PUB.Count_And_Get (
1700: p_encoded => FND_API.G_FALSE,
1701: p_count => x_msg_count,
1702: p_data => x_msg_data