summaryrefslogtreecommitdiff
path: root/server/xml/macros/B.2.5.xml
blob: fbbdef7675743c159ae70b433545da81ff25d6db (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
<?xml version='1.0' encoding='UTF-8'?>
<macro name="B.2.5" version="1.0">
  <resume language="lua">
    out = '90-D undersøgelse:\nDer findes '
    if(getValue('fundus.randh') == '' and getValue('fundus.exsud') == '')
    then
      out = out .. 'ingen randhæmorrhagier eller exsudater'
    else
      if(getValue('fundus.randh') ~= '' and getValue('fundus.exsud') ~= '')
      then
        out = out .. 'randhæmorrhagier og exsudater'
      else
        if(getValue('fundus.randh') ~= '')
        then
          out = out .. 'randhæmorrhagier'
        end
        if(getValue('fundus.exsud') ~= '')
        then
          out = out .. 'exsudater'
        end
      end
    end
    out = out .. '.\n'
    return out
  </resume>
  <queries>
  </queries>
  <maps>
  </maps>
  <scripts>
  </scripts>
  <window caption="Vurdering af fundus (B.2.5)"
          layout="vbox">

    <combobox name="fundus.source" value="">
      <item caption="Fundus foto" value="Fundus foto"/>
      <item caption="90-D linse undersøgelse" value="90-D linse undersøgelse"/>
    </combobox>

    <label caption="viser"/>

    <checkbox name="fundus.randh" caption="Randhæmorrhagier"
	      truevalue="Randhæmorrhagier" falsevalue="" value=""/>
    <checkbox name="fundus.exsud" caption="Exsudater"
	      truevalue="Exsudater" falsevalue="" value=""/>

    <!-- Knapper -->
    <frame layout="hbox">
      <spacer/>
      <button caption="Gem" action="commit"/>
    </frame>
  </window>
</macro>