The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure STAMP_STRUCT_UPDATED (for_project_id in NUMBER) is
begin
update CZ_DEVL_PROJECTS
set LAST_STRUCT_UPDATE = SYSDATE
where DEVL_PROJECT_ID = for_project_id;
end STAMP_STRUCT_UPDATED;
procedure STAMP_LOGIC_UPDATED (for_project_id in NUMBER) is
begin
update CZ_DEVL_PROJECTS
set LAST_LOGIC_UPDATE = SYSDATE
where DEVL_PROJECT_ID = for_project_id;
end STAMP_LOGIC_UPDATED;
procedure STAMP_PROJECT_UPDATED (for_project_id in NUMBER) is
begin
update CZ_DEVL_PROJECTS
set LAST_STRUCT_UPDATE = SYSDATE,
LAST_LOGIC_UPDATE = SYSDATE
where DEVL_PROJECT_ID = for_project_id;
end STAMP_PROJECT_UPDATED;