The following lines contain the word 'select', 'insert', 'update' or 'delete':
IS SELECT msite_id FROM jtf_msites_b
WHERE msite_id = l_c_msite_id
AND master_msite_flag = 'N';
IS SELECT responsibility_id FROM fnd_responsibility_vl
WHERE responsibility_id = l_c_responsibility_id
AND application_id = l_c_application_id;
IS SELECT msite_resp_id FROM jtf_msite_resps_b
WHERE msite_resp_id = l_c_msite_resp_id;
IS SELECT msite_resp_id FROM jtf_msite_resps_b
WHERE msite_id = l_c_msite_id
AND responsibility_id = l_c_responsibility_id
AND application_id = l_c_application_id;
PROCEDURE Validate_Update
(
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_msite_resp_id IN NUMBER,
p_object_version_number IN NUMBER,
p_start_date_active IN DATE,
p_end_date_active IN DATE,
p_sort_order IN NUMBER,
p_display_name IN VARCHAR2,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Validate_Update';
END Validate_Update;
Jtf_Msite_Resp_Pkg.insert_row
(
p_msite_resp_id => FND_API.G_MISS_NUM,
p_object_version_number => l_object_version_number,
p_msite_id => p_msite_id,
p_responsibility_id => p_responsibility_id,
p_application_id => p_application_id,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_sort_order => p_sort_order,
p_security_group_id => FND_API.G_MISS_NUM,
p_display_name => p_display_name,
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.login_id,
x_rowid => l_rowid,
x_msite_resp_id => x_msite_resp_id
);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_INSERT_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_INSERT_FL');
PROCEDURE Update_Msite_Resp
(
p_api_version 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,
p_msite_resp_id IN NUMBER := FND_API.G_MISS_NUM,
p_object_version_number IN NUMBER,
p_msite_id IN NUMBER := FND_API.G_MISS_NUM,
p_responsibility_id IN NUMBER := FND_API.G_MISS_NUM,
p_application_id IN NUMBER := FND_API.G_MISS_NUM,
p_start_date_active IN DATE := FND_API.G_MISS_DATE,
p_end_date_active IN DATE := FND_API.G_MISS_DATE,
p_sort_order IN NUMBER := FND_API.G_MISS_NUM,
p_display_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Msite_Resp';
IS SELECT msite_resp_id FROM jtf_msite_resps_b
WHERE msite_id = l_c_msite_id
AND responsibility_id = l_c_responsibility_id
AND application_id = l_c_application_id;
SAVEPOINT update_msite_resp_pvt;
Validate_Update
(
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_msite_resp_id => l_msite_resp_id,
p_object_version_number => p_object_version_number,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_sort_order => p_sort_order,
p_display_name => p_display_name,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_UPDATE');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_UPDATE');
Jtf_Msite_Resp_Pkg.update_row
(
p_msite_resp_id => l_msite_resp_id,
p_object_version_number => p_object_version_number,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_sort_order => p_sort_order,
p_security_group_id => FND_API.G_MISS_NUM,
p_display_name => p_display_name,
p_last_update_date => sysdate,
p_last_updated_by => FND_GLOBAL.user_id,
p_last_update_login => FND_GLOBAL.login_id
);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_UPDATE_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_UPDATE_FL');
ROLLBACK TO update_msite_resp_pvt;
ROLLBACK TO update_msite_resp_pvt;
ROLLBACK TO update_msite_resp_pvt;
END Update_Msite_Resp;
PROCEDURE Delete_Msite_Resp
(
p_api_version 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,
p_msite_resp_id IN NUMBER := FND_API.G_MISS_NUM,
p_msite_id IN NUMBER := FND_API.G_MISS_NUM,
p_responsibility_id IN NUMBER := FND_API.G_MISS_NUM,
p_application_id IN NUMBER := FND_API.G_MISS_NUM,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Msite_Resp';
IS SELECT msite_resp_id FROM jtf_msite_resps_b
WHERE msite_id = l_c_msite_id
AND responsibility_id = l_c_responsibility_id
AND application_id = l_c_application_id;
SAVEPOINT delete_msite_resp_pvt;
Jtf_Msite_Resp_Pkg.delete_row(l_msite_resp_id);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_DELETE_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_DELETE_FL');
ROLLBACK TO delete_msite_resp_pvt;
ROLLBACK TO delete_msite_resp_pvt;
ROLLBACK TO delete_msite_resp_pvt;
END Delete_Msite_Resp;