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 party_id FROM hz_parties
WHERE party_id = l_c_party_id;
IS SELECT msite_prty_accss_id FROM jtf_msite_prty_accss
WHERE msite_prty_accss_id = l_c_msite_prty_accss_id;
IS SELECT msite_prty_accss_id FROM jtf_msite_prty_accss
WHERE msite_id = l_c_msite_id
AND party_id = l_c_party_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_prty_accss_id IN NUMBER,
p_object_version_number IN NUMBER,
p_start_date_active IN DATE,
p_end_date_active IN DATE,
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_Prty_Accss_Pkg.insert_row
(
p_msite_prty_accss_id => FND_API.G_MISS_NUM,
p_object_version_number => l_object_version_number,
p_msite_id => p_msite_id,
p_party_id => p_party_id,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_security_group_id => FND_API.G_MISS_NUM,
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_prty_accss_id => x_msite_prty_accss_id
);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
PROCEDURE Update_Msite_Prty_Accss
(
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_prty_accss_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_party_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,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Msite_Prty_Accss';
IS SELECT msite_prty_accss_id FROM jtf_msite_prty_accss
WHERE msite_id = l_c_msite_id
AND party_id = l_c_party_id;
SAVEPOINT update_msite_prty_accss_pvt;
Validate_Update
(
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_msite_prty_accss_id => l_msite_prty_accss_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,
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_MP_INVALID_UPDATE');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_UPDATE');
Jtf_Msite_Prty_Accss_Pkg.update_row
(
p_msite_prty_accss_id => l_msite_prty_accss_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_security_group_id => FND_API.G_MISS_NUM,
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_PRTY_UPDATE_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_UPDATE_FL');
ROLLBACK TO update_msite_prty_accss_pvt;
ROLLBACK TO update_msite_prty_accss_pvt;
ROLLBACK TO update_msite_prty_accss_pvt;
END Update_Msite_Prty_Accss;
PROCEDURE Delete_Msite_Prty_Accss
(
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_prty_accss_id IN NUMBER := FND_API.G_MISS_NUM,
p_msite_id IN NUMBER := FND_API.G_MISS_NUM,
p_party_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_Prty_Accss';
IS SELECT msite_prty_accss_id FROM jtf_msite_prty_accss
WHERE msite_id = l_c_msite_id
AND party_id = l_c_party_id;
SAVEPOINT delete_msite_prty_accss_pvt;
Jtf_Msite_Prty_Accss_Pkg.delete_row(l_msite_prty_accss_id);
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
ROLLBACK TO delete_msite_prty_accss_pvt;
ROLLBACK TO delete_msite_prty_accss_pvt;
ROLLBACK TO delete_msite_prty_accss_pvt;
END Delete_Msite_Prty_Accss;