Mercurial > hg > orthanc

annotate Resources/Samples/Lua/Autorouting.lua @ 1010:160dfe770618 lua-scripting

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refactoring
author Sebastien Jodogne <s.jodogne@gmail.com>
date Wed, 09 Jul 2014 17:05:00 +0200
parents 187ed107a59f
children 23590917e83e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1007
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
1 function OnStoredInstance(instanceId, tags, metadata)
1002
b067017a8a5b anonymization refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 998
diff changeset
2 --PrintRecursive(tags)
1007
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
3 --PrintRecursive(metadata)
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
4 --print(metadata['RemoteAET'])
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
5
1008
187ed107a59f modify command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
6 if (metadata['ModifiedFrom'] == nil and
187ed107a59f modify command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
7 metadata['AnonymizedFrom'] == nil) then
1007
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
8 local patientName = string.lower(tags['PatientName'])
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
9 if string.find(patientName, 'david') ~= nil then
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
10 --Delete(SendToModality(instanceId, 'sample'))
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
11 --Delete(SendToPeer(instanceId, 'peer'))
1010
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
12 local replace = {}
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
13 replace['StationName'] = 'My Medical Device'
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
14
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
15 local remove = { 'MilitaryRank' }
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
16
160dfe770618 refactoring
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1008
diff changeset
17 Delete(SendToModality(ModifyInstance(instanceId, replace, remove, true), 'sample'))
1008
187ed107a59f modify command
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1007
diff changeset
18 Delete(instanceId)
1007
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
19 else
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
20 Delete(instanceId)
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
21 end
871c49c9b11d lua routing is working
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1006
diff changeset
22 end
998
4136fab6a639 callback on stored instance
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
23 end