1 files changed, 71 insertions, 0 deletions
diff --git a/server/xml/macros/oejendrypning-1.0.xml b/server/xml/macros/oejendrypning-1.0.xml
new file mode 100644
index 0000000..c09b8aa
--- /dev/null
+++ b/server/xml/macros/oejendrypning-1.0.xml
@@ -0,0 +1,71 @@
+<?xml version='1.0' encoding='UTF-8'?>
+<!--
+    20081204: Bent Bisballe Nyeng
+    Feltnavnene ændret så de giver mening.
+  -->
+<!--
+    20081209: Bent Bisballe Nyeng
+    Nye dryppe regimer = redesign med multilist.
+  -->
+<!--
+    20090108: Bent Bisballe Nyeng
+    Tilføjede et datofelt.
+  -->
+<macro name="oejendrypning" version="1.0">
+  <resume language="lua">
+    out = 'I henhold til øjenafdelingens retningslinier dryppes der med:\n'
+    out = out .. getValue('ocgtt.preparation') .. '\n'
+    out = out .. 'Drypning er foretaget af: ' .. getValue('ocgtt.initials')
+          .. ', den ' .. os.date('%e. %b %Y %k:%M', tonumber(getValue('ocgtt.date')))
+    return out
+</resume>
+  <queries>
+  </queries>
+  <maps>
+    <map name="now">
+      -- Set date to now if no other data available within last 24 hours.
+      return os.time(), os.time() - 24*60*60, 'system'
+    </map>
+  </maps>
+  <scripts>
+  </scripts>
+  <widgets caption="Øjendrypning (B.2.3)"
+          layout="vbox">
+
+    <!-- Øjendrypning -->
+    <frame caption="Vælg præparat og tilføj til listen.">
+      <multilist name="ocgtt.preparation" layout="hbox" innerwidget="dryppemeta" value="">
+	<metawidget name="dryppemeta" format="Ocgt. ${prep} ${eye}" layout="hbox">
+	  <label caption="Præparat:"/>
+	  <combobox name="prep">
+	    <item caption="Mydriacyl 1%" value="mydriacyl 1%"/>
+	    <item caption="Metaoxedrin 10%" value="metaoxedrin 10%"/>
+	    <item caption="Tropicamid ukons. 0,5%" value="tropicamid ukons. 0,5%"/>
+	    <item caption="Phenylephrin ukons. 10%" value="phenylephrin ukons. 10%"/>
+	  </combobox>
+	  <label caption=""/>
+	  <label caption="Øje:"/>
+	  <combobox name="eye">
+	    <item caption="o.dxt" value="o.dxt"/>
+	    <item caption="o.sin" value="o.sin"/>
+	    <item caption="o.u" value="o.u"/>
+	  </combobox>
+	  <spacer/>
+	</metawidget>
+      </multilist>
+    </frame>
+
+    <frame layout="hbox">
+      <label width="200" caption="Drypning foretaget af (initialer):"/>
+      <lineedit name="ocgtt.initials" regexp="[a-zæøåA-ZÆØÅ]{2,5}" value=""/>
+      <label width="50" caption=" den "/>
+      <datetime name="ocgtt.date" fuzziness="5" map="now" value=""/>
+    </frame>
+
+    <!-- Knapper -->
+    <frame layout="hbox">
+      <spacer/>
+      <button caption="Gem" action="commit"/>
+    </frame>
+  </widgets>
+</macro>