summaryrefslogtreecommitdiff
path: root/server/xml/macros/B.2.2.7.xml
diff options
context:
space:
mode:
Diffstat (limited to 'server/xml/macros/B.2.2.7.xml')
-rw-r--r--server/xml/macros/B.2.2.7.xml194
1 files changed, 138 insertions, 56 deletions
diff --git a/server/xml/macros/B.2.2.7.xml b/server/xml/macros/B.2.2.7.xml
index d253d0d..0eeacca 100644
--- a/server/xml/macros/B.2.2.7.xml
+++ b/server/xml/macros/B.2.2.7.xml
@@ -7,83 +7,165 @@
20090108: Bent Bisballe Nyeng
Højre/venstre byttet om.
-->
+<!--
+ 20090320: Bent Bisballe Nyeng
+ Total omskrivning
+ -->
<macro name="B.2.2.7" version="1.0">
<resume>Inblikket til fundusbaggrunden er ${90D_lens.right.fundus_visibility} på højre øje og ${90D_lens.left.fundus_visibility} på venstre.
-${90D_lens.implications}</resume>
+${90D_lens.implications}
+${90D_lens.additional}</resume>
<queries>
</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>
+ <script language="lua" name="retinal_haevelse_right">
+ if ( value == 'retinal hævelse' )
+ then
+ enable('retinal_haevelse_right')
+ else
+ disable('retinal_haevelse_right')
+ end
+ return true
+ </script>
+ <script language="lua" name="retinal_haevelse_left">
+ if ( value == 'retinal hævelse' )
+ then
+ enable('retinal_haevelse_left')
+ else
+ disable('retinal_haevelse_left')
+ end
+ return true
+ </script>
</scripts>
<window caption="90-D linse (B.2.2.7)"
layout="vbox">
- <!-- Indblik -->
- <frame layout="vbox">
- <label caption="Indblik til fundusbaggrunden:"/>
- <frame layout="hbox">
-
- <label caption="Højre:"/>
- <combobox name="90D_lens.right.fundus_visibility" value="klart">
- <item caption="Klart" value="klart"/>
- <item caption="Let sløret" value="let sløret"/>
- <item caption="Meget sløret" value="meget sløret"/>
- <item caption="Intet" value="intet"/>
- </combobox>
- <spacer/>
-
- <label caption="Venstre:"/>
- <combobox name="90D_lens.left.fundus_visibility" value="klart">
- <item caption="Klart" value="klart"/>
- <item caption="Let sløret" value="let sløret"/>
- <item caption="Meget sløret" value="meget sløret"/>
- <item caption="Intet" value="intet"/>
- </combobox>
- <spacer/>
+ <frame layout="hbox">
- </frame>
- </frame>
+ <!-- Højre øje -->
+ <frame layout="vbox">
+ <checkbox caption="Der er ikke målt på højre øje"
+ name="90D_lens.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">
+
+ <!-- Indblik -->
+ <combobox name="90D_lens.right.fundus_visibility" value="">
+ <item caption="Klart" value="klart"/>
+ <item caption="Let sløret" value="let sløret"/>
+ <item caption="Meget sløret" value="meget sløret"/>
+ <item caption="Intet" value="intet"/>
+ </combobox>
- <!-- Observationer -->
- <frame caption="Observeret" layout="hbox">
- <multilist name="90D_lens.implications" value="" layout="hbox" innerwidget="90dmeta">
- <metawidget name="90dmeta" format="På ${eye} øje findes ${implikation}." layout="hbox">
+ <!-- Observationer -->
+ <radiobuttons name="90D_lens..right.implikation" value="" script="retinal_haevelse_right">
+ <radiobutton caption="Retinal hævelse" value="retinal hævelse"/>
+ <radiobutton caption="Atrofi" value="atrofi"/>
+ </radiobuttons>
- <frame layout="vbox">
- <label caption=" "/>
- <label caption="På"/>
+ <frame name="retinal_haevelse_right" layout="vbox">
+ <checkbox name="90D_lens.right.randbl" caption="Randblødning"
+ truevalue="randblødning" falsevalue="" value=""/>
+ <checkbox name="90D_lens.right.exsudater" caption="Exsudater"
+ truevalue="exsudater" falsevalue="" value=""/>
</frame>
- <frame layout="vbox">
- <label caption="Øje:"/>
- <combobox name="eye" value="højre">
- <item caption="Højre" value="højre"/>
- <item caption="Venstre" value="venstre"/>
- </combobox>
- </frame>
+ </frame>
+ </frame>
+
+ <!-- Venstre øje -->
+ <frame layout="vbox">
+ <checkbox caption="Der er ikke målt på venstre øje"
+ name="90D_lens.left.missing" script="left_eye"
+ map="missing_eye_left_map"
+ truevalue="mangler" falsevalue="" value=""/>
+ <frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+
+ <!-- Indblik -->
+ <combobox name="90D_lens.left.fundus_visibility" value="">
+ <item caption="Klart" value="klart"/>
+ <item caption="Let sløret" value="let sløret"/>
+ <item caption="Meget sløret" value="meget sløret"/>
+ <item caption="Intet" value="intet"/>
+ </combobox>
+
+ <!-- Observationer -->
+ <radiobuttons name="90D_lens.left.implikation" value="" script="retinal_haevelse_left">
+ <radiobutton caption="Retinal hævelse" value="retinal hævelse"/>
+ <radiobutton caption="Atrofi" value="atrofi"/>
+ </radiobuttons>
- <frame layout="vbox">
- <label caption=""/>
- <label caption="øje findes"/>
+ <frame name="retinal_haevelse_left" layout="vbox">
+ <checkbox name="90D_lens.left.randbl" caption="Randblødning"
+ truevalue="randblødning" falsevalue="" value=""/>
+ <checkbox name="90D_lens.left.exsudater" caption="Exsudater"
+ truevalue="exsudater" falsevalue="" value=""/>
</frame>
- <frame layout="vbox">
- <label caption="Implikation:"/>
- <combobox name="implikation" value="atrofi">
- <item caption="Atrofi" value="atrofi"/>
- <item caption="Central hævelse" value="central hævelse"/>
- <item caption="Randblødning" value="randblødning"/>
- <item caption="Exsudater" value="exsudater"/>
- </combobox>
- </frame>
+ </frame>
+ </frame>
+ </frame>
- <spacer/>
+ <label caption="Supplerende:"/>
+ <textedit name="90D_lens.additional" value=""/>
- </metawidget>
- </multilist>
- </frame>
-
<!-- Knapper -->
<frame layout="hbox">
<spacer/>
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-01 09:32:29 +0000