summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--server/xml/macros/ref-spaltelampe-1.0.xml (renamed from server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml)146
-rw-r--r--server/xml/macros/ref_forunders-spaltelampe-1.0.xml577
-rw-r--r--server/xml/macros/ref_spaltelampe-1.0.xml377
3 files changed, 113 insertions, 987 deletions
diff --git a/server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml b/server/xml/macros/ref-spaltelampe-1.0.xml
index 2ba563b..72304ab 100644
--- a/server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml
+++ b/server/xml/macros/ref-spaltelampe-1.0.xml
@@ -1,10 +1,10 @@
<?xml version='1.0' encoding='UTF-8'?>
-<macro name="ref_efterkontrol.spaltelampe" version="1.0">
+<macro name="ref.spaltelampe" version="1.0">
<resume language="lua">
out = ''
if ( getValue('spaltelampe.right.missing') == '' )
then
- out = out .. 'Spaltelampe, højre øje:\n'
+ out = out .. 'Spaltelampe, o.dxt:\n'
if ( getValue('spaltelampe.right.konjuktiva') ~= '' )
then
@@ -12,10 +12,46 @@
end
out = out .. 'Cornea:\n'
- if ( getValue('spaltelampe.right.epithel') ~= '' )
+
+ if ( getValue('spaltelampe.right.epithel.ophelet') ~= '' or getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
then
- out = out .. ' Epithel: ' .. getValue('spaltelampe.right.epithel') .. '\n'
+ out = out .. ' Epithel: '
end
+ if ( getValue('spaltelampe.right.epithel.ophelet') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.right.epithel.ophelet')
+ if ( getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.right.epithel.central_epitheldefekt')
+ if (getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.right.epithel.toerhedsforandringer')
+ if (getValue('spaltelampe.right.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.right.epithel.andet') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.right.epithel.andet') .. '\n'
+ end
+
if ( getValue('spaltelampe.right.stroma') ~= '' )
then
out = out .. ' Stroma: ' .. getValue('spaltelampe.right.stroma') .. '\n'
@@ -66,7 +102,7 @@
then
out = out .. '\n'
end
- out = out .. 'Spaltelampe, venstre øje:\n'
+ out = out .. 'Spaltelampe, o.sin:\n'
if ( getValue('spaltelampe.left.konjuktiva') ~= '' )
then
@@ -74,6 +110,46 @@
end
out = out .. 'Cornea:\n'
+
+ if ( getValue('spaltelampe.left.epithel.ophelet') ~= '' or getValue('spaltelampe.left.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.left.epithel.andet') ~= '')
+ then
+ out = out .. ' Epithel: '
+ end
+ if ( getValue('spaltelampe.left.epithel.ophelet') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.left.epithel.ophelet')
+ if ( getValue('spaltelampe.left.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.left.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.left.epithel.central_epitheldefekt') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.left.epithel.central_epitheldefekt')
+ if (getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.left.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.left.epithel.toerhedsforandringer')
+ if (getValue('spaltelampe.left.epithel.andet') ~= '')
+ then
+ out = out .. ', '
+ else
+ out = out .. '\n'
+ end
+ end
+ if ( getValue('spaltelampe.left.epithel.andet') ~= '' )
+ then
+ out = out .. getValue('spaltelampe.left.epithel.andet') .. '\n'
+ end
+
if ( getValue('spaltelampe.left.epithel') ~= '' )
then
out = out .. ' Epithel: ' .. getValue('spaltelampe.left.epithel') .. '\n'
@@ -191,7 +267,7 @@
</script>
</scripts>
<widgets caption="Spaltelampe"
- layout="vbox">
+ layout="vbox">
<frame layout="hbox">
@@ -227,30 +303,32 @@
<frame layout="vbox">
<label caption="Epithel:"/>
<label/>
+ <label/>
+ <label/>
+ <label/>
</frame>
<frame layout="vbox">
- <altcombobox name="spaltelampe.right.epithel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Tørhedsforandringer" value="Tørhedsforandringer"/>
- <item caption="Mikrocyster" value="Mikrocyster"/>
- <item caption="Refraktile linier" value="Refraktile linier"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.epithel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.epithel.andet"/>
- </altitem>
- </altcombobox>
+ <checkbox name="spaltelampe.right.epithel.ophelet" caption="Ophelet" falsevalue="" truevalue="Ophelet"/>
+ <checkbox name="spaltelampe.right.epithel.central_epitheldefekt" caption="Central epitheldefekt" falsevalue="" truevalue="Central epitheldefekt"/>
+ <checkbox name="spaltelampe.right.epithel.toerhedsforandringer" caption="Tørhedsforandringer" falsevalue="" truevalue="Tørhedsforandringer"/>
+ <frame layout="hbox">
+ <label caption="Andet:"/>
+ <lineedit name="spaltelampe.right.epithel.andet"/>
+ </frame>
</frame>
</frame>
-
<frame layout="hbox">
<frame layout="vbox">
<label caption="Stroma:"/>
<label/>
</frame>
<frame layout="vbox">
- <altcombobox name="spaltelampe.right.stroma" layout="vbox" value="">
+ <altcombobox name="spaltelampe.right.stroma" layout="vbox" value="Klart">
<item caption="Ikke udfyldt" value=""/>
- <item caption="Ingen" value="Ingen"/>
+ <item caption="Klart" value="Klart"/>
+ <item caption="Karindvækst" value="Karindvækst"/>
+ <item caption="Makulering" value="Makulering"/>
+ <item caption="MD-folder" value="MD-folder"/>
<item caption="Spor af haze - grad 0,5" value="Spor af haze - grad 0,5"/>
<item caption="Let haze - grad 1" value="Let haze - grad 1"/>
<item caption="Nogen haze - grad 2" value="Nogen haze - grad 2"/>
@@ -389,7 +467,7 @@
name="spaltelampe.left.missing" script="left_eye"
map="missing_eye_left_map"
truevalue="mangler" falsevalue="" value=""/>
- <frame name="left_eye_frame" caption="Højre øje" layout="vbox">
+ <frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
<frame layout="hbox">
<frame layout="vbox">
@@ -415,30 +493,32 @@
<frame layout="vbox">
<label caption="Epithel:"/>
<label/>
+ <label/>
+ <label/>
+ <label/>
</frame>
<frame layout="vbox">
- <altcombobox name="spaltelampe.left.epithel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Tørhedsforandringer" value="Tørhedsforandringer"/>
- <item caption="Mikrocyster" value="Mikrocyster"/>
- <item caption="Refraktile linier" value="Refraktile linier"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.epithel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.epithel.andet"/>
- </altitem>
- </altcombobox>
+ <checkbox name="spaltelampe.left.epithel.ophelet" caption="Ophelet" falsevalue="" truevalue="Ophelet"/>
+ <checkbox name="spaltelampe.left.epithel.central_epitheldefekt" caption="Central epitheldefekt" falsevalue="" truevalue="Central epitheldefekt"/>
+ <checkbox name="spaltelampe.left.epithel.toerhedsforandringer" caption="Tørhedsforandringer" falsevalue="" truevalue="Tørhedsforandringer"/>
+ <frame layout="hbox">
+ <label caption="Andet:"/>
+ <lineedit name="spaltelampe.left.epithel.andet"/>
+ </frame>
</frame>
</frame>
-
<frame layout="hbox">
<frame layout="vbox">
<label caption="Stroma:"/>
<label/>
</frame>
<frame layout="vbox">
- <altcombobox name="spaltelampe.left.stroma" layout="vbox" value="">
+ <altcombobox name="spaltelampe.left.stroma" layout="vbox" value="Klart">
<item caption="Ikke udfyldt" value=""/>
- <item caption="Ingen" value="Ingen"/>
+ <item caption="Klart" value="Klart"/>
+ <item caption="Karindvækst" value="Karindvækst"/>
+ <item caption="Makulering" value="Makulering"/>
+ <item caption="MD-folder" value="MD-folder"/>
<item caption="Spor af haze - grad 0,5" value="Spor af haze - grad 0,5"/>
<item caption="Let haze - grad 1" value="Let haze - grad 1"/>
<item caption="Nogen haze - grad 2" value="Nogen haze - grad 2"/>
diff --git a/server/xml/macros/ref_forunders-spaltelampe-1.0.xml b/server/xml/macros/ref_forunders-spaltelampe-1.0.xml
deleted file mode 100644
index 2cc9365..0000000
--- a/server/xml/macros/ref_forunders-spaltelampe-1.0.xml
+++ /dev/null
@@ -1,577 +0,0 @@
-<?xml version='1.0' encoding='UTF-8'?>
-<macro name="ref_forunders.spaltelampe" version="1.0">
- <resume language="lua">
- out = ''
- if ( getValue('spaltelampe.right.missing') == '' )
- then
- out = out .. 'Spaltelampe, højre øje:\n'
-
- if ( getValue('spaltelampe.right.konjuktiva') ~= '' )
- then
- out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.right.konjuktiva') .. '\n'
- end
-
- out = out .. 'Cornea:\n'
- if ( getValue('spaltelampe.right.epithel') ~= '' )
- then
- out = out .. ' Epithel: ' .. getValue('spaltelampe.right.epithel') .. '\n'
- end
- if ( getValue('spaltelampe.right.stroma') ~= '' )
- then
- out = out .. ' Stroma: ' .. getValue('spaltelampe.right.stroma') .. '\n'
- end
- if ( getValue('spaltelampe.right.flap') ~= '' )
- then
- out = out .. ' Flap: ' .. getValue('spaltelampe.right.flap') .. '\n'
- end
- if ( getValue('spaltelampe.right.folder') ~= '' )
- then
- out = out .. ' Folder: ' .. getValue('spaltelampe.right.folder') .. '\n'
- end
- if ( getValue('spaltelampe.right.interface.partikler') ~= '' or getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' )
- then
- out = out .. ' Interface: '
- if ( getValue('spaltelampe.right.interface.partikler') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.interface.partikler')
- if ( getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' )
- then
- out = out .. ', '
- end
- end
- if ( getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.interface.epithelindvaekst') .. '\n'
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.right.endothel') ~= '' )
- then
- out = out .. ' Endothel: ' .. getValue('spaltelampe.right.endothel') .. '\n'
- end
- if ( getValue('spaltelampe.right.lens') ~= '' )
- then
- out = out .. 'Lens: ' .. getValue('spaltelampe.right.lens') .. '\n'
- end
- if ( getValue('spaltelampe.right.supplerende') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.supplerende') .. '\n'
- end
- end
-
- if ( getValue('spaltelampe.left.missing') == '' )
- then
- if ( getValue('spaltelampe.right.missing') == '' )
- then
- out = out .. '\n'
- end
- out = out .. 'Spaltelampe, venstre øje:\n'
-
- if ( getValue('spaltelampe.left.konjuktiva') ~= '' )
- then
- out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.left.konjuktiva') .. '\n'
- end
-
- out = out .. 'Cornea:\n'
- if ( getValue('spaltelampe.left.epithel') ~= '' )
- then
- out = out .. ' Epithel: ' .. getValue('spaltelampe.left.epithel') .. '\n'
- end
- if ( getValue('spaltelampe.left.stroma') ~= '' )
- then
- out = out .. ' Stroma: ' .. getValue('spaltelampe.left.stroma') .. '\n'
- end
- if ( getValue('spaltelampe.left.flap') ~= '' )
- then
- out = out .. ' Flap: ' .. getValue('spaltelampe.left.flap') .. '\n'
- end
- if ( getValue('spaltelampe.left.folder') ~= '' )
- then
- out = out .. ' Folder: ' .. getValue('spaltelampe.left.folder') .. '\n'
- end
- if ( getValue('spaltelampe.left.interface.partikler') ~= '' or getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' )
- then
- out = out .. ' Interface: '
- if ( getValue('spaltelampe.left.interface.partikler') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.interface.partikler')
- if ( getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' )
- then
- out = out .. ', '
- end
- end
- if ( getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.interface.epithelindvaekst') .. '\n'
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.left.endothel') ~= '' )
- then
- out = out .. ' Endothel: ' .. getValue('spaltelampe.left.endothel') .. '\n'
- end
- if ( getValue('spaltelampe.left.lens') ~= '' )
- then
- out = out .. 'Lens: ' .. getValue('spaltelampe.left.lens') .. '\n'
- end
- if ( getValue('spaltelampe.left.supplerende') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.supplerende') .. '\n'
- end
- end
-
- return out
- </resume>
- <queries>
- <query service="pracro" class="missing_eye_right" ttl="1000000"/>
- <query service="pracro" class="missing_eye_left" ttl="1000000"/>
- </queries>
- <maps>
- <map name="missing_eye_right_map">
- value = 0
- timestamp = 0
- source = ''
-
- if( missing_eye_right )
- then
- if( missing_eye_right.value and missing_eye_right.value == '' )
- then
- value = ''
- timestamp = missing_eye_right.timestamp
- source = missing_eye_right.source
- else
- value = 'mangler'
- timestamp = missing_eye_right.timestamp
- source = missing_eye_right.source
- end
- end
- return value, timestamp, source
- </map>
- <map name="missing_eye_left_map">
- value = 0
- timestamp = 0
- source = ''
-
- if( missing_eye_left )
- then
- if( missing_eye_left.value and missing_eye_left.value == '' )
- then
- value = ''
- timestamp = missing_eye_left.timestamp
- source = missing_eye_left.source
- else
- value = 'mangler'
- timestamp = missing_eye_left.timestamp
- source = missing_eye_left.source
- end
- end
- return value, timestamp, source
- </map>
- </maps>
- <scripts>
- <script language="lua" name="right_eye">
- if ( value == 'mangler' )
- then
- disable('right_eye_frame')
- else
- enable('right_eye_frame')
- end
- return true
- </script>
- <script language="lua" name="left_eye">
- if ( value == 'mangler' )
- then
- disable('left_eye_frame')
- else
- enable('left_eye_frame')
- end
- return true
- </script>
- </scripts>
- <widgets caption="Spaltelampe"
- layout="vbox">
-
- <frame layout="hbox">
-
- <!-- Højre øje -->
- <frame layout="vbox">
- <checkbox caption="Der er ikke målt på højre øje"
- name="spaltelampe.right.missing" script="right_eye"
- map="missing_eye_right_map"
- truevalue="mangler" falsevalue="" value=""/>
- <frame name="right_eye_frame" caption="Højre øje" layout="vbox">
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Konjuktiva:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.konjuktiva" layout="vbox" value="Bleg">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Bleg" value="Bleg"/>
- <item caption="Injiceret" value="Injiceret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.konjuktiva.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.konjuktiva.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="vbox" caption="Cornea:">
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Epithel:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.epithel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Tørhedsforandringer" value="Tørhedsforandringer"/>
- <item caption="Mikrocyster" value="Mikrocyster"/>
- <item caption="Refraktile linier" value="Refraktile linier"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.epithel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.epithel.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Stroma:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.stroma" layout="vbox" value="Klart">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Klart" value="Klart"/>
- <item caption="Karindvækst" value="Karindvækst"/>
- <item caption="Makulering" value="Makulering"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.stroma.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.stroma.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Flap:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.flap" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Velplaceret" value="Velplaceret"/>
- <item caption="Dislokeret" value="Dislokeret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.flap.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.flap.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Folder:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.folder" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen" value="Ingen"/>
- <item caption="Mikrofolder" value="Mikrofolder"/>
- <item caption="Lette folder" value="Lette folder"/>
- <item caption="Udtalte folder" value="Udtalte folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.folder.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.folder.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox" caption="Interface:">
- <frame layout="vbox">
- <label caption="Partikler:"/>
- <label/>
- <label caption="Epithelindvækst:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.interface.partikler" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen partikler eller debris" value="Ingen partikler eller debris"/>
- <item caption="Enkelte partikler" value="Enkelte partikler"/>
- <item caption="Nogen partikler" value="Nogen partikler"/>
- <item caption="Udtalte partikler" value="Udtalte partikler"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.interface.partikler.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.interface.partikler.andet"/>
- </altitem>
- </altcombobox>
- <altcombobox name="spaltelampe.right.interface.epithelindvaekst" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen epithelindvækst" value="Ingen epithelindvækst"/>
- <item caption="Diskret epithelindvækst" value="Diskret epithelindvækst"/>
- <item caption="Let epithelindvækst" value="Let epithelindvækst"/>
- <item caption="Betydende epithelindvækst" value="Betydende epithelindvækst"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.interface.epithelindvaekst.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.interface.epithelindvaekst.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Endothel:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.endothel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Guttatae" value="Guttatae"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.endothel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.endothel.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Lens:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.lens" layout="vbox" value="Klar">
- <item caption="Klar" value="Klar"/>
- <item caption="Katarakt-1" value="Katarakt-1"/>
- <item caption="Katarakt-2" value="Katarakt-2"/>
- <item caption="Katarakt-3" value="Katarakt-3"/>
- <item caption="Katarakt-4" value="Katarakt-4"/>
- <item caption="Pseudofak" value="Pseudofak"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.lens.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.lens.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="vbox">
- <label caption="Supplerende:"/>
- <lineedit name="spaltelampe.right.supplerende"/>
- </frame>
-
- </frame>
- </frame>
-
- <!-- Venstre øje -->
- <frame layout="vbox">
- <checkbox caption="Der er ikke målt på venstre øje"
- name="spaltelampe.left.missing" script="left_eye"
- map="missing_eye_left_map"
- truevalue="mangler" falsevalue="" value=""/>
- <frame name="left_eye_frame" caption="Højre øje" layout="vbox">
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Konjuktiva:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.konjuktiva" layout="vbox" value="Bleg">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Bleg" value="Bleg"/>
- <item caption="Injiceret" value="Injiceret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.konjuktiva.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.konjuktiva.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="vbox" caption="Cornea:">
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Epithel:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.epithel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Tørhedsforandringer" value="Tørhedsforandringer"/>
- <item caption="Mikrocyster" value="Mikrocyster"/>
- <item caption="Refraktile linier" value="Refraktile linier"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.epithel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.epithel.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Stroma:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.stroma" layout="vbox" value="Klart">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Klart" value="Klart"/>
- <item caption="Karindvækst" value="Karindvækst"/>
- <item caption="Makulering" value="Makulering"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.stroma.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.stroma.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Flap:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.flap" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Velplaceret" value="Velplaceret"/>
- <item caption="Dislokeret" value="Dislokeret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.flap.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.flap.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Folder:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.folder" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen" value="Ingen"/>
- <item caption="Mikrofolder" value="Mikrofolder"/>
- <item caption="Lette folder" value="Lette folder"/>
- <item caption="Udtalte folder" value="Udtalte folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.folder.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.folder.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox" caption="Interface:">
- <frame layout="vbox">
- <label caption="Partikler:"/>
- <label/>
- <label caption="Epithelindvækst:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.partikler" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen partikler eller debris" value="Ingen partikler eller debris"/>
- <item caption="Enkelte partikler" value="Enkelte partikler"/>
- <item caption="Nogen partikler" value="Nogen partikler"/>
- <item caption="Udtalte partikler" value="Udtalte partikler"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.partikler.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.partikler.andet"/>
- </altitem>
- </altcombobox>
- <altcombobox name="spaltelampe.left.epithelindvaekst" layout="vbox" value="">
- <item caption="Ej relevant" value=""/>
- <item caption="Ingen epithelindvækst" value="Ingen epithelindvækst"/>
- <item caption="Diskret epithelindvækst" value="Diskret epithelindvækst"/>
- <item caption="Let epithelindvækst" value="Let epithelindvækst"/>
- <item caption="Betydende epithelindvækst" value="Betydende epithelindvækst"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.epithelindvaekst.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.epithelindvaekst.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Endothel:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.endothel" layout="vbox" value="Upåfaldende">
- <item caption="Upåfaldende" value="Upåfaldende"/>
- <item caption="Guttatae" value="Guttatae"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.endothel.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.endothel.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- </frame>
-
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Lens:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.lens" layout="vbox" value="Klar">
- <item caption="Klar" value="Klar"/>
- <item caption="Katarakt-1" value="Katarakt-1"/>
- <item caption="Katarakt-2" value="Katarakt-2"/>
- <item caption="Katarakt-3" value="Katarakt-3"/>
- <item caption="Katarakt-4" value="Katarakt-4"/>
- <item caption="Pseudofak" value="Pseudofak"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.lens.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.lens.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
-
- <frame layout="vbox">
- <label caption="Supplerende:"/>
- <lineedit name="spaltelampe.left.supplerende"/>
- </frame>
-
- </frame>
- </frame>
-
- </frame>
-
-
- <!-- Knapper -->
- <frame layout="hbox">
- <spacer/>
- <button caption="Gem" action="commit"/>
- </frame>
- </widgets>
-</macro>
diff --git a/server/xml/macros/ref_spaltelampe-1.0.xml b/server/xml/macros/ref_spaltelampe-1.0.xml
deleted file mode 100644
index 893f221..0000000
--- a/server/xml/macros/ref_spaltelampe-1.0.xml
+++ /dev/null
@@ -1,377 +0,0 @@
-<?xml version='1.0' encoding='UTF-8'?>
-<macro name="ref_spaltelampe" version="1.0">
- <resume language="lua">
- out = ''
- if ( getValue('spaltelampe.right.missing') == '' )
- then
- out = out .. 'Spaltelampe, højre øje:\n'
- out = out .. 'Epithel: '
- if ( getValue('spaltelampe.right.epithel.ophelet') == '' or getValue('spaltelampe.right.epithel.central_epitheldefekt') == '' or getValue('spaltelampe.right.epithel.toerhedsforandringer') == '' or getValue('spaltelampe.right.epithel.andet') == '')
- then
- out = out .. '\n'
- end
- if ( getValue('spaltelampe.right.epithel.ophelet') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.epithel.ophelet')
- if ( getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.epithel.central_epitheldefekt')
- if (getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.epithel.toerhedsforandringer')
- if (getValue('spaltelampe.right.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.right.epithel.andet') ~= '' )
- then
- out = out .. getValue('spaltelampe.right.epithel.andet') .. '\n'
- end
- out = out .. 'Stroma: ' .. getValue('spaltelampe.right.stroma') .. '\n'
- out = out .. 'Flap: ' .. getValue('spaltelampe.right.flap') .. '\n'
- out = out .. 'Folder: ' .. getValue('spaltelampe.right.folder') .. '\n'
- out = out .. 'Interface: ' .. getValue('spaltelampe.right.interface') .. '\n'
- end
-
- if ( getValue('spaltelampe.left.missing') == '' )
- then
- if ( getValue('spaltelampe.right.missing') == '' )
- then
- out = out .. '\n'
- end
- out = out .. 'Spaltelampe, venstre øje:\n'
- out = out .. 'Epithel: '
- if ( getValue('spaltelampe.left.epithel.ophelet') == '' or getValue('spaltelampe.left.epithel.central_epitheldefekt') == '' or getValue('spaltelampe.left.epithel.toerhedsforandringer') == '' or getValue('spaltelampe.left.epithel.andet') == '')
- then
- out = out .. '\n'
- end
- if ( getValue('spaltelampe.left.epithel.ophelet') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.epithel.ophelet')
- if ( getValue('spaltelampe.left.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.left.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.left.epithel.central_epitheldefekt') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.epithel.central_epitheldefekt')
- if (getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.left.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.left.epithel.toerhedsforandringer') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.epithel.toerhedsforandringer')
- if (getValue('spaltelampe.left.epithel.andet') ~= '')
- then
- out = out .. ', '
- else
- out = out .. '\n'
- end
- end
- if ( getValue('spaltelampe.left.epithel.andet') ~= '' )
- then
- out = out .. getValue('spaltelampe.left.epithel.andet') .. '\n'
- end
- out = out .. 'Stroma: ' .. getValue('spaltelampe.left.stroma') .. '\n'
- out = out .. 'Flap: ' .. getValue('spaltelampe.left.flap') .. '\n'
- out = out .. 'Folder: ' .. getValue('spaltelampe.left.folder') .. '\n'
- out = out .. 'Interface: ' .. getValue('spaltelampe.left.interface') .. '\n'
- end
- return out
- </resume>
- <queries>
- <query service="pracro" class="missing_eye_right" ttl="1000000"/>
- <query service="pracro" class="missing_eye_left" ttl="1000000"/>
- </queries>
- <maps>
- <map name="missing_eye_right_map">
- value = 0
- timestamp = 0
- source = ''
-
- if( missing_eye_right )
- then
- if( missing_eye_right.value and missing_eye_right.value == '' )
- then
- value = ''
- timestamp = missing_eye_right.timestamp
- source = missing_eye_right.source
- else
- value = 'mangler'
- timestamp = missing_eye_right.timestamp
- source = missing_eye_right.source
- end
- end
- return value, timestamp, source
- </map>
- <map name="missing_eye_left_map">
- value = 0
- timestamp = 0
- source = ''
-
- if( missing_eye_left )
- then
- if( missing_eye_left.value and missing_eye_left.value == '' )
- then
- value = ''
- timestamp = missing_eye_left.timestamp
- source = missing_eye_left.source
- else
- value = 'mangler'
- timestamp = missing_eye_left.timestamp
- source = missing_eye_left.source
- end
- end
- return value, timestamp, source
- </map>
- </maps>
- <scripts>
- <script language="lua" name="right_eye">
- if ( value == 'mangler' )
- then
- disable('right_eye_frame')
- else
- enable('right_eye_frame')
- end
- return true
- </script>
- <script language="lua" name="left_eye">
- if ( value == 'mangler' )
- then
- disable('left_eye_frame')
- else
- enable('left_eye_frame')
- end
- return true
- </script>
- </scripts>
- <widgets caption="Spaltelampe"
- layout="vbox">
-
- <frame layout="hbox">
-
- <!-- Højre øje -->
- <frame layout="vbox">
- <checkbox caption="Der er ikke målt på højre øje"
- name="spaltelampe.right.missing" script="right_eye"
- map="missing_eye_right_map"
- truevalue="mangler" falsevalue="" value=""/>
- <frame name="right_eye_frame" caption="Højre øje" layout="vbox">
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Epithel:"/>
- <label/>
- <label/>
- <label/>
- <label/>
- </frame>
- <frame layout="vbox">
- <checkbox name="spaltelampe.right.epithel.ophelet" caption="Ophelet" falsevalue="" truevalue="Ophelet"/>
- <checkbox name="spaltelampe.right.epithel.central_epitheldefekt" caption="Central epitheldefekt" falsevalue="" truevalue="Central epitheldefekt"/>
- <checkbox name="spaltelampe.right.epithel.toerhedsforandringer" caption="Tørhedsforandringer" falsevalue="" truevalue="Tørhedsforandringer"/>
- <frame layout="hbox">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.epithel.andet"/>
- </frame>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Stroma:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.stroma" layout="vbox">
- <item caption="Klart" value="Klart"/>
- <item caption="MD-folder" value="MD-folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.stroma.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.stroma.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Flap:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.flap" value="Velplaceret" layout="vbox">
- <item caption="Velplaceret" value="Velplaceret"/>
- <item caption="Dislokeret" value="Dislokeret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.flap.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.flap.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Folder:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.folder" value="Ingen" layout="vbox">
- <item caption="Ingen" value="Ingen"/>
- <item caption="Mikrofolder" value="Mikrofolder"/>
- <item caption="Lette folder" value="Lette folder"/>
- <item caption="Udtalte folder" value="Udtalte folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.folder.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.folder.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Interface:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.right.interface" value="Ingen partikler eller debris" layout="vbox">
- <item caption="Ingen partikler eller debris" value="Ingen partikler eller debris"/>
- <item caption="Enkelte partikler" value="Enkelte partikler"/>
- <item caption="Nogen partikler" value="Nogen partikler"/>
- <item caption="Udtalte partikler" value="Udtalte partikler"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.right.interface.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.right.interface.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- </frame>
- </frame>
-
- <!-- Venstre øje -->
- <frame layout="vbox">
- <checkbox caption="Der er ikke målt på venstre øje"
- name="spaltelampe.left.missing" script="left_eye"
- map="missing_eye_left_map"
- truevalue="mangler" falsevalue="" value=""/>
- <frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Epithel:"/>
- <label/>
- <label/>
- <label/>
- <label/>
- </frame>
- <frame layout="vbox">
- <checkbox name="spaltelampe.left.epithel.ophelet" caption="Ophelet" falsevalue="" truevalue="Ophelet"/>
- <checkbox name="spaltelampe.left.epithel.central_epitheldefekt" caption="Central epitheldefekt" falsevalue="" truevalue="Central epitheldefekt"/>
- <checkbox name="spaltelampe.left.epithel.toerhedsforandringer" caption="Tørhedsforandringer" falsevalue="" truevalue="Tørhedsforandringer"/>
- <frame layout="hbox">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.epithel.andet"/>
- </frame>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Stroma:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.stroma" layout="vbox">
- <item caption="Klart" value="Klart"/>
- <item caption="MD-folder" value="MD-folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.stroma.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.stroma.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Flap:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.flap" value="Velplaceret" layout="vbox">
- <item caption="Velplaceret" value="Velplaceret"/>
- <item caption="Dislokeret" value="Dislokeret"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.flap.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.flap.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Folder:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.folder" value="Ingen" layout="vbox">
- <item caption="Ingen" value="Ingen"/>
- <item caption="Mikrofolder" value="Mikrofolder"/>
- <item caption="Lette folder" value="Lette folder"/>
- <item caption="Udtalte folder" value="Udtalte folder"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.folder.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.folder.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Interface:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="spaltelampe.left.interface" value="Ingen partikler eller debris" layout="vbox">
- <item caption="Ingen partikler eller debris" value="Ingen partikler eller debris"/>
- <item caption="Enkelte partikler" value="Enkelte partikler"/>
- <item caption="Nogen partikler" value="Nogen partikler"/>
- <item caption="Udtalte partikler" value="Udtalte partikler"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe.left.interface.andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe.left.interface.andet"/>
- </altitem>
- </altcombobox>
- </frame>
- </frame>
- </frame>
- </frame>
-
- </frame>
-
- <!-- Knapper -->
- <frame layout="hbox">
- <spacer/>
- <button caption="Gem" action="commit"/>
- </frame>
- </widgets>
-</macro>