[Home] [Help]
199: FROM hz_cust_accounts
200: WHERE cust_account_id = p_cust_account_id;
201:
202: BEGIN
203: -- Standard begin of API savepoint
204: SAVEPOINT CREATE_CLAIMS_PVT;
205:
206: -- Standard call to check for call compatibility.
207: IF NOT FND_API.Compatible_API_Call ( l_api_version,
202: BEGIN
203: -- Standard begin of API savepoint
204: SAVEPOINT CREATE_CLAIMS_PVT;
205:
206: -- Standard call to check for call compatibility.
207: IF NOT FND_API.Compatible_API_Call ( l_api_version,
208: p_api_version,
209: l_api_name,
210: G_PKG_NAME)
496: l_claim_line_pub_tbl(i).quantity := l_txn_line_tbl(i).Claim_Quantity;
497: l_claim_line_pub_tbl(i).quantity_uom := l_txn_line_tbl(i).UOM;
498: END LOOP;
499:
500: --Invoke the standard API with the above defined parameters.
501: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
502: p_init_msg_list => FND_API.G_TRUE,
503: p_commit => FND_API.G_FALSE,
504: p_validation_level => p_validation_level,
663: END IF;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: END;
666: l_claim_pub_rec.object_version_number := l_object_version_number;
667: --Invoke the standard API with the above defined parameters.
668: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
669: ,p_init_msg_list => FND_API.G_FALSE
670: ,p_commit => FND_API.G_FALSE
671: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
730: l_claim_line_pub_tbl(l_count).quantity_uom := get_claim_lines_rec.uom;
731: l_count := l_count + 1;
732: END LOOP;
733:
734: --Invoke the standard API with the above defined parameters.
735: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
736: p_init_msg_list => FND_API.G_TRUE,
737: p_commit => FND_API.G_FALSE,
738: p_validation_level => p_validation_level,
801: END IF;
802: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
803: END;
804: l_claim_pub_rec.object_version_number := l_object_version_number;
805: --Invoke the standard API with the above defined parameters.
806: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
807: ,p_init_msg_list => FND_API.G_FALSE
808: ,p_commit => FND_API.G_FALSE
809: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
942: l_claim_line_pub_tbl(l_count).quantity_uom := get_cust_claim_lines_rec.uom;
943: l_count := l_count + 1;
944: END LOOP;
945:
946: --Invoke the standard API with the above defined parameters.
947: OZF_Claim_PUB.Create_Claim(p_api_version_number => 1.0,
948: p_init_msg_list => FND_API.G_TRUE,
949: p_commit => FND_API.G_FALSE,
950: p_validation_level => p_validation_level,
1013: END IF;
1014: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1015: END;
1016: l_claim_pub_rec.object_version_number := l_object_version_number;
1017: --Invoke the standard API with the above defined parameters.
1018: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1019: ,p_init_msg_list => FND_API.G_FALSE
1020: ,p_commit => FND_API.G_FALSE
1021: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1194: -- Debug Message
1195: IF g_debug THEN
1196: DPP_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
1197: END IF;
1198: -- Standard check for p_commit
1199: IF FND_API.to_Boolean( p_commit )
1200: THEN
1201: COMMIT;
1202: END IF;
1199: IF FND_API.to_Boolean( p_commit )
1200: THEN
1201: COMMIT;
1202: END IF;
1203: -- Standard call to get message count and if count is 1, get message info.
1204: FND_MSG_PUB.Count_And_Get
1205: (p_count => x_msg_count,
1206: p_data => x_msg_data
1207: );
1223: END IF;
1224: WHEN FND_API.G_EXC_ERROR THEN
1225: ROLLBACK TO CREATE_CLAIMS_PVT;
1226: x_return_status := FND_API.G_RET_STS_ERROR;
1227: -- Standard call to get message count and if count=1, get the message
1228: FND_MSG_PUB.Count_And_Get (
1229: p_encoded => FND_API.G_FALSE,
1230: p_count => x_msg_count,
1231: p_data => x_msg_data
1237: END IF;
1238: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1239: ROLLBACK TO CREATE_CLAIMS_PVT;
1240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1241: -- Standard call to get message count and if count=1, get the message
1242: FND_MSG_PUB.Count_And_Get (
1243: p_encoded => FND_API.G_FALSE,
1244: p_count => x_msg_count,
1245: p_data => x_msg_data
1259: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1260: THEN
1261: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1262: END IF;
1263: -- Standard call to get message count and if count=1, get the message
1264: FND_MSG_PUB.Count_And_Get (
1265: p_encoded => FND_API.G_FALSE,
1266: p_count => x_msg_count,
1267: p_data => x_msg_data
1328: l_reason VARCHAR2(4000);
1329: L_CLAIM_LINE_OBJ_VER NUMBER;
1330:
1331: BEGIN
1332: -- Standard begin of API savepoint
1333: SAVEPOINT Update_Claims_PVT;
1334: -- Standard call to check for call compatibility.
1335: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1336: p_api_version,
1330:
1331: BEGIN
1332: -- Standard begin of API savepoint
1333: SAVEPOINT Update_Claims_PVT;
1334: -- Standard call to check for call compatibility.
1335: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1336: p_api_version,
1337: l_api_name,
1338: G_PKG_NAME)
1496:
1497: END LOOP;
1498: END IF;
1499:
1500: --Invoke the standard API with the above defined parameters.
1501: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1502: ,p_init_msg_list => FND_API.G_FALSE
1503: ,p_commit => FND_API.G_False
1504: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1561: END IF;
1562: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1563: END;
1564: l_claim_pub_rec.object_version_number := l_object_version_number;
1565: --Invoke the standard API with the above defined parameters.
1566: OZF_CLAIM_PUB.Update_Claim (p_api_version_number => l_api_version
1567: ,p_init_msg_list => FND_API.G_FALSE
1568: ,p_commit => FND_API.G_FALSE
1569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1616: -- Debug Message
1617: IF g_debug THEN
1618: DPP_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
1619: END IF;
1620: -- Standard check for p_commit
1621: IF FND_API.to_Boolean( p_commit )
1622: THEN
1623: COMMIT;
1624: END IF;
1621: IF FND_API.to_Boolean( p_commit )
1622: THEN
1623: COMMIT;
1624: END IF;
1625: -- Standard call to get message count and if count is 1, get message info.
1626: FND_MSG_PUB.Count_And_Get
1627: (p_count => x_msg_count,
1628: p_data => x_msg_data
1629: );
1645: END IF;
1646: WHEN FND_API.G_EXC_ERROR THEN
1647: ROLLBACK TO UPDATE_CLAIMS_PVT;
1648: x_return_status := FND_API.G_RET_STS_ERROR;
1649: -- Standard call to get message count and if count=1, get the message
1650: FND_MSG_PUB.Count_And_Get (
1651: p_encoded => FND_API.G_FALSE,
1652: p_count => x_msg_count,
1653: p_data => x_msg_data
1659: END IF;
1660: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1661: ROLLBACK TO UPDATE_CLAIMS_PVT;
1662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1663: -- Standard call to get message count and if count=1, get the message
1664: FND_MSG_PUB.Count_And_Get (
1665: p_encoded => FND_API.G_FALSE,
1666: p_count => x_msg_count,
1667: p_data => x_msg_data
1682: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1683: THEN
1684: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1685: END IF;
1686: -- Standard call to get message count and if count=1, get the message
1687: FND_MSG_PUB.Count_And_Get (
1688: p_encoded => FND_API.G_FALSE,
1689: p_count => x_msg_count,
1690: p_data => x_msg_data