Web server

jweste · Jul 15th 2022

This works!

Code

function remotequery(ae, level, q)
local remotecode =
[[
local ae=']]..ae..[[';
local level=']]..level..[[';
local q=]]..q:Serialize()..[[;
local q2=DicomObject:new(); for k,v in pairs(q) do q2[k]=v end;
local r = dicomquery(ae, level, q2):Serialize(true,true);
local s=tempfile('txt') local f=io.open(s, "wb") f:write(r) returnfile=s f:close();
]]
local f = servercommand('lua:'..remotecode)
return f
end;


a=DicomObject:new()
a.QueryRetrieveLevel='STUDY'
a.StudyInstanceUID=''
a.StudyDate='19000101-20221231'
b=remotequery('CONQUESTSRV1', 'STUDY', a)
io.write(b)

Display More

Great, It works.

jweste · Jul 15th 2022

Quote from marcelvanherk

change line 12 into

return f

and the last line 26-28 into

print(b)

Marcel

Display More

Hi, Marcel

Regarding images, I need to get ImageDate,ImageTime,ObjectFile,DeviceName in the results.

With query commands I use:

--query:DICOMImages|SOPInstanc,ImageNumbe, ImageDate, ImageTime, ImagePat, SeriesInst, ObjectFile, DeviceName

and I get all columns

I am using the next code but thwse columns don´t appear in the result.

Is there some file where I can see the columns avaliables to dicomquery results? For now, I am using the pdf manual

a=DicomObject:new()

a.ImageDate=''

a.ImageTime=''

a.ObjectFile=''

a.DeviceName=''

a.PatientID = '66971'

a.SeriesInstanceUID= '1.3.46.670589.11.17521.5.0.3124.2008081915302126599'

a.InstanceNumber = ''

a.SOPInstanceUID = ''

a.SliceLocation = ''

a.ImageComments = ''

a.NumberOfFrames = ''

b=remotequery(ae, 'IMAGE', a);

io.write(b)

marcelvanherk · Jul 15th 2022

dicom.sql lists all fields in the database with dicom codes. A dicom query uses dicom tag names, not sql names or dicom codes.

So try

a["9999,0800"]=''"

a["9999,0801"]=''"

instead of

a.ObjectFile=''

a.DeviceName=''

These must be added to dgate.dic (on the server side) to be converted into json though

(9999,0800) VERS="CQ" VR="US" VM="1" Keyword="ConquestDevice" Name="Conquest Device"

(9999,0801) VERS="CQ" VR="US" VM="1" Keyword="ConquestObjectFile" Name="Conquest Object File"

If you add them to dgate.dic on the client side you can do:

a.ConquestDevice=''"

a.ConquestObjectFile=''"

Marcel

jweste · Jul 15th 2022

Quote from marcelvanherk

dicom.sql lists all fields in the database with dicom codes. A dicom query uses dicom tag names, not sql names or dicom codes.

So try

a["9999,0800"]=''"

a["9999,0801"]=''"

instead of

a.ObjectFile=''

a.DeviceName=''

These must be added to dgate.dic (on the server side) to be converted into json though

(9999,0800) VERS="CQ" VR="US" VM="1" Keyword="ConquestDevice" Name="Conquest Device"

(9999,0801) VERS="CQ" VR="US" VM="1" Keyword="ConquestObjectFile" Name="Conquest Object File"

If you add them to dgate.dic on the client side you can do:

a.ConquestDevice=''"

a.ConquestObjectFile=''"

Marcel

Display More

I did, but it´s not returning a string. And How about ImageDate and ImageTime?

[ ...{"TransferSyntaxUID":"1.2.840.10008.1.2","SOPInstanceUID":"1.3.46.670589.11.17521.5.0.3124.2008081915354076610","QueryRetrieveLevel":"IMAGE","PatientName":"LOMBIX","PatientID":"66971","SeriesInstanceUID":"1.3.46.670589.11.17521.5.0.3124.2008081915302126599","InstanceNumber":"10","NumberOfFrames":"","ConquestDevice":[13878,14137,23601,11825,11827,13876,13870,12343,14389,11833,12593,12590,13623,12594,13614,12334,13102,12849,11828,12338,14384,14384,14641,13617,12339,12594,13874,14645,24377,14384,12592,12383,12336,12592,24368,13873,14133,13365,13360,14386,12336,26161,25646,28003],"ConquestObjectFile":[16717,12359]}]

marcelvanherk · Jul 15th 2022

Sorry US in dgate.dic is wrong is must be LO (long string)

ImageDate and ImageTime do not exist (see dgate.dic), try one of these:

(0008,0020) VERS="4" VR="DA" VM="1" Keyword="StudyDate" Name="Study Date"

(0008,0021) VERS="4" VR="DA" VM="1" Keyword="SeriesDate" Name="Series Date"

(0008,0022) VERS="4" VR="DA" VM="1" Keyword="AcquisitionDate" Name="Acquisition Date"

(0008,0023) VERS="4" VR="DA" VM="1" Keyword="ContentDate" Name="Content Date"

(0008,0030) VERS="4" VR="TM" VM="1" Keyword="StudyTime" Name="Study Time"

(0008,0031) VERS="4" VR="TM" VM="1" Keyword="SeriesTime" Name="Series Time"

(0008,0032) VERS="4" VR="TM" VM="1" Keyword="AcquisitionTime" Name="Acquisition Time"

(0008,0033) VERS="4" VR="TM" VM="1" Keyword="ContentTime" Name="Content Time"

Marcel

marcelvanherk · Jul 15th 2022

Also 800 and 801 must be swapped.

jweste · Jul 15th 2022

Quote from marcelvanherk

Also 800 and 801 must be swapped.

Thank you.

Is possible pass arguments to lua file script? Something as:

dgate64 "--dolua:dofile([[pacientes.lua]],(a,b,c))"

If yes, how can I read the arguments into script?

marcelvanherk · Jul 15th 2022

Hi,

you can create one or more lua functions in the file and call them after dofile:

e.g.

Code

function pacientes(server, pid)
  a=DicomObject:new()
  a.QueryRetrieveLevel='PATIENT'
  a.PatientID=pid
  a.PatientName=""
  b=remotequery(server, 'PATIENT', a)
  io.write(b)
end

dgate64 "--dolua:dofile([[queryfunctions.lua]]);pacientes([[CONQUESTSRV1]],[[99*]]))"

Marcel

jweste · Jul 15th 2022

Quote from marcelvanherk
Hi,

you can create one or more lua functions in the file and call them after dofile:

e.g.
Code
function pacientes(server, pid)
  a=DicomObject:new()
  a.QueryRetrieveLevel='PATIENT'
  a.PatientID=pid
  a.PatientName=""
  b=remotequery(server, 'PATIENT', a)
  io.write(b)
end
dgate64 "--dolua:dofile([[queryfunctions.lua]]);pacientes([[CONQUESTSRV1]],[[99*]]))"

Marcel
Display More

Ok,

Is there some difference caling the next code into script to get AE and explicitly pass AE as parameters?

local ae = servercommand('get_param:MyACRNema')

marcelvanherk · Jul 15th 2022

the latter is better, because it will more likely be right.

jweste · Jul 15th 2022

Quote from marcelvanherk

the latter is better, because it will more likely be right.

I have changed all code from query commands to lua scripts.

When I run the command on my backend it complains about queryfunctions.lua not found.

I have queryfunctions.lua in my backend api folder. After the error I tried to put into Conquest Main folder as well.

But the same error occurs.

Where should I put lua scripts?

Code

F:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomapi/dgate.exe -p5678 -hCONQUESTSRV1 -q127.0.0.1 -wF:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomapi  "--dolua:dofile([[queryfunctions.lua]]);studies([[CONQUESTSRV1]],[[pa]],[[20220710-20220715]])"
child process exited with code 4294967295 and signal null
*** lua run error cannot open queryfunctions.lua: No such file or directory in 'dofile([[queryfunctions.lua]]);studies([[CONQUESTSRV1]],[[pa]],[[20220710-20220715]])'

marcelvanherk · Jul 15th 2022

Hi,

--dolua runs in the frontend so it must be in F:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomap folder

Marcel

jweste · Jul 15th 2022

Quote from marcelvanherk

Hi,

--dolua runs in the frontend so it must be in F:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomap folder

Marcel

It works only when I run the command right into conquest main folder and queryfunctions.lua too.

Outside conquest folder, when I run the commando I get:

Code

F:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomapi/dgate.exe -p5678 -hCONQUESTSRV1 -q127.0.0.1 -wF:\Programas\vuejs\nuxt-iclindoctor\server_iclindoctor/api/dicomapi  "--dolua:dofile([[queryfunctions.lua]]);studies([[CONQUESTSRV1]],[[pa]],[[]])"
*** lua run error cannot open queryfunctions.lua: No such file or directory in 'dofile([[queryfunctions.lua]]);studies([[CONQUESTSRV1]],[[pa]],[[]])'

jweste · Jul 16th 2022

I solved it. Thank you Marcel

I needed to use the fullpath in queryfunctions.lua

I will send you the final API using lua scripts.

Now we have two options: with lua script or query commands

jweste · Jul 16th 2022

Hi, Marcel

I am working to make a better code.

I´d like to converter a dicom file on the fly and get a gif result. It will be used in a thumbnail in the front end.

I have tried the next but no look:

Code

function converte(pgraphic,plw,psize,pslice)
local graphic = pgraphic or  'jpg'
local lw = plw or '1000/500/0'
local size = psize or '512'
local slice = pslice or 'f://programas//appprog//dicomserver150c//data//86557//1.3.46.670589.30.1.6.1.116520970982.1493417302625.1_0003_000001_1657540423000b.dcm'
local tempname = string.gsub(slice, '.-:', '')..'.jpg'
local remotecode =
[[
local ofile=']]..slice..[[';
local oname=']]..tempname..[[';
local osize=']]..size..[[';
local olw=']]..lw..[[';
local r = convert_to_jpg:ofile,osize,oname,olw;
local p=io.open(tempname, 'rb')
local content=p:read('*all')
local s=tempfile('txt') local f=io.open(s, "wb") f:write(content) returnfile=s f:close();
-- here I´d like to erase tempname file too
]]
newdicomobject():Script('rm '..tempname)
r=servercommand('lua:'..remotecode)
return r
end;

local b=converte('','','','');
io.write(b);

Display More

Result:

Code

F:\Programas\AppProg\dicomserver150c>dgate64 "--dolua:dofile([[test_slice.lua]])"
*** lua run error test_slice.lua:61: bad argument #1 to 'write' (string expected, got nil) in 'dofile([[test_slice.lua]])'

marcelvanherk · Jul 17th 2022

Hi,

There is no direct Lua based image conversion. Maybe the fastest way to convert is the following using old conquest scripting, code mostly taken from extension folder:

Code

local frame = 0
local infile = pslice or 'f://programas//appprog//dicomserver150c//data//86557//1.3.46.670589.30.1.6.1.116520970982.1493417302625.1_0003_000001_1657540423000b.dcm'
local outfile = tempfile('.jpg')

local x = DicomObject:new()
x:Read(infile)

local c = (x.WindowCenter or 0)     if c=='' then c=0 end
local w = (x.WindowWidth or  0)     if w=='' then w=0 end
local s = (x.RescaleSlope or 1)     if s=='' then s=1 end
local i = (x.RescaleIntercept or 0) if i=='' then i=0 end

if string.find(c, '%\\') then
  c = string.match(c, '(.-)\\')
end

if string.find(w, '%\\') then
  w = string.match(w, '(.-)\\')
end

w = tonumber(w)/tonumber(s)
c = tonumber(c)/tonumber(s)

x:Script('save jpg level '..math.floor(c)..' window '..(math.ceil(w/2))..' size 512 frame '..frame..' to '..outfile)
-- do stuff with outfile

x:Script('rm '..outfile)

Display More

Marcel

jweste · Jul 17th 2022

Hi, Marcel,

How can I send the output to stdout?

I add some code to your sample to read the output file and send to stdout. But It doesn´t work.

I created a file called test "slicema.lua" the content below.

And I execute:

Code

F:\Programas\AppProg\dicomserver150c>dgate64 "--dolua:dofile([[slicema.lua]])"

there is no result in stdout console

-- slicema.lua file

Code

local frame = 0
local infile = pslice or 'f://programas//appprog//dicomserver150c//data//86557//1.3.46.670589.30.1.6.1.116520970982.1493417302625.1_0003_000001_1657540423000b.dcm'
local outfile = tempfile('.jpg')


local x = DicomObject:new()
x:Read(infile)


local c = (x.WindowCenter or 0)     if c=='' then c=0 end
local w = (x.WindowWidth or  0)     if w=='' then w=0 end
local s = (x.RescaleSlope or 1)     if s=='' then s=1 end
local i = (x.RescaleIntercept or 0) if i=='' then i=0 end




local open = io.open
local function read_file(path)
local file = open(path, "rb") -- r read mode and b binary mode
if not file then return nil end
local content = file:read "*a" -- *a or *all reads the whole file
file:close()
return content
end




if string.find(c, '%\\') then
c = string.match(c, '(.-)\\')
end


if string.find(w, '%\\') then
w = string.match(w, '(.-)\\')
end


w = tonumber(w)/tonumber(s)
c = tonumber(c)/tonumber(s)


x:Script('save jpg level '..math.floor(c)..' window '..(math.ceil(w/2))..' size 512 frame '..frame..' to '..outfile)
-- do stuff with outfile
-- read file content
local fileContent = read_file('images.lua');
-- write to stdout
io.write(fileContent);
x:Script('rm '..outfile)

Display More

marcelvanherk · Jul 17th 2022

Hi,

Sorry I was not clear the code I posted needs to be run remotely in the server, not in the client. If you pass the outfilename to returnfile is will be deleted by the server. Also when you read the image you do not need to know the MAG device, just say x:Read(PatientID..[[:]]..SOPInstanceUID)

Marcel

jweste · Jul 17th 2022

Quote from marcelvanherk

Hi,

Sorry I was not clear the code I posted needs to be run remotely in the server, not in the client. If you pass the outfilename to returnfile is will be deleted by the server. Also when you read the image you do not need to know the MAG device, just say x:Read(PatientID..[[:]]..SOPInstanceUID)

Marcel

Hi, Marcel

Now I am very lost.

My question is: In my backend, I need to take a slice, convert to jpeg and send it to browser (frontend).

For now, all nodejs code API in my backend send the dgate lua scripts to remote conquest server and captures the results in the backend stdout.

So, I need to take the jpeg from stdout.

Could you post a sample, please?

marcelvanherk · Jul 17th 2022

try this:

Code

function converte(pgraphic,psize,pslice)
  local graphic = pgraphic or  'jpg'
  local size = psize or 512
  local slice = pslice or '86557:1.3.46.670589.30.1.6.1.116520970982.1493417302625.1' -- must be valid patid and sopinstanceuid

  local remotecode =
[[
  local ofile=']]..slice..[[';
  local osize=']]..size..[[';
  local ographic=']]..graphic..[[';

  local outfile = tempfile('.'..pgraphic)
  local x = DicomObject:new()
  x:Read(ofile)

  local c = (x.WindowCenter or 0)     if c=='' then c=0 end
  local w = (x.WindowWidth or  0)     if w=='' then w=0 end
  local s = (x.RescaleSlope or 1)     if s=='' then s=1 end
  local i = (x.RescaleIntercept or 0) if i=='' then i=0 end

  if string.find(c, '%\\') then
    c = string.match(c, '(.-)\\')
  end
  if string.find(w, '%\\') then
    w = string.match(w, '(.-)\\')
  end

  w = tonumber(w)/tonumber(s)
  c = tonumber(c)/tonumber(s)

  x:Script('save '..ographic..' level '..math.floor(c)..' window '..(math.ceil(w/2))..' size 512 frame '..frame..' to '..outfile)
  returnfile = outfile
]]
  r=servercommand('lua:'..remotecode)
  return r
end

local b=converte('jpg',128,'0009703828:1.3.46.670589.5.2.10.2156913941.892665339.718742');
io.write(b);

Display More

This is untested.

Web server

Participate now!

Share

Similar Threads

Which versions of MS SQL are supported?

StudyInsta's conflict

Unable to retrieve studies from virtual server

Refused to enter inconsistent link PatientID into DICOMStudies