The following lines contain the word 'select', 'insert', 'update' or 'delete':
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 Update_Delete_Msite_Prty
(
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_ids IN JTF_NUMBER_TABLE,
p_object_version_numbers IN JTF_NUMBER_TABLE,
p_msite_ids IN JTF_NUMBER_TABLE,
p_party_ids IN JTF_NUMBER_TABLE,
p_start_date_actives IN JTF_DATE_TABLE,
p_end_date_actives IN JTF_DATE_TABLE,
p_delete_flags IN JTF_VARCHAR2_TABLE_100,
p_msite_id IN NUMBER,
p_party_access_code IN VARCHAR2,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Delete_Msite_Prty';
SAVEPOINT Update_Delete_Msite_Prty_Pvt;
IF (p_delete_flags(i) = 'Y') THEN
Jtf_Msite_Prty_Accss_Pvt.Delete_Msite_Prty_Accss
(
p_api_version => p_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_msite_prty_accss_id => p_msite_prty_accss_ids(i),
p_msite_id => FND_API.G_MISS_NUM,
p_party_id => FND_API.G_MISS_NUM,
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_DELETE_MSITE_PRTY_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_PRTY_FL');
Jtf_Msite_Prty_Accss_Pvt.Update_Msite_Prty_Accss
(
p_api_version => p_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_msite_prty_accss_id => p_msite_prty_accss_ids(i),
p_object_version_number => p_object_version_numbers(i),
p_msite_id => FND_API.G_MISS_NUM,
p_party_id => FND_API.G_MISS_NUM,
p_start_date_active => p_start_date_actives(i),
p_end_date_active => p_end_date_actives(i),
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_UPDATE_MSITE_PRTY_FL');
FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_UPDATE_MSITE_PRTY_FL');
UPDATE jtf_msites_b
SET party_access_code = p_party_access_code
WHERE msite_id = p_msite_id;
ROLLBACK TO Update_Delete_Msite_Prty_Pvt;
ROLLBACK TO Update_Delete_Msite_Prty_Pvt;
ROLLBACK TO Update_Delete_Msite_Prty_Pvt;
END Update_Delete_Msite_Prty;
OPEN x_party_access_code_csr FOR SELECT lookup_code, meaning
FROM fnd_lookups
WHERE lookup_type = 'JTF_PARTY_ACCESS_CODE'
ORDER BY lookup_code;
OPEN x_msite_csr FOR SELECT msite_id, msite_name, party_access_code
FROM jtf_msites_vl
WHERE msite_id = p_msite_id;
OPEN x_msite_prty_accss_csr FOR SELECT MP.msite_prty_accss_id,
MP.object_version_number, MP.msite_id, MP.party_id,
P.party_name, P.party_type, L.meaning, MP.start_date_active,
MP.end_date_active
FROM jtf_msite_prty_accss MP, hz_parties P, ar_lookups L
WHERE MP.msite_id = p_msite_id
AND MP.party_id = P.party_id
AND P.party_type = 'ORGANIZATION'
AND L.lookup_type = 'PARTY_TYPE'
AND P.party_type = L.lookup_code;
OPEN x_cust_account_csr FOR SELECT party_id, account_number
FROM hz_cust_accounts_all
WHERE party_id IN
(SELECT party_id FROM jtf_msite_prty_accss
WHERE msite_id = p_msite_id)
ORDER BY party_id, account_number;
OPEN x_party_csr FOR SELECT party_id FROM hz_parties
WHERE party_type = 'ORGANIZATION'
AND UPPER(party_name) LIKE UPPER(l_criteria_value_str);
OPEN x_party_csr FOR SELECT A.party_id FROM hz_cust_accounts_all A
WHERE UPPER(A.account_number) LIKE UPPER(l_criteria_value_str)
AND EXISTS
(SELECT 1 FROM hz_parties P
WHERE P.party_id = A.party_id
AND P.party_type = 'ORGANIZATION');
'SELECT P.party_id, P.party_name, P.party_type, L.meaning FROM hz_parties P, ar_lookups L WHERE ' ||
' P.party_type = L.lookup_code AND L.lookup_type = ''PARTY_TYPE'' AND ' ||
l_tmp_str;
OPEN x_cust_account_csr FOR 'SELECT party_id, account_number FROM hz_cust_accounts_all WHERE ' || l_tmp_str;