Changed all names to something less magical.

1 files changed, 55 insertions, 0 deletions

diff --git a/server/xml/macros/amdconsent-1.0.xml b/server/xml/macros/amdconsent-1.0.xml
new file mode 100644
index 0000000..37fa61c
--- /dev/null
+++ b/server/xml/macros/amdconsent-1.0.xml
@@ -0,0 +1,55 @@
+<?xml version='1.0' encoding='UTF-8'?>
+<!--
+    20081202: Lars Bisballe Jensen
+    Ændret til nyt format i resume og naming scheme.
+
+    20090402: Bent Bisballe Nyeng
+    Tilføjet felt til yderligere aftaler med patient.
+
+    20090526: Bent Bisballe Nyeng
+    Tekst omformuleret.
+  -->
+<macro name="amdconsent" version="1.0">
+  <resume language="lua">
+    out = 'Pt informeres om muligheden for behandling og de risici og bivirkninger, som kan være forbundet hermed. Specielt informeres om, behandlingen foregår ved en injektion i øjet i lokalbedøvelse, samt at der kræves månedlig kontrol for at vurdere om behandlingen skal gentages. Endvidere at behandlingen kan være forbundet med smerter og irritation det første døgn, og i sjældne tilfælde kan medføre infektion. På baggrund af den givne behandling indvilliger patienten i at få foretaget behandlingen.\n\n'
+
+    out = out .. 'Der er givet informeret samtykke, ' .. getValue('amd.consent') .. '.\n'
+
+    if( getValue('amd.agreements') ~= '' )
+    then
+      out = out .. 'Yderligere aftaler med patienten: ' .. getValue('amd.agreements')
+    end
+
+    return out
+  </resume>
+  <queries>
+  </queries>
+  <maps>
+  </maps>
+  <scripts>
+    <script language="lua" name="check">
+      if(value == '')
+      then
+        return false
+      end
+      return true
+    </script>
+  </scripts>
+  <window caption="Informeret samtykke (B.2.10.3)"
+          layout="vbox">
+
+    <label height="80" caption="Pt informeres om muligheden for behandling og de risici og bivirkninger, som kan være forbundet hermed. Specielt informeres om, behandlingen foregår ved en injektion i øjet i lokalbedøvelse, samt at der kræves månedlig kontrol for at vurdere om behandlingen skal gentages. Endvidere at behandlingen kan være forbundet med smerter og irritation det første døgn, og i sjældne tilfælde kan medføre infektion. På baggrund af den givne behandling indvilliger patienten i at få foretaget behandlingen."/>
+    <checkbox caption="Der er givet informeret samtykke."
+	      name="amd.consent" value="" truevalue="JA"
+	      falsevalue="" script="check"/>
+
+    <label caption="Yderligere aftaler med patienten:"/>
+    <lineedit name="amd.agreements" value=""/>
+
+    <!-- Knapper -->
+    <frame layout="hbox">
+      <spacer/>
+      <button caption="Gem" action="commit"/>
+    </frame>
+  </window>
+</macro>