Mercurial > hg > orthanc
annotate Resources/Samples/Lua/Autorouting.lua @ 1010:160dfe770618 lua-scripting
refactoring
author | Sebastien Jodogne <s.jodogne@gmail.com> |
---|---|
date | Wed, 09 Jul 2014 17:05:00 +0200 |
parents | 187ed107a59f |
children | 23590917e83e |
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 | 6 if (metadata['ModifiedFrom'] == nil and |
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 | 12 local replace = {} |
13 replace['StationName'] = 'My Medical Device' | |
14 | |
15 local remove = { 'MilitaryRank' } | |
16 | |
17 Delete(SendToModality(ModifyInstance(instanceId, replace, remove, true), 'sample')) | |
1008 | 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 |