The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW (
X_ROWID in out NOCOPY VARCHAR2,
X_LINE_DEFAULT_ID in out NOCOPY NUMBER,
X_LINE_NUM in out NOCOPY NUMBER,
X_VAR_RENT_ID in NUMBER,
X_SALES_TYPE_CODE in VARCHAR2,
X_ITEM_CATEGORY_CODE in VARCHAR2,
X_LINE_TEMPLATE_ID in NUMBER,
X_AGREEMENT_TEMPLATE_ID in NUMBER,
X_LINE_START_DATE in DATE,
X_LINE_END_DATE in DATE,
X_PROCESSED_FLAG 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,
X_ORG_ID in NUMBER,
X_ATTRIBUTE_CATEGORY in VARCHAR2,
X_ATTRIBUTE1 in VARCHAR2,
X_ATTRIBUTE2 in VARCHAR2,
X_ATTRIBUTE3 in VARCHAR2,
X_ATTRIBUTE4 in VARCHAR2,
X_ATTRIBUTE5 in VARCHAR2,
X_ATTRIBUTE6 in VARCHAR2,
X_ATTRIBUTE7 in VARCHAR2,
X_ATTRIBUTE8 in VARCHAR2,
X_ATTRIBUTE9 in VARCHAR2,
X_ATTRIBUTE10 in VARCHAR2,
X_ATTRIBUTE11 in VARCHAR2,
X_ATTRIBUTE12 in VARCHAR2,
X_ATTRIBUTE13 in VARCHAR2,
X_ATTRIBUTE14 in VARCHAR2,
X_ATTRIBUTE15 in VARCHAR2
) IS
CURSOR C is
select ROWID
from PN_VAR_LINE_DEFAULTS_ALL
where LINE_DEFAULT_ID = X_LINE_DEFAULT_ID
;
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.INSERT_ROW (+)');
select nvl(max(lines.LINE_NUM),0)
into X_LINE_NUM
from PN_VAR_LINE_DEFAULTS_ALL lines
where lines.VAR_RENT_ID = X_VAR_RENT_ID;
select PN_VAR_LINE_DEFAULTS_S.nextval
into X_LINE_DEFAULT_ID
from dual;
insert into PN_VAR_LINE_DEFAULTS_ALL
(
LINE_DEFAULT_ID,
LINE_NUM,
VAR_RENT_ID,
SALES_TYPE_CODE,
ITEM_CATEGORY_CODE,
LINE_TEMPLATE_ID,
AGREEMENT_TEMPLATE_ID,
LINE_START_DATE,
LINE_END_DATE,
PROCESSED_FLAG,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ORG_ID,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
values
(
X_LINE_DEFAULT_ID,
X_LINE_NUM,
X_VAR_RENT_ID,
X_SALES_TYPE_CODE,
X_ITEM_CATEGORY_CODE,
X_LINE_TEMPLATE_ID,
X_AGREEMENT_TEMPLATE_ID,
X_LINE_START_DATE,
X_LINE_END_DATE,
X_PROCESSED_FLAG,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_ORG_ID,
X_ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1,
X_ATTRIBUTE2,
X_ATTRIBUTE3,
X_ATTRIBUTE4,
X_ATTRIBUTE5,
X_ATTRIBUTE6,
X_ATTRIBUTE7,
X_ATTRIBUTE8,
X_ATTRIBUTE9,
X_ATTRIBUTE10,
X_ATTRIBUTE11,
X_ATTRIBUTE12,
X_ATTRIBUTE13,
X_ATTRIBUTE14,
X_ATTRIBUTE15
);
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.INSERT_ROW (-)');
end INSERT_ROW;
cursor c1 is select
*
from PN_VAR_LINE_DEFAULTS_ALL
where LINE_DEFAULT_ID = X_LINE_DEFAULT_ID
for update of LINE_DEFAULT_ID nowait;
procedure UPDATE_ROW (
X_LINE_DEFAULT_ID in NUMBER,
X_LINE_NUM in NUMBER,
X_VAR_RENT_ID in NUMBER,
X_SALES_TYPE_CODE in VARCHAR2,
X_ITEM_CATEGORY_CODE in VARCHAR2,
X_LINE_TEMPLATE_ID in NUMBER,
X_AGREEMENT_TEMPLATE_ID in NUMBER,
X_LINE_START_DATE in DATE,
X_LINE_END_DATE in DATE,
X_PROCESSED_FLAG in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_ATTRIBUTE_CATEGORY in VARCHAR2,
X_ATTRIBUTE1 in VARCHAR2,
X_ATTRIBUTE2 in VARCHAR2,
X_ATTRIBUTE3 in VARCHAR2,
X_ATTRIBUTE4 in VARCHAR2,
X_ATTRIBUTE5 in VARCHAR2,
X_ATTRIBUTE6 in VARCHAR2,
X_ATTRIBUTE7 in VARCHAR2,
X_ATTRIBUTE8 in VARCHAR2,
X_ATTRIBUTE9 in VARCHAR2,
X_ATTRIBUTE10 in VARCHAR2,
X_ATTRIBUTE11 in VARCHAR2,
X_ATTRIBUTE12 in VARCHAR2,
X_ATTRIBUTE13 in VARCHAR2,
X_ATTRIBUTE14 in VARCHAR2,
X_ATTRIBUTE15 in VARCHAR2
) is
begin
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.UPDATE_ROW (+)');
update PN_VAR_LINE_DEFAULTS_ALL set
LINE_NUM = X_LINE_NUM,
VAR_RENT_ID = X_VAR_RENT_ID,
SALES_TYPE_CODE = X_SALES_TYPE_CODE,
ITEM_CATEGORY_CODE = X_ITEM_CATEGORY_CODE,
LINE_TEMPLATE_ID = X_LINE_TEMPLATE_ID,
AGREEMENT_TEMPLATE_ID = X_AGREEMENT_TEMPLATE_ID,
LINE_START_DATE = X_LINE_START_DATE,
LINE_END_DATE = X_LINE_END_DATE,
LINE_DEFAULT_ID = X_LINE_DEFAULT_ID,
PROCESSED_FLAG = X_PROCESSED_FLAG,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = X_ATTRIBUTE1,
ATTRIBUTE2 = X_ATTRIBUTE2,
ATTRIBUTE3 = X_ATTRIBUTE3,
ATTRIBUTE4 = X_ATTRIBUTE4,
ATTRIBUTE5 = X_ATTRIBUTE5,
ATTRIBUTE6 = X_ATTRIBUTE6,
ATTRIBUTE7 = X_ATTRIBUTE7,
ATTRIBUTE8 = X_ATTRIBUTE8,
ATTRIBUTE9 = X_ATTRIBUTE9,
ATTRIBUTE10 = X_ATTRIBUTE10,
ATTRIBUTE11 = X_ATTRIBUTE11,
ATTRIBUTE12 = X_ATTRIBUTE12,
ATTRIBUTE13 = X_ATTRIBUTE13,
ATTRIBUTE14 = X_ATTRIBUTE14,
ATTRIBUTE15 = X_ATTRIBUTE15
where LINE_DEFAULT_ID = X_LINE_DEFAULT_ID;
UPDATE pn_var_lines_all
SET sales_type_code = X_SALES_TYPE_CODE,
item_category_code = X_ITEM_CATEGORY_CODE
WHERE var_rent_id = X_VAR_RENT_ID
AND line_default_id = X_LINE_DEFAULT_ID;
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.UPDATE_ROW (-)');
end UPDATE_ROW;
procedure DELETE_ROW ( X_LINE_DEFAULT_ID in NUMBER )
IS
CURSOR line_items IS
SELECT line_item_id
FROM pn_var_lines_all
WHERE line_default_id = x_line_default_id;
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.DELETE_ROW (+)');
pn_var_lines_pkg.delete_row (rec.line_item_id);
DELETE FROM PN_VAR_LINE_DEFAULTS_ALL
WHERE LINE_DEFAULT_ID = X_LINE_DEFAULT_ID;
PNP_DEBUG_PKG.debug ('PN_VAR_LINE_DEFAULTS_PKG.DELETE_ROW (-)');
END DELETE_ROW;