The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row(
x_rowid IN OUT VARCHAR2
, x_result_id NUMBER
, x_reason_id NUMBER
, x_object_version_number NUMBER
, x_created_by NUMBER
, x_creation_date DATE
, x_last_updated_by NUMBER
, x_last_update_date DATE
, x_last_update_login NUMBER
) IS
CURSOR l_insert IS
SELECT ROWID
FROM jtf_ih_result_reasons
WHERE result_id = x_result_id;
INSERT INTO jtf_ih_result_reasons (
result_id
, reason_id
, object_version_number
, created_by
, creation_date
, last_updated_by
, last_update_date
, last_update_login
) VALUES (
x_result_id
, DECODE(x_reason_id,FND_API.G_MISS_NUM,NULL,x_reason_id)
, DECODE(x_object_version_number,FND_API.G_MISS_NUM,NULL,x_object_version_number)
, DECODE(x_created_by,FND_API.G_MISS_NUM,NULL,x_created_by)
, DECODE(x_creation_date,FND_API.G_MISS_DATE,NULL,x_creation_date)
, DECODE(x_last_updated_by,FND_API.G_MISS_NUM,NULL,x_last_updated_by)
, DECODE(x_last_update_date,FND_API.G_MISS_DATE,NULL,x_last_update_date)
, DECODE(x_last_update_login,FND_API.G_MISS_NUM,NULL,x_last_update_login)
);
OPEN l_insert;
FETCH l_insert INTO x_rowid;
IF (l_insert%NOTFOUND) THEN
CLOSE l_insert;
END insert_row;
PROCEDURE delete_row(
x_result_id NUMBER
) IS
BEGIN
DELETE FROM jtf_ih_result_reasons
WHERE result_id = x_result_id;
END delete_row;
PROCEDURE update_row(
x_rowid VARCHAR2
, x_result_id NUMBER
, x_reason_id NUMBER
, x_object_version_number NUMBER
, x_created_by NUMBER
, x_creation_date DATE
, x_last_updated_by NUMBER
, x_last_update_date DATE
, x_last_update_login NUMBER
) IS
BEGIN
UPDATE jtf_ih_result_reasons
SET
result_id=DECODE(x_result_id,FND_API.G_MISS_NUM,NULL,x_result_id)
, reason_id=DECODE(x_reason_id,FND_API.G_MISS_NUM,NULL,x_reason_id)
, object_version_number=DECODE(x_object_version_number,FND_API.G_MISS_NUM,NULL,x_object_version_number)
, created_by=DECODE(x_created_by,FND_API.G_MISS_NUM,NULL,x_created_by)
, creation_date=DECODE(x_creation_date,FND_API.G_MISS_DATE,NULL,x_creation_date)
, last_updated_by=DECODE(x_last_updated_by,FND_API.G_MISS_NUM,NULL,x_last_updated_by)
, last_update_date=DECODE(x_last_update_date,FND_API.G_MISS_DATE,NULL,x_last_update_date)
, last_update_login=DECODE(x_last_update_login,FND_API.G_MISS_NUM,NULL,x_last_update_login)
WHERE ROWID = x_rowid;
END update_row;
, x_last_updated_by NUMBER
, x_last_update_date DATE
, x_last_update_login NUMBER
) IS
CURSOR l_lock IS
SELECT *
FROM jtf_ih_result_reasons
WHERE rowid = x_rowid
FOR UPDATE OF result_id NOWAIT;
FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
AND ((l_table_rec.last_updated_by = x_last_updated_by)
OR ((l_table_rec.last_updated_by IS NULL)
AND ( x_last_updated_by IS NULL)))
AND ((l_table_rec.last_update_date = x_last_update_date)
OR ((l_table_rec.last_update_date IS NULL)
AND ( x_last_update_date IS NULL)))
AND ((l_table_rec.last_update_login = x_last_update_login)
OR ((l_table_rec.last_update_login IS NULL)
AND ( x_last_update_login IS NULL)))
) THEN
RETURN;
FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');