The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1
FROM per_ri_setup_tasks
WHERE workbench_item_code = p_workbench_item_code
AND setup_task_code = p_setup_task_code;
SELECT max(setup_task_sequence)
FROM per_ri_setup_tasks
WHERE workbench_item_code = p_workbench_item_code;
SELECT max(setup_sub_task_sequence)
FROM per_ri_setup_sub_tasks
WHERE setup_task_code = p_setup_task_code;
SELECT max(entry_sequence)
FROM fnd_menu_entries
WHERE menu_id = p_menu_id;
SELECT psst.setup_sub_task_sequence
FROM per_ri_setup_sub_tasks psst,fnd_territories_vl ter
WHERE psst.setup_sub_task_code = p_setup_sub_task_code;
per_ri_setup_sub_task_api.UPDATE_SETUP_SUB_TASK
(
P_SETUP_SUB_TASK_CODE =>p_setup_sub_task_code,
P_SETUP_SUB_TASK_NAME =>p_setup_sub_task_name,
P_SETUP_SUB_TASK_DESCRIPTION =>p_setup_sub_task_name,
P_SETUP_TASK_CODE =>p_setup_task_code,
P_SETUP_SUB_TASK_SEQUENCE =>l_sub_task_seq,
P_SETUP_SUB_TASK_STATUS =>'NOT_STARTED',
P_SETUP_SUB_TASK_TYPE =>null,
P_SETUP_SUB_TASK_DP_LINK =>null,
P_SETUP_SUB_TASK_ACTION =>p_setup_sub_task_action,
P_SETUP_SUB_TASK_LAST_MOD_DATE =>sysdate,
P_LEGISLATION_CODE =>p_legislation_code,
P_LANGUAGE_CODE =>'US',
P_EFFECTIVE_DATE =>sysdate,
P_OBJECT_VERSION_NUMBER =>p_object_version_number
);
PROCEDURE per_ri_lcw_delete (
p_workbench_item_code In Varchar2
,p_setup_task_code In Varchar2
,p_setup_sub_task_code In Varchar2
,p_object_version_number In Number
)
Is
CURSOR csr_chk_sub_task_exists IS
SELECT 1
FROM per_ri_setup_sub_tasks
WHERE setup_task_code = p_setup_task_code;
SELECT object_version_number
FROM per_ri_setup_tasks
WHERE setup_task_code = p_setup_task_code;
per_ri_setup_sub_task_api.DELETE_SETUP_SUB_TASK(
P_SETUP_SUB_TASK_CODE =>p_setup_sub_task_code,
P_OBJECT_VERSION_NUMBER=>p_object_version_number
);
per_ri_setup_task_api.DELETE_SETUP_TASK(
P_SETUP_TASK_CODE => p_setup_task_code ,
P_OBJECT_VERSION_NUMBER => l_task_object_num
);
delete_lcw_oaf_function('S_' || substr(p_setup_task_code , 1 ,28 ));
End per_ri_lcw_delete;
SELECT fnd_form_functions_s.nextval
INTO l_fun_id
FROM dual;
fnd_form_functions_pkg.INSERT_ROW
(X_ROWID => l_rowid
,X_FUNCTION_ID => l_fun_id
,X_WEB_HOST_NAME => l_web_host_name
,X_WEB_AGENT_NAME => l_web_agent_name
,X_WEB_HTML_CALL => l_web_html_call
,X_WEB_ENCRYPT_PARAMETERS => l_web_encrypt_parameters
,X_WEB_SECURED => l_web_secured
,X_WEB_ICON => l_web_icon
,X_OBJECT_ID => l_object_id
,X_REGION_APPLICATION_ID => l_region_application_id
,X_REGION_CODE => l_region_code
,X_FUNCTION_NAME => p_function_name
,X_APPLICATION_ID => l_application_id
,X_FORM_ID => l_form_id
,X_PARAMETERS => l_parameters --can be changed later
,X_TYPE => l_type
,X_USER_FUNCTION_NAME => p_user_function_name --can be changed later
,X_DESCRIPTION => p_user_function_name --can be changed later
,X_CREATION_DATE => Sysdate
,X_CREATED_BY => 120
,X_LAST_UPDATE_DATE => sysdate
,X_LAST_UPDATED_BY => 120
,X_LAST_UPDATE_LOGIN => 0
,X_MAINTENANCE_MODE_SUPPORT => l_maintenance_mode_support
,X_CONTEXT_DEPENDENCE => l_context_dependence
,X_JRAD_REF_PATH => l_jrad_ref_patch);
PROCEDURE delete_lcw_oaf_function(
p_function_name IN Varchar2
) is
l_function_id NUMBER;
select function_id into l_function_id
from fnd_form_functions where function_name = p_function_name;
FND_FORM_FUNCTIONS_PKG.DELETE_ROW(
X_FUNCTION_ID => l_function_id);
end delete_lcw_oaf_function;