From 1bce9e4ebb9521c26fdbc586d4eadd6f2a52b618 Mon Sep 17 00:00:00 2001
From: bertho <bertho>
Date: Wed, 4 Feb 2009 11:26:58 +0000
Subject: Add macros and templates to repository

---
 server/xml/macros/B.1.2.xml | 78 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 78 insertions(+)
 create mode 100644 server/xml/macros/B.1.2.xml

(limited to 'server/xml/macros/B.1.2.xml')

diff --git a/server/xml/macros/B.1.2.xml b/server/xml/macros/B.1.2.xml
new file mode 100644
index 0000000..9c8b3e5
--- /dev/null
+++ b/server/xml/macros/B.1.2.xml
@@ -0,0 +1,78 @@
+<?xml version='1.0' encoding='UTF-8'?>
+<!--
+    20081202: Bent Bisballe Nyeng
+    Feltnavnene ændret så de giver mening.
+  -->
+<!--
+    20090108: Bent Bisballe Nyeng
+    Alt tekst ændret.
+    Layout af multilist input er ændret så det er liniebaseret.
+  -->
+<macro name="B.1.2" version="1.0">
+  <resume>Medicin:
+${medicin}</resume>
+  <queries>
+  </queries>
+  <maps>
+  </maps>
+  <scripts>
+  </scripts>
+  <window caption="Medicin (B.1.2)"
+          layout="vbox">
+
+    <frame layout="vbox" help="For ambulante patienter noteres de typer og den dosering af medicin, som foreligger oplyst og som har relevans for sygdomsforløbet. Der kan refereres til indskannet medicinliste, såfremt denne er dækkende og læselig.\nFor indlagte patienter noteres detaljeret medicinanamnese med præparatnavn og dosering.">
+
+	<altcombobox name="medicin" layout="vbox" width="200" value="Intet dagligt forbrug." type="select">
+	  <item caption="Intet dagligt forbrug" value="Intet dagligt forbrug."/>
+	  <item caption="Se indscannet samtykkeskema" value="Se indscannet samtykkeskema."/>
+	  <altitem caption="Anfør liste" value="list" innerwidget="medicin_list">
+	    <frame name="frame_medicin_list" caption="Søg og tilføj" layout="vbox">
+	      <multilist name="medicin_list" layout="vbox"
+      			 innerwidget="medicin_list_entry">
+		
+		<metawidget name="medicin_list_entry" layout="hbox" format="${prep} x ${dosis}${eye}">
+		  <frame layout="vbox">
+		    <label caption="Præparat:"/>
+		    <dbwidget name="prep" driver="QPSQL" server="sensei.j.auh.dk" user="postgres" database="lms"
+			      select="drugname, dosageform_code, strength_text"
+			      from="lms01"
+			      where="drugname || ' ' || strength_text || ' (' || dosageform_code || ')'"
+			      format="${drugname} ${strength_text} (${dosageform_code})"
+			      width="250"/>
+		  </frame>
+
+		  <frame layout="vbox">
+		    <label caption=""/>
+		    <label caption=" x "/>
+		  </frame>
+
+		  <frame layout="vbox">
+		    <label caption="Dosis:" />
+		    <lineedit name="dosis" width="75"/>
+		  </frame>
+
+		  <frame layout="vbox">
+		    <label caption="Øje:"/>
+		    <radiobuttons name="eye" value="" layout="hbox">
+		      <radiobutton caption="Ingen" value=""/>
+		      <radiobutton caption="o.dxt" value=" o.dxt"/>
+		      <radiobutton caption="o.sin" value=" o.sin"/>
+		      <radiobutton caption="o.u" value=" o.u"/>
+		    </radiobuttons>
+		  </frame>
+
+		</metawidget>
+	      </multilist>
+	    </frame>
+	  </altitem>
+	</altcombobox>
+      
+    </frame>
+    
+    <!-- Knapper -->
+    <frame layout="hbox">
+      <spacer />
+      <button caption="Gem" action="commit"/>
+    </frame>
+  </window>
+</macro>
-- 
cgit v1.2.3