The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Add_Same_Val_Update_Msg
( p_token_an IN VARCHAR2,
p_token_p IN VARCHAR2 )
IS
BEGIN
IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
fnd_message.set_name('JTF', 'JTF_API_ALL_SAME_VAL_UPDATE');
END Add_Same_Val_Update_Msg;
SELECT lookup_code INTO x_lookup_code
FROM cs_lookups
WHERE lookup_type = p_lookup_type
AND meaning = p_meaning;
SELECT To_number(Decode(substrb(userenv('CLIENT_INFO'),1,1), ' ',
NULL, substrb(userenv('CLIENT_INFO'),1,10)))
INTO p_org_id
FROM dual;
SELECT multi_org_flag INTO l_multiorg_enabled
FROM fnd_product_groups;
SELECT 'x' INTO l_dummy
FROM cs_lookups
WHERE lookup_code = p_lookup_code
AND lookup_type = p_lookup_type
AND enabled_flag = 'Y'
AND Trunc(Sysdate) BETWEEN Trunc(Nvl(start_date_active, Sysdate))
AND Trunc(Nvl(end_date_active, Sysdate));
SELECT 'x' INTO l_dummy
FROM fnd_user
WHERE user_id = p_user_id;
SELECT 'x' INTO l_dummy
FROM fnd_user
WHERE user_id = p_user_id
AND Trunc(Sysdate) BETWEEN Trunc(Nvl(start_date, Sysdate))
AND Trunc(Nvl(end_date, Sysdate));