The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID out NOCOPY VARCHAR2,
X_CI_IMPACT_TYPE_USAGE_ID out NOCOPY NUMBER,
x_impact_type_code IN varchar2,
x_ci_type_class_code IN VARCHAR2,
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_IMPACT_TYPE_USAGE
where CI_IMPACT_TYPE_USAGE_ID = X_CI_IMPACT_TYPE_USAGE_ID
;
SELECT pa_ci_impact_type_usage_s.NEXTVAL
INTO X_CI_IMPACT_TYPE_USAGE_ID
FROM sys.dual;
insert into PA_CI_IMPACT_TYPE_USAGE (
CI_IMPACT_TYPE_USAGE_ID ,
impact_type_code ,
ci_type_class_code ,
CI_TYPE_ID ,
CREATION_DATE ,
CREATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN
) values (
X_CI_IMPACT_TYPE_USAGE_ID ,
x_impact_type_code ,
x_ci_type_class_code ,
X_CI_TYPE_ID ,
nvl(X_CREATION_DATE, sysdate),
nvl(X_CREATED_BY, fnd_global.user_id),
nvl(X_LAST_UPDATE_DATE, sysdate),
nvl(X_LAST_UPDATED_BY, fnd_global.user_id),
nvl(X_LAST_UPDATE_LOGIN, fnd_global.login_id)
);
end INSERT_ROW;
cursor c is select
impact_type_code,
ci_type_class_code,
ci_type_id
from PA_CI_IMPACT_TYPE_USAGE
where ci_impact_type_usage_id = X_CI_IMPACT_TYPE_USAGE_ID
for update of CI_impact_TYPE_USAGE_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure DELETE_ROW (
X_CI_IMPACT_TYPE_USAGE_ID in NUMBER
) is
begin
delete from PA_CI_IMPACT_TYPE_USAGE
where CI_IMPACT_TYPE_USAGE_ID = X_CI_IMPACT_TYPE_USAGE_ID;
end DELETE_ROW;