The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID out NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
X_CI_TYPE_USAGE_ID out NOCOPY NUMBER, --File.Sql.39 bug 4440895
X_PROJECT_TYPE_ID in NUMBER,
X_CI_TYPE_ID in NUMBER,
X_CREATION_DATE in DATE,
X_CREATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
cursor C is select ROWID from PA_CI_TYPE_USAGE
where CI_TYPE_USAGE_ID = X_CI_TYPE_USAGE_ID
;
SELECT pa_ci_type_usage_s.NEXTVAL
INTO X_CI_TYPE_USAGE_ID
FROM sys.dual;
insert into PA_CI_TYPE_USAGE (
CI_TYPE_USAGE_ID,
PROJECT_TYPE_ID,
CI_TYPE_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN
) values (
X_CI_TYPE_USAGE_ID,
X_PROJECT_TYPE_ID,
X_CI_TYPE_ID,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN
);
end INSERT_ROW;
procedure UPDATE_ROW (
X_CI_TYPE_USAGE_ID in NUMBER,
X_PROJECT_TYPE_ID in NUMBER,
X_CI_TYPE_ID in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
update PA_CI_TYPE_USAGE set
PROJECT_TYPE_ID = X_PROJECT_TYPE_ID,
CI_TYPE_ID = X_CI_TYPE_ID,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where ci_type_usage_id = X_CI_TYPE_USAGE_ID;
end UPDATE_ROW;
cursor c is select
PROJECT_TYPE_ID,
CI_TYPE_ID
from PA_CI_TYPE_USAGE
where CI_TYPE_USAGE_ID = X_CI_TYPE_USAGE_ID
for update of CI_TYPE_USAGE_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure DELETE_ROW (
X_CI_TYPE_USAGE_ID in NUMBER
) is
begin
delete from PA_CI_TYPE_USAGE
where CI_TYPE_USAGE_ID = X_CI_TYPE_USAGE_ID;
end DELETE_ROW;