The following lines contain the word 'select', 'insert', 'update' or 'delete':
) <> 'SELECT'
then
x_query_correct := FND_API.G_FALSE;
select fnd.USER_NAME
from FND_USER fnd
, JTF_RS_RESOURCE_EXTNS jtf
where jtf.USER_ID = fnd.USER_ID
and jtf.RESOURCE_NUMBER = b_res_num;
select csf_l_queryrequests_s.nextval
into t_request_id
from dual;
insert into csf_l_queryrequests
( QUERYREQUEST_ID
, EMPLID
, REQUESTDATE
, QUERY_ID
, QUERYINPUT
, LAST_UPDATE_DATE
, LAST_UPDATED_BY
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_LOGIN
)
values( t_request_id
, p_role
, p_requestdate
, p_query_id
, p_parameter_string
, sysdate
, fnd_global.user_id
, sysdate
, fnd_global.user_id
, 0
);