summaryrefslogtreecommitdiff
path: root/server/xml/macros/fluoresceinconclusion-1.0.xml
diff options
context:
space:
mode:
Diffstat (limited to 'server/xml/macros/fluoresceinconclusion-1.0.xml')
-rw-r--r--server/xml/macros/fluoresceinconclusion-1.0.xml128
1 files changed, 0 insertions, 128 deletions
diff --git a/server/xml/macros/fluoresceinconclusion-1.0.xml b/server/xml/macros/fluoresceinconclusion-1.0.xml
deleted file mode 100644
index a8bd277..0000000
--- a/server/xml/macros/fluoresceinconclusion-1.0.xml
+++ /dev/null
@@ -1,128 +0,0 @@
-<?xml version='1.0' encoding='UTF-8'?>
-<!--
- 20081208: Bent Bisballe Nyeng
- Feltnavnene ændret så de giver mening.
- -->
-<!--
- 20090107: Bent Bisballe Nyeng
- Fluorescens info felterne skjules nu istedet for kun at blive disabled.
- -->
-<!--
- 20090211: Bent Bisballe Nyeng
- Fluorescens info felterne bliver nu disabled igen, men har f[et fjernet den
- altcombo som omkransede dem. Desuden er et 'andet' felt tilføjet.
- -->
-<macro name="fluoresceinconclusion" version="1.0">
- <resume language="lua">
- out = 'Konklusion:\n'
-
- if( getValue('fluorescens.conclusion') == 'Klassisk subretinal neovaskulær membran.'
- or getValue('fluorescens.conclusion') == 'Overvejende klassisk subretinal neovaskulær membran.' )
- then
- out = out .. getValue('fluorescens.conclusion') .. '\n'
- out = out .. 'Membranen er beliggende:'
- .. getValue('fluorescens.membrane.position') .. '\n'
- out = out .. 'Membranstørrelse:'
- .. getValue('fluorescens.membrane.size') .. 'µm\n'
- else
- if( getValue('fluorescens.conclusion') == 'andet' )
- then
- out = out .. getValue('fluorescens.conclusion.other') .. '\n'
- else
- out = out .. getValue('fluorescens.conclusion') .. '\n'
- end
- end
-
- return out
- </resume>
- <queries>
- </queries>
- <maps>
- </maps>
- <scripts>
- <script language="lua" name="angiografi_konklusion">
- -- This script sets the value of additional according to conclusion.
-
- if( getValue('fluorescens.conclusion') == 'Klassisk subretinal neovaskulær membran.'
- or getValue('fluorescens.conclusion') == 'Overvejende klassisk subretinal neovaskulær membran.' )
- then
- enable('yderligere_info_frame')
- else
- disable('yderligere_info_frame')
- end
-
- if( getValue('fluorescens.conclusion') == 'andet' )
- then
- enable('andet_frame')
- else
- disable('andet_frame')
- end
-
- return true
- </script>
- </scripts>
- <widgets caption="Konklusion (B.2.7.3)"
- layout="vbox">
-
- <frame layout="hbox">
- <label caption="Øje:" width="50"/>
- <radiobuttons name="fluorescens.conclusion.eye" value="">
- <radiobutton caption="o.dxt" value="o.dxt"/>
- <radiobutton caption="o.sin" value="o.sin"/>
- </radiobuttons>
- <spacer/>
- </frame>
-
- <combobox name="fluorescens.conclusion"
- value="Atrofiske foranderinger. Der findes ingen behandlingsindikation."
- script="angiografi_konklusion">
- <item caption="Atrofiske foranderinger. Der findes ingen behandlingsindikation"
- value="Atrofiske foranderinger. Der findes ingen behandlingsindikation." />
- <item caption="Pigmentepitelløsning. Der findes ingen behandlingsindikation"
- value="Pigmentepitelløsning. Der findes ingen behandlingsindikation." />
- <item caption="Klassisk subretinal karnydannelse"
- value="Klassisk subretinal neovaskulær membran." />
- <item caption="Overvejende klassisk subretinal neovaskulær membran"
- value="Overvejende klassisk subretinal neovaskulær membran." />
- <item caption="Minimalt klassisk subretinal neovaskulær membran"
- value="Minimalt klassisk subretinal neovaskulær membran." />
- <item caption="Okkult subretinal neovaskulær membran."
- value="Okkult subretinal neovaskulær membran." />
- <item caption="Andet"
- value="andet" />
- </combobox>
-
- <frame name="andet_frame" layout="hbox">
- <label caption="Andet:"/>
- <lineedit name="fluorescens.conclusion.other" value=""/>
- </frame>
-
- <frame name="yderligere_info_frame" layout="vbox">
- <label caption="Yderligere information:"/>
-
- <frame layout="hbox">
- <label caption="Membran beliggenhed:" width="150"/>
- <combobox name="fluorescens.membrane.position" value="">
- <item caption="Subfovealt" value="Subfovealt" />
- <item caption="Juxtafovealt" value="Juxtafovealt" />
- <item caption="Extrafovealt" value="Extrafovealt" />
- </combobox>
- <spacer/>
- </frame>
-
- <frame layout="hbox">
- <label caption="Membranstørrelse:" width="150"/>
- <lineedit name="fluorescens.membrane.size" regexp="[0-9,.-]+" value=""/>
- <label caption="µm" />
- <spacer/>
- </frame>
-
- </frame>
-
- <!-- Knapper -->
- <frame layout="hbox">
- <spacer/>
- <button caption="Gem" action="commit"/>
- </frame>
- </widgets>
-</macro>