diff options
| -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.xml | 577 | ||||
| -rw-r--r-- | server/xml/macros/ref_spaltelampe-1.0.xml | 377 |
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> |