The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_LEGISLATION_CODE in VARCHAR2,
X_LEGISLATION_SUBGROUP in VARCHAR2,
X_ACTIVE_INACTIVE_FLAG in VARCHAR2,
X_LEGISLATION_SUBGROUP_NAME in VARCHAR2
) is
begin
insert into HR_LEGISLATION_SUBGROUPS (
LEGISLATION_CODE,
LEGISLATION_SUBGROUP,
ACTIVE_INACTIVE_FLAG,
LEGISLATION_SUBGROUP_NAME
) values (
X_LEGISLATION_CODE,
X_LEGISLATION_SUBGROUP,
X_ACTIVE_INACTIVE_FLAG,
X_LEGISLATION_SUBGROUP_NAME
);
end INSERT_ROW;
select ACTIVE_INACTIVE_FLAG,
LEGISLATION_SUBGROUP_NAME
from HR_LEGISLATION_SUBGROUPS
where LEGISLATION_CODE = X_LEGISLATION_CODE
and LEGISLATION_SUBGROUP = X_LEGISLATION_SUBGROUP
for update of LEGISLATION_CODE nowait;
fnd_message.set_name('FND','FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_LEGISLATION_CODE in VARCHAR2,
X_LEGISLATION_SUBGROUP in VARCHAR2,
X_ACTIVE_INACTIVE_FLAG in VARCHAR2,
X_LEGISLATION_SUBGROUP_NAME in VARCHAR2
) is
begin
update HR_LEGISLATION_SUBGROUPS set
ACTIVE_INACTIVE_FLAG = X_ACTIVE_INACTIVE_FLAG,
LEGISLATION_SUBGROUP_NAME = X_LEGISLATION_SUBGROUP_NAME
where LEGISLATION_CODE = X_LEGISLATION_CODE
and LEGISLATION_SUBGROUP = X_LEGISLATION_SUBGROUP;
end UPDATE_ROW;
procedure DELETE_ROW (
X_LEGISLATION_CODE in VARCHAR2,
X_LEGISLATION_SUBGROUP in VARCHAR2
) is
begin
delete from HR_LEGISLATION_SUBGROUPS
where LEGISLATION_CODE = X_LEGISLATION_CODE
and LEGISLATION_SUBGROUP = X_LEGISLATION_SUBGROUP;
end DELETE_ROW;
UPDATE_ROW (
X_LEGISLATION_CODE,
X_LEGISLATION_SUBGROUP,
X_ACTIVE_INACTIVE_FLAG,
X_LEGISLATION_SUBGROUP_NAME
);
INSERT_ROW (
X_LEGISLATION_CODE,
X_LEGISLATION_SUBGROUP,
X_ACTIVE_INACTIVE_FLAG,
X_LEGISLATION_SUBGROUP_NAME
);
update HR_LEGISLATION_SUBGROUPS set
LEGISLATION_SUBGROUP_NAME = X_LEGISLATION_SUBGROUP_NAME
where LEGISLATION_CODE = X_LEGISLATION_CODE
and LEGISLATION_SUBGROUP = X_LEGISLATION_SUBGROUP
and userenv('LANG') = (select LANGUAGE_CODE
from FND_LANGUAGES
where INSTALLED_FLAG = 'B');