summaryrefslogtreecommitdiff
path: root/server/xml/macros/B.2.2.6.xml
diff options
context:
space:
mode:
Diffstat (limited to 'server/xml/macros/B.2.2.6.xml')
-rw-r--r--server/xml/macros/B.2.2.6.xml184
1 files changed, 139 insertions, 45 deletions
diff --git a/server/xml/macros/B.2.2.6.xml b/server/xml/macros/B.2.2.6.xml
index 78c862f..37c04e8 100644
--- a/server/xml/macros/B.2.2.6.xml
+++ b/server/xml/macros/B.2.2.6.xml
@@ -7,17 +7,99 @@
20090108: Bent Bisballe Nyeng
Højre/venstre byttet om.
-->
+<!--
+ 20090402: Bent Bisballe Nyeng
+ 'missing eye' tilføjet.
+ -->
<macro name="B.2.2.6" version="1.0">
- <resume store_in_journal="true">Spaltelampe:
-Linsen, højre side: ${slit_lamp.right.observation}
-${slit_lamp.right.additional}
-Linsen, venstre side: ${slit_lamp.left.observation}
-${slit_lamp.left.additional}</resume>
+ <resume language="lua">
+ out = ''
+ if ( getValue('slit_lamp.right.missing') == '' or getValue('slit_lamp.left.missing') == '' )
+ then
+ out = out .. 'Spaltelampe:\n'
+ end
+
+ if ( getValue('slit_lamp.right.missing') == '' )
+ then
+ out = out .. 'Linsen, højre side: ' .. getValue('slit_lamp.right.observation') .. '\n'
+ if ( getValue('slit_lamp.right.additional') ~= '' )
+ then
+ out = out .. 'Supplerende:\n' .. getValue('slit_lamp.right.additional') .. '\n'
+ end
+ end
+
+ if ( getValue('slit_lamp.left.missing') == '' )
+ then
+ out = out .. 'Linsen, venstre side: ' .. getValue('slit_lamp.left.observation') .. '\n'
+ if ( getValue('slit_lamp.left.additional') ~= '' )
+ then
+ out = out .. 'Supplerende:\n' .. getValue('slit_lamp.left.additional') .. '\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 = 'pracro'
+
+ if( missing_eye_right )
+ then
+ if( missing_eye_right.value and missing_eye_right.value == '' )
+ then
+ value = ''
+ timestamp = missing_eye_right.timestamp
+ else
+ value = 'mangler'
+ timestamp = missing_eye_right.timestamp
+ end
+ end
+ return value, timestamp, source
+ </map>
+ <map name="missing_eye_left_map">
+ value = 0
+ timestamp = 0
+ source = 'pracro'
+
+ if( missing_eye_left )
+ then
+ if( missing_eye_left.value and missing_eye_left.value == '' )
+ then
+ value = ''
+ timestamp = missing_eye_left.timestamp
+ else
+ value = 'mangler'
+ timestamp = missing_eye_left.timestamp
+ 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>
<window caption="Spaltelampe (B.2.2.6)"
layout="vbox">
@@ -25,53 +107,65 @@ ${slit_lamp.left.additional}</resume>
<frame layout="hbox">
<!-- Højre øje -->
- <frame caption="Højre øje" layout="vbox">
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Linsen:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="slit_lamp.right.observation" layout="vbox" value="Ingen katarakt">
- <item caption="Ingen katarakt" value="Ingen katarakt"/>
- <item caption="Katarakt grad 1" value="Katarakt grad 1"/>
- <item caption="Katarakt grad 2" value="Katarakt grad 2"/>
- <item caption="Katarakt grad 3" value="Katarakt grad 3"/>
- <item caption="Pseudofaki" value="Pseudofaki"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe_hoejre_andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe_hoejre_andet"/>
- </altitem>
- </altcombobox>
+ <frame layout="vbox">
+ <checkbox caption="Der kan ikke måles på højre øje"
+ name="slit_lamp.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="Linsen:"/>
+ <label/>
+ </frame>
+ <frame layout="vbox">
+ <altcombobox name="slit_lamp.right.observation" layout="vbox" value="Ingen katarakt">
+ <item caption="Ingen katarakt" value="Ingen katarakt"/>
+ <item caption="Katarakt grad 1" value="Katarakt grad 1"/>
+ <item caption="Katarakt grad 2" value="Katarakt grad 2"/>
+ <item caption="Katarakt grad 3" value="Katarakt grad 3"/>
+ <item caption="Pseudofaki" value="Pseudofaki"/>
+ <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe_hoejre_andet">
+ <label caption="Andet:"/>
+ <lineedit name="spaltelampe_hoejre_andet"/>
+ </altitem>
+ </altcombobox>
+ </frame>
</frame>
+ <label caption="Supplerende:"/>
+ <textedit name="slit_lamp.right.additional" value=""/>
</frame>
- <label caption="Supplerende:"/>
- <textedit name="slit_lamp.right.additional" value=""/>
</frame>
<!-- Venstre øje -->
- <frame caption="Venstre øje" layout="vbox">
- <frame layout="hbox">
- <frame layout="vbox">
- <label caption="Linsen:"/>
- <label/>
- </frame>
- <frame layout="vbox">
- <altcombobox name="slit_lamp.left.observation" layout="vbox" value="Ingen katarakt">
- <item caption="Ingen katarakt" value="Ingen katarakt"/>
- <item caption="Katarakt grad 1" value="Katarakt grad 1"/>
- <item caption="Katarakt grad 2" value="Katarakt grad 2"/>
- <item caption="Katarakt grad 3" value="Katarakt grad 3"/>
- <item caption="Pseudofaki" value="Pseudofaki"/>
- <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe_venstre_andet">
- <label caption="Andet:"/>
- <lineedit name="spaltelampe_venstre_andet"/>
- </altitem>
- </altcombobox>
+ <frame layout="vbox">
+ <checkbox caption="Der kan ikke måles på venstre øje"
+ name="slit_lamp.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="Linsen:"/>
+ <label/>
+ </frame>
+ <frame layout="vbox">
+ <altcombobox name="slit_lamp.left.observation" layout="vbox" value="Ingen katarakt">
+ <item caption="Ingen katarakt" value="Ingen katarakt"/>
+ <item caption="Katarakt grad 1" value="Katarakt grad 1"/>
+ <item caption="Katarakt grad 2" value="Katarakt grad 2"/>
+ <item caption="Katarakt grad 3" value="Katarakt grad 3"/>
+ <item caption="Pseudofaki" value="Pseudofaki"/>
+ <altitem caption="Andet" value="andet" layout="hbox" innerwidget="spaltelampe_venstre_andet">
+ <label caption="Andet:"/>
+ <lineedit name="spaltelampe_venstre_andet"/>
+ </altitem>
+ </altcombobox>
+ </frame>
</frame>
+ <label caption="Supplerende:"/>
+ <textedit name="slit_lamp.left.additional" value=""/>
</frame>
- <label caption="Supplerende:"/>
- <textedit name="slit_lamp.left.additional" value=""/>
</frame>
</frame>
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-05 11:57:26 +0000