The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE select_row( recinfo IN OUT NOCOPY gl_budget_versions%ROWTYPE ) IS
BEGIN
SELECT *
INTO recinfo
FROM gl_budget_versions
WHERE budget_version_id = recinfo.budget_version_id;
'gl_budget_versions.select_row');
END select_row;
PROCEDURE insert_record(
x_budget_version_id NUMBER,
x_budget_name VARCHAR2,
x_status VARCHAR2,
x_master_budget_ver_id NUMBER,
x_last_updated_by NUMBER,
x_last_update_login NUMBER) IS
BEGIN
INSERT INTO GL_BUDGET_VERSIONS
(budget_version_id, budget_type, budget_name, version_num,
description, status, date_opened, date_active, date_archived,
creation_date, created_by, last_update_date, last_updated_by,
last_update_login, control_budget_version_id)
VALUES
(x_budget_version_id, 'standard', x_budget_name, 1,
'first version', x_status, sysdate, null, null,
sysdate, x_last_updated_by, sysdate, x_last_updated_by,
x_last_update_login, x_master_budget_ver_id);
'gl_budget_versions_pkg.insert_record');
END insert_record;
PROCEDURE update_record(
x_budget_version_id NUMBER,
x_budget_name VARCHAR2,
x_status VARCHAR2,
x_master_budget_ver_id NUMBER,
x_last_updated_by NUMBER,
x_last_update_login NUMBER) IS
BEGIN
UPDATE gl_budget_versions
SET status = x_status,
budget_name = x_budget_name,
control_budget_version_id = x_master_budget_ver_id,
last_update_date = sysdate,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login
WHERE budget_version_id = x_budget_version_id;
'gl_budget_versions_pkg.update_record');
END update_record;
PROCEDURE select_columns(
x_budget_version_id NUMBER,
x_budget_name IN OUT NOCOPY VARCHAR2 ) IS
recinfo gl_budget_versions%ROWTYPE;
select_row( recinfo );
'gl_encumbrance_types.select_columns');
END select_columns;