Hi Marcel/All,
Sorry but I'm possibly missing something simple, I seem to have an issue with a new node I have recently set up.
I have recently convinced our PAC's system here to set up a Q/R node for us to query and retrieve images from. They have since set up our Conquest system as a node set up for Q/R.
So I have added their PAC's node details to my ConQuest server.
Then when I try to query the node with a PatientID value, I'm getting an error. I've tried restarting service/PC mmultiple times but still the same result.
Then I have installed ZeroBrane application and manually used the query.lua script and it was successful and reported back that a patient exists for that PatientID and there are 4 different studies.
The log of the error I get when I submit the query from the GUI is:
[RTPHYSICS] 9999,0400 1038 LO ConquestConsoleComma "lua:local first=true; local ae=[[UHGEIPROD]];local level=[[PATIENT]];local q={QueryRetrieveLevel=[[PATIENT]],PatientID=[[0381930]],PatientName=[[]],};local q2=DicomObject:new(); for k,v in pairs(q) do q2[k]=v end;local r2=dicomquery(ae, level, q2);local s="
[RTPHYSICS] *** lua run error [string "local first=true; local ae=[[UHGEIPROD]];lo..."]:1: attempt to concatenate field '?' (a table value) in 'local first=true; local ae=[[UHGEIPROD]];local level=[[PATIENT]];local q={QueryRetrieveLevel=[[PATIENT]],PatientID=[[0381930]],PatientName=[[]],};local q2=DicomObject:new(); for k,v in pairs(q) do q2[k]=v end;local r2=dicomquery(ae, level, q2);local s=tempfile("txt") f=io.open(s, "wb");if r2==nil then f:write("no connection with "..ae.."\n") returnfile=s f:close() return end; local r = loadstring("return "..r2:Serialize())();r[1].QueryRetrieveLevel=nil; r[1].TransferSyntaxUID=nil; local keys={} for k,v in pairs(r[1]) do keys[#keys+1]=k end; table.sort(keys, function(a, b) return string.sub(a, 1, 7)<string.sub(b, 1, 7) end); if first then for k,v in ipairs(keys) do f:write(v.." ") end f:write("\n") end if first then f:write("---------------------------------------------------------------------------------------------------------------------------------------------------------------\n") end for k,v in ipairs(r) do for k2,v2 in ipairs(keys) do f:write("["..v[v2].."] ") end f:write("\n") end returnfile=s f:close();'
Also see attached screenshots of what I'm seeing.
Any suggestions anyone on how to get this working via the GUI or more importantly the Web Application?
Thanks
John