The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID in out NOCOPY VARCHAR2,
X_EXPR_CODE in VARCHAR2,
X_OPERATOR_VAR in VARCHAR2,
X_OPERATOR_CODE in VARCHAR2,
X_INACTIVE_DATA_NAME in VARCHAR2,
X_INACTIVE_DATA_FLAG in VARCHAR2,
X_OBJECT_VERSION_NUMBER 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 IEC_O_ALG_EXPR_OP_DEFS
where EXPR_CODE = X_EXPR_CODE and OPERATOR_CODE = X_OPERATOR_CODE and
OPERATOR_VAR = X_OPERATOR_VAR;
insert into IEC_O_ALG_EXPR_OP_DEFS (
EXPR_CODE,
OPERATOR_VAR,
OPERATOR_CODE,
INACTIVE_DATA_NAME,
INACTIVE_DATA_FLAG,
OBJECT_VERSION_NUMBER,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN)
values (
X_EXPR_CODE,
X_OPERATOR_VAR,
X_OPERATOR_CODE,
X_INACTIVE_DATA_NAME,
X_INACTIVE_DATA_FLAG,
X_OBJECT_VERSION_NUMBER,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN
);
end INSERT_ROW;
cursor c is select
INACTIVE_DATA_NAME,
INACTIVE_DATA_FLAG,
OBJECT_VERSION_NUMBER
from IEC_O_ALG_EXPR_OP_DEFS
where EXPR_CODE = X_EXPR_CODE and OPERATOR_CODE = X_OPERATOR_CODE and
OPERATOR_VAR = X_OPERATOR_VAR
for update of EXPR_CODE,OPERATOR_CODE,OPERATOR_VAR nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_EXPR_CODE in VARCHAR2,
X_OPERATOR_VAR in VARCHAR2,
X_OPERATOR_CODE in VARCHAR2,
X_INACTIVE_DATA_NAME in VARCHAR2,
X_INACTIVE_DATA_FLAG in VARCHAR2,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
update IEC_O_ALG_EXPR_OP_DEFS
set
INACTIVE_DATA_NAME = X_INACTIVE_DATA_NAME,
INACTIVE_DATA_FLAG = X_INACTIVE_DATA_FLAG,
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where EXPR_CODE = X_EXPR_CODE and OPERATOR_CODE = X_OPERATOR_CODE and
OPERATOR_VAR = X_OPERATOR_VAR;
end UPDATE_ROW;
procedure DELETE_ROW (
X_EXPR_CODE in VARCHAR2,
X_OPERATOR_VAR in VARCHAR2,
X_OPERATOR_CODE in VARCHAR2
) is
begin
delete from IEC_O_ALG_EXPR_OP_DEFS
where EXPR_CODE = X_EXPR_CODE and OPERATOR_CODE = X_OPERATOR_CODE and
OPERATOR_VAR = X_OPERATOR_VAR;
end DELETE_ROW;
UPDATE_ROW (X_EXPR_CODE, X_OPERATOR_VAR, X_OPERATOR_CODE, X_INACTIVE_DATA_NAME, X_INACTIVE_DATA_FLAG, 0, SYSDATE, USER_ID, 0);
INSERT_ROW (ROW_ID, X_EXPR_CODE, X_OPERATOR_VAR, X_OPERATOR_CODE, X_INACTIVE_DATA_NAME, X_INACTIVE_DATA_FLAG, 0, SYSDATE, USER_ID, SYSDATE, USER_ID, 0);