[Home] [Help]
461: WHERE cust_account_id = c_id;
462:
463: BEGIN
464:
465: -- Standard Start of API savepoint
466: SAVEPOINT CREATE_Trade_Profile_PVT;
467: IF g_debug THEN
468: OZF_UTILITY_PVT.debug_message('Private API: Create trade profile');
469: END IF;
466: SAVEPOINT CREATE_Trade_Profile_PVT;
467: IF g_debug THEN
468: OZF_UTILITY_PVT.debug_message('Private API: Create trade profile');
469: END IF;
470: -- Standard call to check for call compatibility.
471: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
472: p_api_version_number,
473: l_api_name,
474: G_PKG_NAME)
654: --
655: -- End of API body
656: --
657:
658: -- Standard check for p_commit
659: IF FND_API.to_Boolean( p_commit )
660: THEN
661: COMMIT WORK;
662: END IF;
665: IF g_debug THEN
666: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
667: END IF;
668:
669: -- Standard call to get message count and if count is 1, get message info.
670: FND_MSG_PUB.Count_And_Get
671: (p_count => x_msg_count,
672: p_data => x_msg_data
673: );
681: END IF;
682: WHEN FND_API.G_EXC_ERROR THEN
683: ROLLBACK TO CREATE_Trade_Profile_PVT;
684: x_return_status := FND_API.G_RET_STS_ERROR;
685: -- Standard call to get message count and if count=1, get the message
686: FND_MSG_PUB.Count_And_Get (
687: p_encoded => FND_API.G_FALSE,
688: p_count => x_msg_count,
689: p_data => x_msg_data
690: );
691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
692: ROLLBACK TO CREATE_Trade_Profile_PVT;
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: -- Standard call to get message count and if count=1, get the message
695: FND_MSG_PUB.Count_And_Get (
696: p_encoded => FND_API.G_FALSE,
697: p_count => x_msg_count,
698: p_data => x_msg_data
703: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
704: THEN
705: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
706: END IF;
707: -- Standard call to get message count and if count=1, get the message
708: FND_MSG_PUB.Count_And_Get (
709: p_encoded => FND_API.G_FALSE,
710: p_count => x_msg_count,
711: p_data => x_msg_data
767: WHERE trade_profile_id = p_id;
768:
769:
770: BEGIN
771: -- Standard Start of API savepoint
772: SAVEPOINT UPDATE_Trade_Profile_PVT;
773: -- Standard call to check for call compatibility
774: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
775: p_api_version_number,
769:
770: BEGIN
771: -- Standard Start of API savepoint
772: SAVEPOINT UPDATE_Trade_Profile_PVT;
773: -- Standard call to check for call compatibility
774: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
775: p_api_version_number,
776: l_api_name,
777: G_PKG_NAME
968: -- set the return object version number
969: x_object_version_number := l_trade_profile_rec.object_version_number;
970: END IF; -- end of check for create or update of trade profile
971: -- End of API body.
972: -- Standard check for p_commit
973: IF FND_API.to_Boolean( p_commit )
974: THEN
975: COMMIT WORK;
976: END IF;
977: -- Debug Message
978: IF g_debug THEN
979: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
980: END IF;
981: -- Standard call to get message count and if count is 1, get message info.
982: FND_MSG_PUB.Count_And_Get
983: (p_count => x_msg_count,
984: p_data => x_msg_data
985: );
992: END IF;
993: WHEN FND_API.G_EXC_ERROR THEN
994: ROLLBACK TO UPDATE_Trade_Profile_PVT;
995: x_return_status := FND_API.G_RET_STS_ERROR;
996: -- Standard call to get message count and if count=1, get the message
997: FND_MSG_PUB.Count_And_Get (
998: p_encoded => FND_API.G_FALSE,
999: p_count => x_msg_count,
1000: p_data => x_msg_data
1001: );
1002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1003: ROLLBACK TO UPDATE_Trade_Profile_PVT;
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1005: -- Standard call to get message count and if count=1, get the message
1006: FND_MSG_PUB.Count_And_Get (
1007: p_encoded => FND_API.G_FALSE,
1008: p_count => x_msg_count,
1009: p_data => x_msg_data
1014: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1015: THEN
1016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1017: END IF;
1018: -- Standard call to get message count and if count=1, get the message
1019: FND_MSG_PUB.Count_And_Get (
1020: p_encoded => FND_API.G_FALSE,
1021: p_count => x_msg_count,
1022: p_data => x_msg_data
1040: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1041: l_object_version_number NUMBER;
1042:
1043: BEGIN
1044: -- Standard Start of API savepoint
1045: SAVEPOINT DELETE_Trade_Profile_PVT;
1046: -- Standard call to check for call compatibility.
1047: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1048: p_api_version_number,
1042:
1043: BEGIN
1044: -- Standard Start of API savepoint
1045: SAVEPOINT DELETE_Trade_Profile_PVT;
1046: -- Standard call to check for call compatibility.
1047: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1048: p_api_version_number,
1049: l_api_name,
1050: G_PKG_NAME)
1071: -- Invoke table handler(OZF_cust_trd_prfls_PKG.Delete_Row)
1072: OZF_cust_trd_prfls_PKG.Delete_Row(
1073: p_TRADE_PROFILE_ID => p_TRADE_PROFILE_ID);
1074: -- End of API body
1075: -- Standard check for p_commit
1076: IF FND_API.to_Boolean( p_commit )
1077: THEN
1078: COMMIT WORK;
1079: END IF;
1080: -- Debug Message
1081: IF g_debug THEN
1082: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1083: END IF;
1084: -- Standard call to get message count and if count is 1, get message info.
1085: FND_MSG_PUB.Count_And_Get
1086: (p_count => x_msg_count,
1087: p_data => x_msg_data
1088: );
1095: END IF;
1096: WHEN FND_API.G_EXC_ERROR THEN
1097: ROLLBACK TO DELETE_Trade_Profile_PVT;
1098: x_return_status := FND_API.G_RET_STS_ERROR;
1099: -- Standard call to get message count and if count=1, get the message
1100: FND_MSG_PUB.Count_And_Get (
1101: p_encoded => FND_API.G_FALSE,
1102: p_count => x_msg_count,
1103: p_data => x_msg_data
1105:
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1107: ROLLBACK TO DELETE_Trade_Profile_PVT;
1108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1109: -- Standard call to get message count and if count=1, get the message
1110: FND_MSG_PUB.Count_And_Get (
1111: p_encoded => FND_API.G_FALSE,
1112: p_count => x_msg_count,
1113: p_data => x_msg_data
1118: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1119: THEN
1120: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1121: END IF;
1122: -- Standard call to get message count and if count=1, get the message
1123: FND_MSG_PUB.Count_And_Get (
1124: p_encoded => FND_API.G_FALSE,
1125: p_count => x_msg_count,
1126: p_data => x_msg_data
1159: THEN
1160: FND_MSG_PUB.initialize;
1161: END IF;
1162:
1163: -- Standard call to check for call compatibility.
1164: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1165: p_api_version_number,
1166: l_api_name,
1167: G_PKG_NAME)
1202: END IF;
1203: WHEN FND_API.G_EXC_ERROR THEN
1204: ROLLBACK TO LOCK_Trade_Profile_PVT;
1205: x_return_status := FND_API.G_RET_STS_ERROR;
1206: -- Standard call to get message count and if count=1, get the message
1207: FND_MSG_PUB.Count_And_Get (
1208: p_encoded => FND_API.G_FALSE,
1209: p_count => x_msg_count,
1210: p_data => x_msg_data
1211: );
1212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1213: ROLLBACK TO LOCK_Trade_Profile_PVT;
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: -- Standard call to get message count and if count=1, get the message
1216: FND_MSG_PUB.Count_And_Get (
1217: p_encoded => FND_API.G_FALSE,
1218: p_count => x_msg_count,
1219: p_data => x_msg_data
1224: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1225: THEN
1226: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1227: END IF;
1228: -- Standard call to get message count and if count=1, get the message
1229: FND_MSG_PUB.Count_And_Get (
1230: p_encoded => FND_API.G_FALSE,
1231: p_count => x_msg_count,
1232: p_data => x_msg_data
1624: l_object_version_number NUMBER;
1625: l_trade_profile_rec OZF_Trade_Profile_PVT.trade_profile_rec_type;
1626:
1627: BEGIN
1628: -- Standard Start of API savepoint
1629: SAVEPOINT VALIDATE_Trade_Profile_PVT;
1630: -- Standard call to check for call compatibility.
1631: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1632: p_api_version_number,
1626:
1627: BEGIN
1628: -- Standard Start of API savepoint
1629: SAVEPOINT VALIDATE_Trade_Profile_PVT;
1630: -- Standard call to check for call compatibility.
1631: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1632: p_api_version_number,
1633: l_api_name,
1634: G_PKG_NAME)
1669: END IF;
1670:
1671: -- Initialize API return status to SUCCESS
1672: x_return_status := FND_API.G_RET_STS_SUCCESS;
1673: -- Standard call to get message count and if count is 1, get message info.
1674: FND_MSG_PUB.Count_And_Get
1675: (p_count => x_msg_count,
1676: p_data => x_msg_data
1677: );
1684: END IF;
1685: WHEN FND_API.G_EXC_ERROR THEN
1686: ROLLBACK TO VALIDATE_Trade_Profile_PVT;
1687: x_return_status := FND_API.G_RET_STS_ERROR;
1688: -- Standard call to get message count and if count=1, get the message
1689: FND_MSG_PUB.Count_And_Get (
1690: p_encoded => FND_API.G_FALSE,
1691: p_count => x_msg_count,
1692: p_data => x_msg_data
1693: );
1694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1695: ROLLBACK TO VALIDATE_Trade_Profile_PVT;
1696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1697: -- Standard call to get message count and if count=1, get the message
1698: FND_MSG_PUB.Count_And_Get (
1699: p_encoded => FND_API.G_FALSE,
1700: p_count => x_msg_count,
1701: p_data => x_msg_data
1706: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1707: THEN
1708: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1709: END IF;
1710: -- Standard call to get message count and if count=1, get the message
1711: FND_MSG_PUB.Count_And_Get (
1712: p_encoded => FND_API.G_FALSE,
1713: p_count => x_msg_count,
1714: p_data => x_msg_data
1741: -- Debug Message
1742: IF g_debug THEN
1743: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1744: END IF;
1745: -- Standard call to get message count and if count is 1, get message info.
1746: FND_MSG_PUB.Count_And_Get
1747: (p_count => x_msg_count,
1748: p_data => x_msg_data
1749: );