The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row (x_rowid IN OUT NOCOPY VARCHAR2,
x_ghg_asset_id NUMBER,
x_asset_id NUMBER,
x_asset_type_lookup_code VARCHAR2,
x_book_type_code VARCHAR2,
x_asset_number VARCHAR2,
x_description VARCHAR2,
x_tag_number VARCHAR2,
x_serial_number VARCHAR2,
x_transport_type_lookup_code VARCHAR2,
x_vendor_id NUMBER,
x_vendor_site_id NUMBER,
x_start_date DATE,
x_end_date DATE,
x_created_by NUMBER,
x_creation_date DATE,
x_last_updated_by NUMBER,
x_last_update_date date,
x_last_update_login number,
x_ghg_organization_id number) IS
v_debug_info VARCHAR2(100);
SELECT ROWID
FROM GHG_ASSETS
WHERE ghg_asset_id = x_ghg_asset_id;
v_debug_info := 'Inserting into GHG_ASSETS';
INSERT INTO GHG_ASSETS (ghg_asset_id,
asset_id,
asset_type_lookup_code,
book_type_code,
asset_number,
description,
tag_number,
serial_number,
transport_type_lookup_code,
vendor_id,
vendor_site_id,
start_date,
end_date,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
ghg_organization_id )
VALUES (x_ghg_asset_id,
x_asset_id,
x_asset_type_lookup_code,
x_book_type_code,
x_asset_number,
x_description,
x_tag_number,
x_serial_number,
x_transport_type_lookup_code,
x_vendor_id,
x_vendor_site_id,
x_start_date,
x_end_date,
x_created_by,
x_creation_date,
x_last_updated_by,
x_last_update_date,
x_last_update_login,
x_ghg_organization_id);
END insert_row;
PROCEDURE update_row (x_rowid IN OUT NOCOPY VARCHAR2,
x_ghg_asset_id NUMBER,
x_asset_id NUMBER,
x_asset_type_lookup_code VARCHAR2,
x_book_type_code VARCHAR2,
x_asset_number VARCHAR2,
x_description VARCHAR2,
x_tag_number VARCHAR2,
x_serial_number VARCHAR2,
x_transport_type_lookup_code VARCHAR2,
x_vendor_id NUMBER,
x_vendor_site_id NUMBER,
x_start_date DATE,
x_end_date DATE,
x_created_by NUMBER,
x_creation_date DATE,
x_last_updated_by NUMBER,
x_last_update_date date,
x_last_update_login NUMBER,
x_ghg_organization_id number ) IS
v_debug_info VARCHAR2(100);
UPDATE GHG_ASSETS
SET ghg_asset_id = x_ghg_asset_id,
asset_id = x_asset_id,
asset_type_lookup_code = x_asset_type_lookup_code,
book_type_code = x_book_type_code,
asset_number = x_asset_number,
description = x_description,
tag_number = x_tag_number,
serial_number = x_serial_number,
transport_type_lookup_code = x_transport_type_lookup_code,
vendor_id = x_vendor_id,
vendor_site_id = x_vendor_site_id,
start_date = x_start_date,
end_date = x_end_date,
created_by = x_created_by,
creation_date = x_creation_date,
last_updated_by = x_last_updated_by,
last_update_date = x_last_update_date,
last_update_login = x_last_update_login,
ghg_organization_id = x_ghg_organization_id
WHERE rowid = x_rowid;
END update_row;
PROCEDURE delete_row (x_ghg_asset_id NUMBER) IS
v_row_count NUMBER(15);
DELETE FROM GHG_ASSETS
WHERE ghg_asset_id = x_ghg_asset_id;
END delete_row;
x_last_updated_by NUMBER,
x_last_update_date DATE,
x_last_update_login number,
x_ghg_organization_id number ) IS
v_debug_info VARCHAR2(100);
SELECT ghg_asset_id,
asset_id,
asset_type_lookup_code,
book_type_code,
asset_number,
description,
tag_number,
serial_number,
transport_type_lookup_code,
vendor_id,
vendor_site_id,
start_date,
end_date,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
ghg_organization_id
FROM GHG_ASSETS
WHERE rowid = x_rowid
FOR UPDATE of ghg_asset_id NOWAIT;
AND ((recinfo.last_updated_by = x_last_updated_by) OR
(recinfo.last_updated_by IS NULL AND x_last_updated_by IS NULL))
AND ((recinfo.last_update_date = x_last_update_date) OR
(recinfo.last_update_date IS NULL AND x_last_update_date IS NULL))
AND ((recinfo.last_update_login = x_last_update_login) OR
(recinfo.last_update_login IS NULL AND x_last_update_login IS NULL)))
THEN
NULL;