The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Selector
(
itemtype IN VARCHAR2,
itemkey IN VARCHAR2,
actid IN NUMBER,
funmode IN VARCHAR2,
result OUT VARCHAR2
)
IS
BEGIN
if (funmode = 'RUN') then
--
-- Return process to run
--
result := 'REQUISITION_APPROVAL';
WF_CORE.context(CS_CONTRACTS_WFA.l_pkg_name,'Selector',itemtype,itemkey,actid,funmode);
END Selector;
CS_CONTRACTS_PUB.Update_Contract
(
p_api_version => 1.0,
p_init_msg_list => TAPI_DEV_KIT.G_TRUE,
p_validation_level => 100,
p_commit => TAPI_DEV_KIT.G_FALSE,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_contract_id => l_contract_id,
p_contract_status_id => FND_PROFILE.VALUE('CS_CONTRACTS_ACTIVE_STATUS'),
p_last_updated_by => FND_GLOBAL.user_id,
p_last_update_date => sysdate,
p_last_update_login => FND_GLOBAL.login_id,
x_object_version_number => l_object_version_number
);
proc_name => 'Update_Contract',
arg1 => 'p_itemkey=>'||itemkey
);
l_errmsg_name := 'CS_WF_SR_CANT_UPDATE_STATUS';
PROCEDURE Select_Approver ( itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
result out varchar2 ) is
--
l_forward_from_username varchar2(30);
WF_CORE.context(CS_CONTRACTS_WFA.l_pkg_name,'Select_Approver',itemtype,itemkey,actid,funcmode);
end Select_Approver;
SELECT *
FROM CS_Contracts_all
WHERE CONTRACT_ID = l_contract_id;