The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*) INTO result
FROM PAY_CUSTOMIZED_RESTRICTIONS
WHERE UPPER(FORM_NAME) = UPPER(x_form_name)
and UPPER(NAME) = UPPER(x_name)
and BUSINESS_GROUP_ID is NULL
and nvl(LEGISLATION_CODE,'~null~') = nvl(X_LEGISLATION_CODE,'~null~');
l_last_update_date PAY_CUSTOMIZED_RESTRICTIONS.last_update_date%TYPE := SYSDATE;
l_last_updated_by PAY_CUSTOMIZED_RESTRICTIONS.last_updated_by%TYPE := 0;
l_last_update_login PAY_CUSTOMIZED_RESTRICTIONS.last_update_login%TYPE := 0;
select application_id
from fnd_application
where application_short_name = upper(X_APPLICATION_SHORT_NAME);
select customized_restriction_id,application_id,legislation_subgroup
from PAY_CUSTOMIZED_RESTRICTIONS pcr
where upper(pcr.form_name) = upper(X_FORM_NAME)
and upper(pcr.name) = upper(X_NAME)
and pcr.business_group_id is null
and nvl(pcr.legislation_code,'~null~') = nvl(X_LEGISLATION_CODE,'~null~');
l_last_updated_by := 1;
PER_CUSTOMIZED_RESTR_PKG.UPDATE_ROW
( X_CUSTOMIZED_RESTRICTION_ID => l_cust_rest_id
,X_APPLICATION_ID => l_appl_id
,X_FORM_NAME => X_FORM_NAME
,X_NAME => X_NAME
,X_BUSINESS_GROUP_ID => null
,X_LEGISLATION_CODE => X_LEGISLATION_CODE
,X_ENABLED_FLAG => X_ENABLED_FLAG
,X_QUERY_FORM_TITLE => X_QUERY_FORM_TITLE
,X_STANDARD_FORM_TITLE => X_STANDARD_FORM_TITLE
,X_COMMENTS => X_COMMENTS
,X_LEGISLATION_SUBGROUP => nvl(X_LEGISLATION_SUBGROUP,l_legislation_subgroup)
,X_LAST_UPDATE_DATE => l_last_update_date
,X_LAST_UPDATED_BY => l_last_updated_by
,X_LAST_UPDATE_LOGIN => l_last_update_login
);
PER_CUSTOMIZED_RESTR_PKG.INSERT_ROW
(X_ROWID => l_rowid
,X_CUSTOMIZED_RESTRICTION_ID => l_cust_rest_id
,X_APPLICATION_ID => l_appl_id
,X_FORM_NAME => X_FORM_NAME
,X_NAME => X_NAME
,X_BUSINESS_GROUP_ID => null
,X_LEGISLATION_CODE => X_LEGISLATION_CODE
,X_ENABLED_FLAG => X_ENABLED_FLAG
,X_QUERY_FORM_TITLE => X_QUERY_FORM_TITLE
,X_STANDARD_FORM_TITLE => X_STANDARD_FORM_TITLE
,X_COMMENTS => X_COMMENTS
,X_LEGISLATION_SUBGROUP => X_LEGISLATION_SUBGROUP
,X_CREATED_BY => l_created_by
,X_CREATION_DATE => l_creation_date
,X_LAST_UPDATE_DATE => l_last_update_date
,X_LAST_UPDATED_BY => l_last_updated_by
,X_LAST_UPDATE_LOGIN => l_last_update_login
);
select customized_restriction_id
from PAY_CUSTOMIZED_RESTRICTIONS pcr
where upper(pcr.form_name) = upper(X_FORM_NAME)
and upper(pcr.name) = upper(X_NAME)
and pcr.business_group_id is null
and nvl(pcr.legislation_code,'~null~') = nvl(X_LEGISLATION_CODE,'~null~') ;
UPDATE PAY_CUSTOM_RESTRICTIONS_TL
SET QUERY_FORM_TITLE=nvl(X_QUERY_FORM_TITLE,QUERY_FORM_TITLE),
STANDARD_FORM_TITLE=nvl(X_STANDARD_FORM_TITLE,STANDARD_FORM_TITLE),
last_update_date = SYSDATE,
last_updated_by = decode(x_owner,'SEED',1,0),
last_update_login = 0,
SOURCE_LANG = userenv('LANG')
WHERE customized_restriction_id = l_cust_rest_id
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
if (sql%notfound) then -- trap system errors during update
-- hr_utility.set_message (801,'HR_6153_ALL_PROCEDURE_FAIL');