[Home] [Help]
463: WHERE cust_account_id = c_id;
464:
465: BEGIN
466:
467: -- Standard Start of API savepoint
468: SAVEPOINT CREATE_Trade_Profile_PVT;
469: IF g_debug THEN
470: OZF_UTILITY_PVT.debug_message('Private API: Create trade profile');
471: END IF;
468: SAVEPOINT CREATE_Trade_Profile_PVT;
469: IF g_debug THEN
470: OZF_UTILITY_PVT.debug_message('Private API: Create trade profile');
471: END IF;
472: -- Standard call to check for call compatibility.
473: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
474: p_api_version_number,
475: l_api_name,
476: G_PKG_NAME)
656: --
657: -- End of API body
658: --
659:
660: -- Standard check for p_commit
661: IF FND_API.to_Boolean( p_commit )
662: THEN
663: COMMIT WORK;
664: END IF;
667: IF g_debug THEN
668: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
669: END IF;
670:
671: -- Standard call to get message count and if count is 1, get message info.
672: FND_MSG_PUB.Count_And_Get
673: (p_count => x_msg_count,
674: p_data => x_msg_data
675: );
683: END IF;
684: WHEN FND_API.G_EXC_ERROR THEN
685: ROLLBACK TO CREATE_Trade_Profile_PVT;
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: -- Standard call to get message count and if count=1, get the message
688: FND_MSG_PUB.Count_And_Get (
689: p_encoded => FND_API.G_FALSE,
690: p_count => x_msg_count,
691: p_data => x_msg_data
692: );
693: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
694: ROLLBACK TO CREATE_Trade_Profile_PVT;
695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
696: -- Standard call to get message count and if count=1, get the message
697: FND_MSG_PUB.Count_And_Get (
698: p_encoded => FND_API.G_FALSE,
699: p_count => x_msg_count,
700: p_data => x_msg_data
705: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
706: THEN
707: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
708: END IF;
709: -- Standard call to get message count and if count=1, get the message
710: FND_MSG_PUB.Count_And_Get (
711: p_encoded => FND_API.G_FALSE,
712: p_count => x_msg_count,
713: p_data => x_msg_data
769: WHERE trade_profile_id = p_id;
770:
771:
772: BEGIN
773: -- Standard Start of API savepoint
774: SAVEPOINT UPDATE_Trade_Profile_PVT;
775: -- Standard call to check for call compatibility
776: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
777: p_api_version_number,
771:
772: BEGIN
773: -- Standard Start of API savepoint
774: SAVEPOINT UPDATE_Trade_Profile_PVT;
775: -- Standard call to check for call compatibility
776: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
777: p_api_version_number,
778: l_api_name,
779: G_PKG_NAME
970: -- set the return object version number
971: x_object_version_number := l_trade_profile_rec.object_version_number;
972: END IF; -- end of check for create or update of trade profile
973: -- End of API body.
974: -- Standard check for p_commit
975: IF FND_API.to_Boolean( p_commit )
976: THEN
977: COMMIT WORK;
978: END IF;
979: -- Debug Message
980: IF g_debug THEN
981: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
982: END IF;
983: -- Standard call to get message count and if count is 1, get message info.
984: FND_MSG_PUB.Count_And_Get
985: (p_count => x_msg_count,
986: p_data => x_msg_data
987: );
994: END IF;
995: WHEN FND_API.G_EXC_ERROR THEN
996: ROLLBACK TO UPDATE_Trade_Profile_PVT;
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: -- Standard call to get message count and if count=1, get the message
999: FND_MSG_PUB.Count_And_Get (
1000: p_encoded => FND_API.G_FALSE,
1001: p_count => x_msg_count,
1002: p_data => x_msg_data
1003: );
1004: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1005: ROLLBACK TO UPDATE_Trade_Profile_PVT;
1006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1007: -- Standard call to get message count and if count=1, get the message
1008: FND_MSG_PUB.Count_And_Get (
1009: p_encoded => FND_API.G_FALSE,
1010: p_count => x_msg_count,
1011: p_data => x_msg_data
1016: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1017: THEN
1018: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1019: END IF;
1020: -- Standard call to get message count and if count=1, get the message
1021: FND_MSG_PUB.Count_And_Get (
1022: p_encoded => FND_API.G_FALSE,
1023: p_count => x_msg_count,
1024: p_data => x_msg_data
1042: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1043: l_object_version_number NUMBER;
1044:
1045: BEGIN
1046: -- Standard Start of API savepoint
1047: SAVEPOINT DELETE_Trade_Profile_PVT;
1048: -- Standard call to check for call compatibility.
1049: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1050: p_api_version_number,
1044:
1045: BEGIN
1046: -- Standard Start of API savepoint
1047: SAVEPOINT DELETE_Trade_Profile_PVT;
1048: -- Standard call to check for call compatibility.
1049: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1050: p_api_version_number,
1051: l_api_name,
1052: G_PKG_NAME)
1073: -- Invoke table handler(OZF_cust_trd_prfls_PKG.Delete_Row)
1074: OZF_cust_trd_prfls_PKG.Delete_Row(
1075: p_TRADE_PROFILE_ID => p_TRADE_PROFILE_ID);
1076: -- End of API body
1077: -- Standard check for p_commit
1078: IF FND_API.to_Boolean( p_commit )
1079: THEN
1080: COMMIT WORK;
1081: END IF;
1082: -- Debug Message
1083: IF g_debug THEN
1084: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1085: END IF;
1086: -- Standard call to get message count and if count is 1, get message info.
1087: FND_MSG_PUB.Count_And_Get
1088: (p_count => x_msg_count,
1089: p_data => x_msg_data
1090: );
1097: END IF;
1098: WHEN FND_API.G_EXC_ERROR THEN
1099: ROLLBACK TO DELETE_Trade_Profile_PVT;
1100: x_return_status := FND_API.G_RET_STS_ERROR;
1101: -- Standard call to get message count and if count=1, get the message
1102: FND_MSG_PUB.Count_And_Get (
1103: p_encoded => FND_API.G_FALSE,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data
1107:
1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1109: ROLLBACK TO DELETE_Trade_Profile_PVT;
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1111: -- Standard call to get message count and if count=1, get the message
1112: FND_MSG_PUB.Count_And_Get (
1113: p_encoded => FND_API.G_FALSE,
1114: p_count => x_msg_count,
1115: p_data => x_msg_data
1120: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1121: THEN
1122: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1123: END IF;
1124: -- Standard call to get message count and if count=1, get the message
1125: FND_MSG_PUB.Count_And_Get (
1126: p_encoded => FND_API.G_FALSE,
1127: p_count => x_msg_count,
1128: p_data => x_msg_data
1161: THEN
1162: FND_MSG_PUB.initialize;
1163: END IF;
1164:
1165: -- Standard call to check for call compatibility.
1166: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1167: p_api_version_number,
1168: l_api_name,
1169: G_PKG_NAME)
1204: END IF;
1205: WHEN FND_API.G_EXC_ERROR THEN
1206: ROLLBACK TO LOCK_Trade_Profile_PVT;
1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208: -- Standard call to get message count and if count=1, get the message
1209: FND_MSG_PUB.Count_And_Get (
1210: p_encoded => FND_API.G_FALSE,
1211: p_count => x_msg_count,
1212: p_data => x_msg_data
1213: );
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: ROLLBACK TO LOCK_Trade_Profile_PVT;
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217: -- Standard call to get message count and if count=1, get the message
1218: FND_MSG_PUB.Count_And_Get (
1219: p_encoded => FND_API.G_FALSE,
1220: p_count => x_msg_count,
1221: p_data => x_msg_data
1226: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1227: THEN
1228: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1229: END IF;
1230: -- Standard call to get message count and if count=1, get the message
1231: FND_MSG_PUB.Count_And_Get (
1232: p_encoded => FND_API.G_FALSE,
1233: p_count => x_msg_count,
1234: p_data => x_msg_data
1628: l_object_version_number NUMBER;
1629: l_trade_profile_rec OZF_Trade_Profile_PVT.trade_profile_rec_type;
1630:
1631: BEGIN
1632: -- Standard Start of API savepoint
1633: SAVEPOINT VALIDATE_Trade_Profile_PVT;
1634: -- Standard call to check for call compatibility.
1635: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1636: p_api_version_number,
1630:
1631: BEGIN
1632: -- Standard Start of API savepoint
1633: SAVEPOINT VALIDATE_Trade_Profile_PVT;
1634: -- Standard call to check for call compatibility.
1635: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1636: p_api_version_number,
1637: l_api_name,
1638: G_PKG_NAME)
1673: END IF;
1674:
1675: -- Initialize API return status to SUCCESS
1676: x_return_status := FND_API.G_RET_STS_SUCCESS;
1677: -- Standard call to get message count and if count is 1, get message info.
1678: FND_MSG_PUB.Count_And_Get
1679: (p_count => x_msg_count,
1680: p_data => x_msg_data
1681: );
1688: END IF;
1689: WHEN FND_API.G_EXC_ERROR THEN
1690: ROLLBACK TO VALIDATE_Trade_Profile_PVT;
1691: x_return_status := FND_API.G_RET_STS_ERROR;
1692: -- Standard call to get message count and if count=1, get the message
1693: FND_MSG_PUB.Count_And_Get (
1694: p_encoded => FND_API.G_FALSE,
1695: p_count => x_msg_count,
1696: p_data => x_msg_data
1697: );
1698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1699: ROLLBACK TO VALIDATE_Trade_Profile_PVT;
1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701: -- Standard call to get message count and if count=1, get the message
1702: FND_MSG_PUB.Count_And_Get (
1703: p_encoded => FND_API.G_FALSE,
1704: p_count => x_msg_count,
1705: p_data => x_msg_data
1710: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1711: THEN
1712: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1713: END IF;
1714: -- Standard call to get message count and if count=1, get the message
1715: FND_MSG_PUB.Count_And_Get (
1716: p_encoded => FND_API.G_FALSE,
1717: p_count => x_msg_count,
1718: p_data => x_msg_data
1745: -- Debug Message
1746: IF g_debug THEN
1747: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1748: END IF;
1749: -- Standard call to get message count and if count is 1, get message info.
1750: FND_MSG_PUB.Count_And_Get
1751: (p_count => x_msg_count,
1752: p_data => x_msg_data
1753: );