The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_updated_by,p_old_FORMULA_rec.last_updated_by)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATED_BY;
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_update_date,p_old_FORMULA_rec.last_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATE_DATE;
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_update_login,p_old_FORMULA_rec.last_update_login)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATE_LOGIN;
ELSIF p_attr_id = G_LAST_UPDATED_BY THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATED_BY;
ELSIF p_attr_id = G_LAST_UPDATE_DATE THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATE_DATE;
ELSIF p_attr_id = G_LAST_UPDATE_LOGIN THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FORMULA_UTIL.G_LAST_UPDATE_LOGIN;
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_updated_by,p_old_FORMULA_rec.last_updated_by)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_update_date,p_old_FORMULA_rec.last_update_date)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_FORMULA_rec.last_update_login,p_old_FORMULA_rec.last_update_login)
THEN
NULL;
IF l_FORMULA_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_FORMULA_rec.last_updated_by := p_old_FORMULA_rec.last_updated_by;
IF l_FORMULA_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_FORMULA_rec.last_update_date := p_old_FORMULA_rec.last_update_date;
IF l_FORMULA_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_FORMULA_rec.last_update_login := p_old_FORMULA_rec.last_update_login;
IF l_FORMULA_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_FORMULA_rec.last_updated_by := NULL;
IF l_FORMULA_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_FORMULA_rec.last_update_date := NULL;
IF l_FORMULA_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_FORMULA_rec.last_update_login := NULL;
PROCEDURE Update_Row
( p_FORMULA_rec IN QP_Price_Formula_PUB.Formula_Rec_Type
)
IS
BEGIN
oe_debug_pub.add('Entering proc Update_Row in Formula Util Pkg');
UPDATE QP_PRICE_FORMULAS_B
SET ATTRIBUTE1 = p_FORMULA_rec.attribute1
, ATTRIBUTE10 = p_FORMULA_rec.attribute10
, ATTRIBUTE11 = p_FORMULA_rec.attribute11
, ATTRIBUTE12 = p_FORMULA_rec.attribute12
, ATTRIBUTE13 = p_FORMULA_rec.attribute13
, ATTRIBUTE14 = p_FORMULA_rec.attribute14
, ATTRIBUTE15 = p_FORMULA_rec.attribute15
, ATTRIBUTE2 = p_FORMULA_rec.attribute2
, ATTRIBUTE3 = p_FORMULA_rec.attribute3
, ATTRIBUTE4 = p_FORMULA_rec.attribute4
, ATTRIBUTE5 = p_FORMULA_rec.attribute5
, ATTRIBUTE6 = p_FORMULA_rec.attribute6
, ATTRIBUTE7 = p_FORMULA_rec.attribute7
, ATTRIBUTE8 = p_FORMULA_rec.attribute8
, ATTRIBUTE9 = p_FORMULA_rec.attribute9
, CONTEXT = p_FORMULA_rec.context
, CREATED_BY = p_FORMULA_rec.created_by
, CREATION_DATE = p_FORMULA_rec.creation_date
, END_DATE_ACTIVE = p_FORMULA_rec.end_date_active
, FORMULA = p_FORMULA_rec.formula
, LAST_UPDATED_BY = p_FORMULA_rec.last_updated_by
, LAST_UPDATE_DATE = p_FORMULA_rec.last_update_date
, LAST_UPDATE_LOGIN = p_FORMULA_rec.last_update_login
, PRICE_FORMULA_ID = p_FORMULA_rec.price_formula_id
, START_DATE_ACTIVE = p_FORMULA_rec.start_date_active
WHERE PRICE_FORMULA_ID = p_FORMULA_rec.price_formula_id
;
UPDATE QP_PRICE_FORMULAS_TL
SET DESCRIPTION = p_FORMULA_rec.description
, SOURCE_LANG = userenv('LANG')
, LAST_UPDATED_BY = p_FORMULA_rec.last_updated_by
, LAST_UPDATE_DATE = p_FORMULA_rec.last_update_date
, LAST_UPDATE_LOGIN = p_FORMULA_rec.last_update_login
, NAME = p_FORMULA_rec.name
WHERE PRICE_FORMULA_ID = p_FORMULA_rec.price_formula_id
AND LANGUAGE = userenv('LANG');
oe_debug_pub.add('Leaving proc Update_Row in Formula Util Pkg');
, 'Update_Row'
);
END Update_Row;
PROCEDURE Insert_Row
( p_FORMULA_rec IN QP_Price_Formula_PUB.Formula_Rec_Type
)
IS
BEGIN
oe_debug_pub.add('Entering proc Insert_Row in Formula Util Pkg');
INSERT INTO QP_PRICE_FORMULAS_B
( ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, CONTEXT
, CREATED_BY
, CREATION_DATE
, END_DATE_ACTIVE
, FORMULA
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRICE_FORMULA_ID
, START_DATE_ACTIVE
)
VALUES
( p_FORMULA_rec.attribute1
, p_FORMULA_rec.attribute10
, p_FORMULA_rec.attribute11
, p_FORMULA_rec.attribute12
, p_FORMULA_rec.attribute13
, p_FORMULA_rec.attribute14
, p_FORMULA_rec.attribute15
, p_FORMULA_rec.attribute2
, p_FORMULA_rec.attribute3
, p_FORMULA_rec.attribute4
, p_FORMULA_rec.attribute5
, p_FORMULA_rec.attribute6
, p_FORMULA_rec.attribute7
, p_FORMULA_rec.attribute8
, p_FORMULA_rec.attribute9
, p_FORMULA_rec.context
, p_FORMULA_rec.created_by
, p_FORMULA_rec.creation_date
, p_FORMULA_rec.end_date_active
, p_FORMULA_rec.formula
, p_FORMULA_rec.last_updated_by
, p_FORMULA_rec.last_update_date
, p_FORMULA_rec.last_update_login
, p_FORMULA_rec.price_formula_id
, p_FORMULA_rec.start_date_active
);
INSERT INTO QP_PRICE_FORMULAS_TL
( CREATED_BY
, CREATION_DATE
, DESCRIPTION
, LANGUAGE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, NAME
, PRICE_FORMULA_ID
, SOURCE_LANG
)
SELECT p_FORMULA_rec.created_by
, p_FORMULA_rec.creation_date
, p_FORMULA_rec.description
, L.LANGUAGE_CODE
, p_FORMULA_rec.last_updated_by
, p_FORMULA_rec.last_update_date
, p_FORMULA_rec.last_update_login
, p_FORMULA_rec.name
, p_FORMULA_rec.price_formula_id
, userenv('LANG')
FROM FND_LANGUAGES L
WHERE L.INSTALLED_FLAG IN ('I', 'B')
AND NOT EXISTS (SELECT NULL
FROM QP_PRICE_FORMULAS_TL T
WHERE T.PRICE_FORMULA_ID = p_FORMULA_rec.price_formula_id
AND T.LANGUAGE = L.LANGUAGE_CODE);
oe_debug_pub.add('Leaving proc Insert_Row in Formula Util Pkg');
, 'Insert_Row'
);
END Insert_Row;
PROCEDURE Delete_Row
( p_price_formula_id IN NUMBER
)
IS
BEGIN
oe_debug_pub.add('Entering proc Delete_Row in Formula Util Pkg');
DELETE FROM QP_PRICE_FORMULAS_TL
WHERE PRICE_FORMULA_ID = p_price_formula_id;
DELETE FROM QP_PRICE_FORMULAS_B
WHERE PRICE_FORMULA_ID = p_price_formula_id;
oe_debug_pub.add('Leaving proc Delete_Row in Formula Util Pkg');
, 'Delete_Row'
);
END Delete_Row;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, CONTEXT
, CREATED_BY
, CREATION_DATE
, END_DATE_ACTIVE
, FORMULA
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRICE_FORMULA_ID
, START_DATE_ACTIVE
INTO l_FORMULA_rec.attribute1
, l_FORMULA_rec.attribute10
, l_FORMULA_rec.attribute11
, l_FORMULA_rec.attribute12
, l_FORMULA_rec.attribute13
, l_FORMULA_rec.attribute14
, l_FORMULA_rec.attribute15
, l_FORMULA_rec.attribute2
, l_FORMULA_rec.attribute3
, l_FORMULA_rec.attribute4
, l_FORMULA_rec.attribute5
, l_FORMULA_rec.attribute6
, l_FORMULA_rec.attribute7
, l_FORMULA_rec.attribute8
, l_FORMULA_rec.attribute9
, l_FORMULA_rec.context
, l_FORMULA_rec.created_by
, l_FORMULA_rec.creation_date
, l_FORMULA_rec.end_date_active
, l_FORMULA_rec.formula
, l_FORMULA_rec.last_updated_by
, l_FORMULA_rec.last_update_date
, l_FORMULA_rec.last_update_login
, l_FORMULA_rec.price_formula_id
, l_FORMULA_rec.start_date_active
FROM QP_PRICE_FORMULAS_B
WHERE PRICE_FORMULA_ID = p_price_formula_id
;
SELECT DESCRIPTION
, NAME
INTO l_FORMULA_rec.description
, l_FORMULA_rec.name
FROM QP_PRICE_FORMULAS_TL
WHERE PRICE_FORMULA_ID = p_price_formula_id
AND LANGUAGE = userenv('LANG');
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, CONTEXT
, CREATED_BY
, CREATION_DATE
, END_DATE_ACTIVE
, FORMULA
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRICE_FORMULA_ID
, START_DATE_ACTIVE
INTO l_FORMULA_rec.attribute1
, l_FORMULA_rec.attribute10
, l_FORMULA_rec.attribute11
, l_FORMULA_rec.attribute12
, l_FORMULA_rec.attribute13
, l_FORMULA_rec.attribute14
, l_FORMULA_rec.attribute15
, l_FORMULA_rec.attribute2
, l_FORMULA_rec.attribute3
, l_FORMULA_rec.attribute4
, l_FORMULA_rec.attribute5
, l_FORMULA_rec.attribute6
, l_FORMULA_rec.attribute7
, l_FORMULA_rec.attribute8
, l_FORMULA_rec.attribute9
, l_FORMULA_rec.context
, l_FORMULA_rec.created_by
, l_FORMULA_rec.creation_date
, l_FORMULA_rec.end_date_active
, l_FORMULA_rec.formula
, l_FORMULA_rec.last_updated_by
, l_FORMULA_rec.last_update_date
, l_FORMULA_rec.last_update_login
, l_FORMULA_rec.price_formula_id
, l_FORMULA_rec.start_date_active
FROM QP_PRICE_FORMULAS_B
WHERE PRICE_FORMULA_ID = p_FORMULA_rec.price_formula_id
FOR UPDATE NOWAIT;
AND QP_GLOBALS.Equal(p_FORMULA_rec.last_updated_by,
l_FORMULA_rec.last_updated_by)
AND QP_GLOBALS.Equal(p_FORMULA_rec.last_update_date,
l_FORMULA_rec.last_update_date)
AND QP_GLOBALS.Equal(p_FORMULA_rec.last_update_login,
l_FORMULA_rec.last_update_login)
AND QP_GLOBALS.Equal(p_FORMULA_rec.price_formula_id,
l_FORMULA_rec.price_formula_id)
AND QP_GLOBALS.Equal(p_FORMULA_rec.start_date_active,
l_FORMULA_rec.start_date_active)
THEN
-- Row has not changed. Set out parameter.
x_FORMULA_rec := l_FORMULA_rec;
FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');