From 753d4a19a9cb80d9fdd01765f372e972c4472d00 Mon Sep 17 00:00:00 2001
From: senator <senator>
Date: Thu, 15 Oct 2009 09:22:14 +0000
Subject: merged all ref spaltelampe macros
---
server/xml/macros/ref-spaltelampe-1.0.xml | 663 +++++++++++++++++++++
.../macros/ref_efterkontrol-spaltelampe-1.0.xml | 583 ------------------
.../xml/macros/ref_forunders-spaltelampe-1.0.xml | 577 ------------------
server/xml/macros/ref_spaltelampe-1.0.xml | 377 ------------
4 files changed, 663 insertions(+), 1537 deletions(-)
create mode 100644 server/xml/macros/ref-spaltelampe-1.0.xml
delete mode 100644 server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml
delete mode 100644 server/xml/macros/ref_forunders-spaltelampe-1.0.xml
delete mode 100644 server/xml/macros/ref_spaltelampe-1.0.xml
(limited to 'server/xml/macros')
diff --git a/server/xml/macros/ref-spaltelampe-1.0.xml b/server/xml/macros/ref-spaltelampe-1.0.xml
new file mode 100644
index 0000000..72304ab
--- /dev/null
+++ b/server/xml/macros/ref-spaltelampe-1.0.xml
@@ -0,0 +1,663 @@
+<?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, o.dxt:\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.ophelet') ~= '' or getValue('spaltelampe.right.epithel.central_epitheldefekt') ~= '' or getValue('spaltelampe.right.epithel.toerhedsforandringer') ~= '' or getValue('spaltelampe.right.epithel.andet') ~= '')
+ then
+ 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'
+ 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, o.sin:\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.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'
+ 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/>
+ <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" value="Klart">
+ <item caption="Ikke udfyldt" value=""/>
+ <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"/>
+ <item caption="Udtalt haze - grad 3" value="Udtalt haze - grad 3"/>
+ <item caption="Massiv haze - grad 4" value="Massiv haze - grad 4"/>
+ <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="Venstre ø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/>
+ <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" value="Klart">
+ <item caption="Ikke udfyldt" value=""/>
+ <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"/>
+ <item caption="Udtalt haze - grad 3" value="Udtalt haze - grad 3"/>
+ <item caption="Massiv haze - grad 4" value="Massiv haze - grad 4"/>
+ <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_efterkontrol-spaltelampe-1.0.xml b/server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml
deleted file mode 100644
index 2ba563b..0000000
--- a/server/xml/macros/ref_efterkontrol-spaltelampe-1.0.xml
+++ /dev/null
@@ -1,583 +0,0 @@
-<?xml version='1.0' encoding='UTF-8'?>
-<macro name="ref_efterkontrol.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="">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Ingen" value="Ingen"/>
- <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"/>
- <item caption="Udtalt haze - grad 3" value="Udtalt haze - grad 3"/>
- <item caption="Massiv haze - grad 4" value="Massiv haze - grad 4"/>
- <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="">
- <item caption="Ikke udfyldt" value=""/>
- <item caption="Ingen" value="Ingen"/>
- <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"/>
- <item caption="Udtalt haze - grad 3" value="Udtalt haze - grad 3"/>
- <item caption="Massiv haze - grad 4" value="Massiv haze - grad 4"/>
- <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_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>
--
cgit v1.2.3