The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_DEVICE_MAP
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
p_commit IN VARCHAR2,
p_server_group_id IN NUMBER,
p_media_type IN VARCHAR2,
p_device_type IN VARCHAR2,
p_device_id IN VARCHAR2,
p_is_device_available IN VARCHAR2,
p_server_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_DEVICE_MAP';
update ieo_media_rt_device_map
set server_id = p_server_id, device_available = p_is_device_available
where server_group_id = p_server_group_id and
media_type = p_media_type and
device_type = p_device_type and
device_id = p_device_id;
insert into ieo_media_rt_device_map
(
server_group_id, media_type,
device_type, device_id,
device_available, server_id,
device_map_id,
created_by, creation_date,
last_updated_by, last_update_date, last_update_login
)
values
(
p_server_group_id, p_media_type,
p_device_type, p_device_id,
p_is_device_available, p_server_id,
ieo_media_rt_device_map_s1.nextval,
1, sysdate, 1, sysdate, 1
);
x_msg_data := 'UPDATE_DEVICE_MAP: IEO_EXC_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
x_msg_data := 'UPDATE_DEVICE_MAP: IEO_UNEXPECTED_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
x_msg_data := 'UPDATE_DEVICE_MAP: IEO_OTHERS_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
END UPDATE_DEVICE_MAP;
select server_group_id into l_server_group_id
from ieo_svr_groups where group_name = p_server_group_name;
select server_id, device_map_id into x_server_id, x_device_map_id
from ieo_media_rt_device_map
where server_group_id = l_server_group_id and
media_type = p_media_type and
device_type = p_device_type and
device_id = p_device_id;
x_msg_data :='UPDATE_ROUTE_RESULT: IEO_EXC_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
x_msg_data :='UPDATE_ROUTE_RESULT: IEO_UNEXPECTED_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
x_msg_data :='UPDATE_ROUTE_RESULT: IEO_OTHERS_ERROR'
|| ' ErrorCode = ' || x_err_num
|| ' ErrorMsg = ' || x_err_msg;
select server_group_id into l_server_group_id
from ieo_svr_groups where group_name = p_server_group_name;
select server_group_id into l_server_group_id
from ieo_svr_groups where group_name = p_server_group_name;
select server_group_id into l_server_group_id
from ieo_svr_groups where group_name = p_server_group_name;