The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_CHANGE_ORDER_TYPE in VARCHAR2,
X_TOLERANCE_NAME in VARCHAR2,
X_ORG_ID in NUMBER,
X_SEQUENCE_NUMBER in NUMBER,
X_MAXIMUM_INCREMENT in NUMBER,
X_MAXIMUM_DECREMENT in NUMBER,
X_ROUTING_FLAG in VARCHAR2,
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
x_tolerance_id number;
select to_char(PO_CHANGE_ORDER_TOLERANCES_S.NEXTVAL)
into X_TOLERANCE_ID from sys.dual;
insert into PO_CHANGE_ORDER_TOLERANCES_ALL (
TOLERANCE_ID,
CHANGE_ORDER_TYPE,
TOLERANCE_NAME,
ORG_ID,
SEQUENCE_NUMBER,
MAXIMUM_INCREMENT,
MAXIMUM_DECREMENT,
ROUTING_FLAG,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN
) values (
X_TOLERANCE_ID,
X_CHANGE_ORDER_TYPE,
X_TOLERANCE_NAME,
X_ORG_ID,
X_SEQUENCE_NUMBER,
X_MAXIMUM_INCREMENT,
X_MAXIMUM_DECREMENT,
X_ROUTING_FLAG,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN);
end INSERT_ROW;
X_LAST_UPDATE_DATE in DATE,
X_MAXIMUM_INCREMENT in NUMBER,
X_MAXIMUM_DECREMENT in NUMBER,
X_ROUTING_FLAG in VARCHAR2,
X_CUSTOM_MODE in VARCHAR2
) IS
f_luby number; -- entity owner in file
f_ludate date; -- entity update date in file
db_ludate date; -- entity update date in db
f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'DD/MM/YYYY'), sysdate);
select DECODE(LAST_UPDATED_BY, -1, 1, LAST_UPDATED_BY), LAST_UPDATE_DATE
into db_luby, db_ludate
from PO_CHANGE_ORDER_TOLERANCES_ALL
where change_order_Type = X_CHANGE_ORDER_TYPE
and TOLERANCE_NAME = X_TOLERANCE_NAME
and ( (X_ORG_ID is null and org_id = -3113 )
or (X_ORG_ID is not null and org_id = X_ORG_ID));
UPDATE PO_CHANGE_ORDER_TOLERANCES_ALL
SET MAXIMUM_INCREMENT = X_MAXIMUM_INCREMENT,
MAXIMUM_DECREMENT = X_MAXIMUM_DECREMENT,
ROUTING_FLAG = X_ROUTING_FLAG,
LAST_UPDATE_DATE = f_ludate ,
LAST_UPDATED_BY = f_luby,
LAST_UPDATE_LOGIN = 0
WHERE CHANGE_ORDER_TYPE = X_CHANGE_ORDER_TYPE
AND TOLERANCE_NAME = X_TOLERANCE_NAME
AND ( (X_ORG_ID IS NULL AND ORG_ID = -3113 )
OR (X_ORG_ID IS NOT NULL AND ORG_ID = X_ORG_ID));
INSERT_ROW (
X_CHANGE_ORDER_TYPE,
X_TOLERANCE_NAME,
X_ORG_ID,
X_SEQUENCE_NUMBER,
X_MAXIMUM_INCREMENT,
X_MAXIMUM_DECREMENT,
X_ROUTING_FLAG,
f_ludate ,
f_luby ,
f_ludate ,
f_luby ,
0);