Changed all names to something less magical.

1 files changed, 58 insertions, 0 deletions

diff --git a/server/xml/macros/fundus-1.0.xml b/server/xml/macros/fundus-1.0.xml
new file mode 100644
index 0000000..ed48236
--- /dev/null
+++ b/server/xml/macros/fundus-1.0.xml
@@ -0,0 +1,58 @@
+<?xml version='1.0' encoding='UTF-8'?>
+<!--
+    20090420: Bent Bisballe Nyeng
+    Resume opdateret så det altid inkluderer både randhæmorrhagier og
+    exsudater, både hvis de er observerede og hvis de ikke er det.
+  -->
+<macro name="fundus" 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, men ingen exsudater'
+        end
+        if(getValue('fundus.exsud') ~= '')
+        then
+          out = out .. 'ingen randhæmorrhagier, men 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>