The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1 FROM DUAL
WHERE exists
(
SELECT 'X' FROM qp_list_lines a, ozf_offer_discount_lines b, ozf_offers c WHERE
a.list_header_id = c.qp_list_header_id
AND b.offer_id = c.offer_id
AND a.list_line_id = p_list_line_id
AND b.offer_discount_line_id = p_offer_discount_line_id
);
SELECT ozf_qp_discounts_s.nextval FROM DUAL;
SELECT 1 FROM dual
WHERE EXISTS(SELECT 'X' FROM ozf_qp_discounts WHERE ozf_qp_discount_id = p_qp_discount_id);
OZF_QP_DISCOUNTS_PKG.Insert_row
(
px_qp_discount_id => l_ozf_qp_discount_id
, p_list_line_id => p_qp_disc_rec.list_line_id
, p_offer_discount_line_id => p_qp_disc_rec.offer_discount_line_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_discount
(
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_disc_rec IN qp_discount_rec_type
)
IS
l_api_version_number CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'Update_ozf_qp_discount';
SELECT * FROM ozf_qp_discounts
WHERE ozf_qp_discount_id = p_ozf_qp_discount_id
AND object_version_number = p_object_version_number;
SAVEPOINT Update_ozf_qp_discount;
, p_token_value => 'Last_Update_Date') ;
OZF_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET'
, p_token_name => 'INFO'
, p_token_value => 'OZF_QP_DISC') ;
, 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_disc_rec => p_qp_disc_rec
);
OZF_QP_DISCOUNTS_PKG.Update_row
(
p_qp_discount_id => p_qp_disc_rec.ozf_qp_discount_id
, p_list_line_id => p_qp_disc_rec.list_line_id
, p_offer_discount_line_id => p_qp_disc_rec.offer_discount_line_id
, p_object_version_number => p_qp_disc_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_discount;
ROLLBACK TO Update_ozf_qp_discount;
ROLLBACK TO Update_ozf_qp_discount;
END Update_ozf_qp_discount;
PROCEDURE Delete_ozf_qp_discount
(
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_discount_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_discount';
SAVEPOINT Delete_ozf_qp_discount;
OZF_QP_DISCOUNTS_PKG.Delete_row(
p_qp_discount_id => p_qp_discount_id
, p_object_version_number => p_object_version_number
);
ROLLBACK TO Delete_ozf_qp_discount;
ROLLBACK TO Delete_ozf_qp_discount;
ROLLBACK TO Delete_ozf_qp_discount;
END Delete_ozf_qp_discount;