The following lines contain the word 'select', 'insert', 'update' or 'delete':
ELSIF p_validation_mode = JTF_PLSQL_API.g_update THEN
IF p_qp_product_rec.qp_product_id = FND_API.G_MISS_NUM THEN
OZF_Utility_PVT.Error_Message('OZF_API_MISSING_FIELD','MISS_FIELD','QP_PRODUCT_ID');
SELECT list_header_id FROM qp_pricing_attributes WHERE pricing_attribute_id = p_pricing_attribute_id;
SELECT qp_list_header_id FROM ozf_offers WHERE offer_id = (SELECT offer_id FROM ozf_offer_discount_products WHERE off_discount_product_id = p_off_discount_product_id);
SELECT ozf_qp_products_s.nextval FROM dual;
SELECT 1
FROM ozf_qp_products
WHERE qp_product_id = p_id;
OZF_QP_PRODUCTS_PKG.Insert_row
(
px_qp_product_id => l_qp_product_id
, p_off_discount_product_id => l_qp_product_rec.off_discount_product_id
, p_pricing_attribute_id => l_qp_product_rec.pricing_attribute_id
, px_object_version_number => l_object_version_number
, p_creation_date => sysdate
, p_created_by => FND_GLOBAL.USER_ID
, p_last_update_date => sysdate
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID
);
PROCEDURE Update_ozf_qp_product(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qp_product_rec IN qp_product_rec_type
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_ozf_qp_product';
SELECT *
FROM ozf_qp_products
WHERE qp_product_id = p_qp_product_id
AND object_version_number = p_object_version_number;
SAVEPOINT Update_ozf_qp_product_pvt;
OZF_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET'
, p_token_name => 'INFO'
, p_token_value => 'OZF_MARKET_OPTIONS') ;
, p_token_value => 'Last_Update_Date') ;
, p_validation_mode => JTF_PLSQL_API.G_UPDATE
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_qp_product_rec => l_tar_qp_prod_rec
);
OZF_QP_PRODUCTS_PKG.Update_Row(
p_qp_product_id => l_tar_qp_prod_rec.qp_product_id
, p_off_discount_product_id => l_tar_qp_prod_rec.off_discount_product_id
, p_pricing_attribute_id => l_tar_qp_prod_rec.pricing_attribute_id
, p_object_version_number => l_tar_qp_prod_rec.object_version_number
, p_last_update_date => sysdate
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID
);
ROLLBACK TO Update_ozf_qp_product_pvt;
ROLLBACK TO Update_ozf_qp_product_pvt;
ROLLBACK TO Update_ozf_qp_product_pvt;
END Update_ozf_qp_product;
PROCEDURE Delete_ozf_qp_product(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qp_product_id IN NUMBER,
p_object_version_number IN NUMBER
)
IS
l_api_version_number CONSTANT number := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_ozf_qp_product';
SAVEPOINT Delete_ozf_qp_product_pvt;
OZF_QP_PRODUCTS_PKG.Delete_Row(
p_qp_product_id => p_qp_product_id
, p_object_version_number => p_object_version_number
);
rollback to Delete_ozf_qp_product_pvt;
ROLLBACK TO Delete_ozf_qp_product_pvt;
ROLLBACK TO Delete_market_options_PVT;
END Delete_ozf_qp_product;