Potential race condition: systems_in_db() called twice

[sneumann]

Hi,
if at the same time as this call:

PredRet/retdb/server/server_upload_tab_process_data.R

Line 156 in 53c62ee

sys_name = as.character(unlist(lapply(systems_in_db(),function(x) x$system_name)))

somebody inserts a new system, then sys_name and sys_id can be out of sync.
Very low priority, but keep in mind "what could possibly go wrong" :-)

[sneumann]

Actually, the line above could use name2sys_oid() from
https://github.com/stanstrup/PredRet/blob/master/PredRetR/R/database_queries.R#L203
and there you'd fix the potential race condition.