The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(
px_Dm_Imp_Attribute_id IN OUT NOCOPY NUMBER,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_creation_date DATE,
p_created_by NUMBER,
p_last_update_login NUMBER,
px_object_version_number IN OUT NOCOPY NUMBER,
p_model_id NUMBER,
p_source_field_id NUMBER,
p_rank NUMBER,
p_value NUMBER)
IS
x_rowid VARCHAR2(30);
INSERT INTO ams_dm_imp_attributes(
imp_attribute_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
model_id,
source_field_id,
rank,
value
) VALUES (
DECODE( px_Dm_Imp_Attribute_id, FND_API.G_MISS_NUM, NULL, px_Dm_Imp_Attribute_id),
DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login),
DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number),
DECODE( p_model_id, FND_API.G_MISS_NUM, NULL, p_model_id),
DECODE( p_source_field_id, FND_API.G_MISS_NUM, NULL, p_source_field_id),
DECODE( p_rank, FND_API.G_MISS_NUM, NULL, p_rank),
DECODE( p_value, FND_API.G_MISS_NUM, NULL, p_value));
END Insert_Row;
PROCEDURE Update_Row(
p_Dm_Imp_Attribute_id NUMBER,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_last_update_login NUMBER,
px_object_version_number IN OUT NOCOPY NUMBER,
p_model_id NUMBER,
p_source_field_id NUMBER,
p_rank NUMBER,
p_value NUMBER
)
IS
BEGIN
Update ams_dm_imp_attributes
SET
imp_attribute_id = DECODE( p_Dm_Imp_Attribute_id, null, imp_attribute_id, FND_API.G_MISS_NUM, null, p_Dm_Imp_Attribute_id),
last_update_date = DECODE( p_last_update_date, null, last_update_date, FND_API.G_MISS_DATE, null, p_last_update_date),
last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
object_version_number = object_version_number + 1,
model_id = DECODE( p_model_id, null, model_id, FND_API.G_MISS_NUM, null, p_model_id),
source_field_id = DECODE( p_source_field_id, null, source_field_id, FND_API.G_MISS_NUM, null, p_source_field_id),
rank = DECODE( p_rank, null, rank, FND_API.G_MISS_NUM, null, p_rank),
value = DECODE( p_value, null, value, FND_API.G_MISS_NUM, null, p_value)
WHERE imp_attribute_id = p_Dm_Imp_Attribute_id
AND object_version_number = px_object_version_number;
END Update_Row;
PROCEDURE Delete_Row(
p_Dm_Imp_Attribute_id NUMBER,
p_object_version_number NUMBER)
IS
BEGIN
DELETE FROM ams_dm_imp_attributes
WHERE imp_attribute_id = p_Dm_Imp_Attribute_id
AND object_version_number = p_object_version_number;
END Delete_Row ;
SELECT *
FROM ams_dm_imp_attributes
WHERE imp_attribute_id = p_Dm_Imp_Attribute_id
FOR UPDATE OF imp_attribute_id NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');