The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*)
INTO l_count
FROM qp_price_formula_lines
WHERE step_number = p_FORMULA_LINES_rec.step_number
AND price_formula_id = p_FORMULA_LINES_rec.price_formula_id;
select user_format_type into l_type
from qp_segments_b b, qp_prc_contexts_b c
where c.prc_context_code=p_FORMULA_LINES_rec.pricing_attribute_context
and b.SEGMENT_MAPPING_COLUMN = p_FORMULA_LINES_rec.pricing_attribute
and b.prc_context_id = c.prc_context_id;
IF p_FORMULA_LINES_rec.last_updated_by IS NOT NULL AND
( p_FORMULA_LINES_rec.last_updated_by <>
p_old_FORMULA_LINES_rec.last_updated_by OR
p_old_FORMULA_LINES_rec.last_updated_by IS NULL )
THEN
IF NOT QP_Validate.Last_Updated_By(p_FORMULA_LINES_rec.last_updated_by) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_FORMULA_LINES_rec.last_update_date IS NOT NULL AND
( p_FORMULA_LINES_rec.last_update_date <>
p_old_FORMULA_LINES_rec.last_update_date OR
p_old_FORMULA_LINES_rec.last_update_date IS NULL )
THEN
IF NOT QP_Validate.Last_Update_Date(p_FORMULA_LINES_rec.last_update_date) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_FORMULA_LINES_rec.last_update_login IS NOT NULL AND
( p_FORMULA_LINES_rec.last_update_login <>
p_old_FORMULA_LINES_rec.last_update_login OR
p_old_FORMULA_LINES_rec.last_update_login IS NULL )
THEN
IF NOT QP_Validate.Last_Update_Login(p_FORMULA_LINES_rec.last_update_login) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
PROCEDURE Entity_Delete
( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
, p_FORMULA_LINES_rec IN QP_Price_Formula_PUB.Formula_Lines_Rec_Type
)
IS
l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
oe_debug_pub.add('Entering proc Entity_Delete of Formula Lines Validation Pkg');
oe_debug_pub.add('Leaving proc Entity_Delete of Formula Lines Validation Pkg');
, 'Entity_Delete'
);
END Entity_Delete;