From 7a94c424fda908c93331e378e209866b3e2d7e77 Mon Sep 17 00:00:00 2001
From: senator <senator>
Date: Mon, 16 Nov 2009 10:25:55 +0000
Subject: Latest changes, mostly to visus macros

---
 server/xml/macros/keratometri-1.0.xml              |  14 +--
 server/xml/macros/ref_90d_linse-1.0.xml            |   4 +-
 .../xml/macros/ref_efterkontrol-konklusion-1.0.xml |   5 +-
 .../ref_forunders-informeret_samtykke-1.0.xml      |  31 +----
 server/xml/macros/ref_subjektivt-1.0.xml           |   2 +-
 server/xml/macros/visus-egen_korr-1.0.xml          | 131 +++++++++++---------
 .../xml/macros/visus-manifest_refraktion-1.0.xml   | 133 +++++++++++---------
 server/xml/macros/visus-template-1.0.xml           | 134 ++++++++++++---------
 server/xml/macros/visus-uden_korr-1.0.xml          | 119 ++++++++++--------
 9 files changed, 314 insertions(+), 259 deletions(-)

diff --git a/server/xml/macros/keratometri-1.0.xml b/server/xml/macros/keratometri-1.0.xml
index 76874b5..9c7a611 100644
--- a/server/xml/macros/keratometri-1.0.xml
+++ b/server/xml/macros/keratometri-1.0.xml
@@ -7,7 +7,7 @@
     end
 
     function tostr(value)
-      value = string.format('%.2f', value)
+      value = string.format('%.02f', value)
       value = string.gsub(value, '\\.', ',')
       return value
     end
@@ -29,15 +29,15 @@
         rx2 = rx1 - 90
       end
 
-      rd1 = tonumber(string.format('%.2f', 337.5 / rr1))
-      rd2 = tonumber(string.format('%.2f', 337.5 / rr2))
+      rd1 = tonumber(string.format('%.02f', 337.5 / rr1))
+      rd2 = tonumber(string.format('%.02f', 337.5 / rr2))
 
       if ( rd1 &lt; rd2 )
       then
         ry1 = rd1 - rd2
         ry2 = rx1
       else
-       ry1 = rd2 - rd1
+        ry1 = rd2 - rd1
         ry2 = rx2
       end
 
@@ -68,15 +68,15 @@
         lx2 = lx1 - 90
       end
 
-      ld1 = tonumber(string.format('%.2f', 337.5 / lr1))
-      ld2 = tonumber(string.format('%.2f', 337.5 / lr2))
+      ld1 = tonumber(string.format('%.02f', 337.5 / lr1))
+      ld2 = tonumber(string.format('%.02f', 337.5 / lr2))
 
       if ( ld1 &lt; ld2 )
       then
         ly1 = ld1 - ld2
         ly2 = lx1
       else
-       ly1 = ld2 - ld1
+        ly1 = ld2 - ld1
         ly2 = lx2
       end
 
diff --git a/server/xml/macros/ref_90d_linse-1.0.xml b/server/xml/macros/ref_90d_linse-1.0.xml
index 6f94213..d6a3f09 100644
--- a/server/xml/macros/ref_90d_linse-1.0.xml
+++ b/server/xml/macros/ref_90d_linse-1.0.xml
@@ -4,7 +4,7 @@
     out = ''
     if ( getValue('90d_linse.right.missing') == '' )
     then
-      out = out .. 'Oftalmoskopi, højre øje:\n'
+      out = out .. 'Oftalmoskopi, o.dxt:\n'
       out = out .. getValue('90d_linse.right.indblik') .. ' indblik.\n'
       out = out .. 'Papil: ' .. getValue('90d_linse.right.papil') .. '\n'
       out = out .. 'Makula: ' .. getValue('90d_linse.right.makula') .. '\n'
@@ -26,7 +26,7 @@
       then
         out = out .. '\n'
       end
-      out = out .. 'Oftalmoskopi, højre øje:\n'
+      out = out .. 'Oftalmoskopi, o.sin:\n'
       out = out .. getValue('90d_linse.left.indblik') .. ' indblik.\n'
       out = out .. 'Papil: ' .. getValue('90d_linse.left.papil') .. '\n'
       out = out .. 'Makula: ' .. getValue('90d_linse.left.makula') .. '\n'
diff --git a/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml b/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
index 651e949..b1c5903 100644
--- a/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
+++ b/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
@@ -6,10 +6,11 @@
     out = out .. getValue('ref_efterkontrol.konklusion.konklusion')
     if ( getValue('ref_efterkontrol.konklusion.konklusion') == 'Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling.' )
     then
-      out = out .. ' Der aftales ' .. getValue('ref_efterkontrol.konklusion.rebehandling') .. ' på ' .. getValue('ref_efterkontrol.konklusion.oeje') .. '.\n'
+      out = out .. ' Der aftales ' .. getValue('ref_efterkontrol.konklusion.rebehandling') .. ' på ' .. getValue('ref_efterkontrol.konklusion.oeje') .. '.'
     end
     if (getValue('ref_efterkontrol.konklusion.yderligere_kommentarer') ~= '' )
     then
+      out = out .. '\n'
       out = out .. getValue('ref_efterkontrol.konklusion.yderligere_kommentarer')
     end
     return out
@@ -52,7 +53,7 @@
       <label caption="Konklusion:"/>
       <altcombobox name="ref_efterkontrol.konklusion.konklusion" layout="vbox" value='na' script="konklusion">
 	<item caption="Ikke udfyldt" value="na"/>
-	<item caption="Tilfredsstillende resultat. Patienten afsluttes" value="Tilfredsstillende resultat. Patienten afsluttes"/>
+	<item caption="Tilfredsstillende resultat. Patienten afsluttes." value="Tilfredsstillende resultat. Patienten afsluttes."/>
 	<item caption="Ikke indikation eller mulighed for yderligere behandling. Patienten afsluttes." value="Ikke indikation eller mulighed for yderligere behandling. Patienten afsluttes."/>
 	<item caption="Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling. Der aftales: (udfyld herunder)" value="Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling."/>
 	<altitem caption="Andet" value="andet" layout="hbox" innerwidget="ref_efterkontrol.konklusion.andet">
diff --git a/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml b/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
index f923db3..3fbfa10 100644
--- a/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
+++ b/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
@@ -3,7 +3,7 @@
   <resume language="lua">
     out = ''
     out = out .. 'Informeret samtykke:\n'
-    out = out .. 'Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er indforstået med den brillestyrke som forventes med operationen, nemlig ' .. getValue('ref_forunders.informeret_samtykke.dioptrier') .. ' dioptrier og ' .. getValue('ref_forunders.informeret_samtykke.cylindre') .. ' cylindre. Patienten er informeret om at der vil være rest-nærsynethed efter operationen.'
+    out = out .. 'Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er indforstået med at der er risiko for at operationen ikke giver den fulde effekt. Patienten er informeret om at der vil være rest-nærsynethed efter operationen.'
 
     if ( getValue('ref_forunders.informeret_samtykke.yderligere_kommentarer') ~= '' )
     then
@@ -29,35 +29,8 @@
     <frame layout="vbox">
       <label caption="Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i"/>
       <label caption="overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er "/>
-      <label caption="indforstået med den brillestyrke som forventes med operationen (anfør herunder). Patienten er"/>
+      <label caption="indforstået med at der er risiko for at operationen ikke giver den fulde effekt. Patienten er"/>
       <label caption="informeret om at der vil være rest-nærsynethed efter operationen."/>
-      <frame layout="hbox">
-	<label caption="Dioptrier:"/>
-	<combobox name="ref_forunders.informeret_samtykke.dioptrier" value="">
-	  <item caption="-4" value="-4"/>
-	  <item caption="-3" value="-3"/>
-	  <item caption="-2" value="-2"/>
-	  <item caption="-1" value="-1"/>
-	  <item caption="0" value="0"/>
-	  <item caption="1" value="1"/>
-	  <item caption="2" value="2"/>
-	  <item caption="3" value="3"/>
-	  <item caption="4" value="4"/>
-	</combobox>
-	<label caption="Cylindre:"/>
-	<combobox name="ref_forunders.informeret_samtykke.cylindre" value="">
-	  <item caption="-4" value="-4"/>
-	  <item caption="-3" value="-3"/>
-	  <item caption="-2" value="-2"/>
-	  <item caption="-1" value="-1"/>
-	  <item caption="0" value="0"/>
-	  <item caption="1" value="1"/>
-	  <item caption="2" value="2"/>
-	  <item caption="3" value="3"/>
-	  <item caption="4" value="4"/>
-	</combobox>
-	<spacer/>
-      </frame>
       <checkbox name="ref_forunders.informeret_samtykke.informeret_samtykke" caption="Godkend ovenstående" truevalue="true" falsevalue="" script="samtykke"/>
     </frame>
     <label/>
diff --git a/server/xml/macros/ref_subjektivt-1.0.xml b/server/xml/macros/ref_subjektivt-1.0.xml
index f0d615c..db5116f 100644
--- a/server/xml/macros/ref_subjektivt-1.0.xml
+++ b/server/xml/macros/ref_subjektivt-1.0.xml
@@ -21,7 +21,7 @@ Syn: ${ref.subjektivt.syn}
       <frame layout="vbox">
 	<altcombobox name="ref.subjektivt.smerter" layout="vbox" value="Ikke udfyldt">
 	  <item caption="Ikke udfyldt" value="Ikke udfyldt"/>
-	  <item caption="Ingen smerter" value="Ingen smerter"/>
+	  <item caption="Ingen" value="Ingen"/>
 	  <item caption="Lette smerter" value="Lette smerter"/>
 	  <item caption="Mange smerter" value="Mange smerter"/>
 	  <altitem caption="Andet" value="andet" layout="hbox" innerwidget="ref.subjektivt.smerter.andet">
diff --git a/server/xml/macros/visus-egen_korr-1.0.xml b/server/xml/macros/visus-egen_korr-1.0.xml
index 5256b07..f59f795 100644
--- a/server/xml/macros/visus-egen_korr-1.0.xml
+++ b/server/xml/macros/visus-egen_korr-1.0.xml
@@ -1,24 +1,46 @@
 <?xml version='1.0' encoding='UTF-8'?>
 <macro name="visus-egen_korr" version="1.0">
+<!--
+    Info ved oprettelse af ny visus macro hvor denne kopieres.
+    query-replace på .navn1. til .navn2.
+    skift macro navnet under macro tagget helt i toppen
+    skift overskrift i resumeet (navn1->navn2)
+    skift GUI overskrift for macroen under widgets afsnittet
+    fjern resume felter der ikke skal bruges
+    fjern tilsvarende GUI felter der ikke skal bruges
+  -->
   <resume language="lua">
     out = ''
+    if ( getValue('visus.egen_korr.missing.right') == '' or getValue('visus.egen_korr.missing.left') == '' or getValue('visus.egen_korr.ou') ~= '' )
+    then
+      out = out .. 'Visus egen korrektion:\n'
+    end
+
     if ( getValue('visus.egen_korr.missing.right') == '' )
     then
-      out = out .. 'Visus, egen korr., o.dxt'
-      if ( getValue('visus.egen_korr.kontrast.right') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.egen_korr.kontrast.right') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.dxt: '
       if ( getValue('visus.egen_korr.snellen.right') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.right') .. '\n'
+        out = out .. getValue('visus.egen_korr.snellen.right')
+        if ( getValue('visus.egen_korr.etdrs.right') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.egen_korr.etdrs.right') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.right') .. '\n'
+        if ( getValue('visus.egen_korr.snellen.right') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.egen_korr.etdrs.right') .. ' ETDRS, '
+      end
+      if ( getValue('visus.egen_korr.kontrast.right') ~= '' )
+      then
+        out = out .. getValue('visus.egen_korr.kontrast.right') .. ' kontrast, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.egen_korr.korr.sf.right') .. ' sf'
+
+      out = out .. 'cc ' .. getValue('visus.egen_korr.korr.sf.right') .. ' sf'
       if ( getValue('visus.egen_korr.korr.cyl.right') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.egen_korr.korr.cyl.right') .. ' cyl'
@@ -27,50 +49,51 @@
       then
         out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.right') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.egen_korr.st_hul.right') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.egen_korr.st_hul.snellen.right') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.egen_korr.st_hul.snellen.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.egen_korr.st_hul.snellen.right')
         end
         if ( getValue('visus.egen_korr.st_hul.etdrs.right') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.st_hul.etdrs.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.egen_korr.st_hul.etdrs.right') .. ' ETDRS'
         end
+        out = out .. ' st.h.'
       end
-      if ( getValue('visus.egen_korr.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
 
 
 
-
-
-
-
     if ( getValue('visus.egen_korr.missing.left') == '' )
     then
-      out = out .. 'Visus, egen korr., o.sin'
-      if ( getValue('visus.egen_korr.kontrast.left') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.egen_korr.kontrast.left') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.sin: '
       if ( getValue('visus.egen_korr.snellen.left') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.left') .. '\n'
+        out = out .. getValue('visus.egen_korr.snellen.left')
+        if ( getValue('visus.egen_korr.etdrs.left') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.egen_korr.etdrs.left') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.left') .. '\n'
+        if ( getValue('visus.egen_korr.snellen.left') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.egen_korr.etdrs.left') .. ' ETDRS, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.egen_korr.korr.sf.left') .. ' sf'
+      if ( getValue('visus.egen_korr.kontrast.left') ~= '' )
+      then
+        out = out .. getValue('visus.egen_korr.kontrast.left') .. ' kontrast, '
+      end
+
+      out = out .. 'cc ' .. getValue('visus.egen_korr.korr.sf.left') .. ' sf'
       if ( getValue('visus.egen_korr.korr.cyl.left') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.egen_korr.korr.cyl.left') .. ' cyl'
@@ -79,23 +102,20 @@
       then
         out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.left') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.egen_korr.st_hul.left') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.egen_korr.st_hul.snellen.left') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.egen_korr.st_hul.snellen.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.egen_korr.st_hul.snellen.left')
         end
         if ( getValue('visus.egen_korr.st_hul.etdrs.left') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.st_hul.etdrs.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.egen_korr.st_hul.etdrs.left') .. ' ETDRS'
         end
+        out = out .. ' st.h.\n'
       end
-      if ( getValue('visus.egen_korr.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
@@ -103,25 +123,24 @@
 
 
 
-
-
-
-
     if ( getValue('visus.egen_korr.ou') ~= '' )
     then
-      out = out .. 'Visus, egen korr., o.u'
-      if ( getValue('visus.egen_korr.kontrast.ou') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.egen_korr.kontrast.ou') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.u: '
       if ( getValue('visus.egen_korr.snellen.ou') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.ou') .. '\n'
+        out = out .. getValue('visus.egen_korr.snellen.ou')
       end
       if ( getValue('visus.egen_korr.etdrs.ou') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.ou') .. '\n'
+        if ( getValue('visus.egen_korr.snellen.ou') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.egen_korr.etdrs.ou') .. ' ETDRS'
+      end
+      if ( getValue('visus.egen_korr.kontrast.ou') ~= '' )
+      then
+        out = out .. ', ' .. getValue('visus.egen_korr.kontrast.ou') .. ' kontrast'
       end
     end
 
@@ -378,11 +397,11 @@
       
       <!-- Højre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på højre øje"
+	<checkbox caption="Der er ikke målt på o.dxt"
 		  name="visus.egen_korr.missing.right" script="right_eye"
 		  map="missing_eye_right_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+	<frame name="right_eye_frame" caption="o.dxt" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.egen_korr.kontrast.right" value="">
@@ -536,6 +555,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -554,6 +574,7 @@
 		<lineedit name="visus.egen_korr.korr.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.egen_korr.st_hul.right" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.right"/>
 	    </frame>
@@ -705,11 +726,11 @@
       
       <!-- Venstre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på venstre øje"
+	<checkbox caption="Der er ikke målt på o.sin øje"
 		  name="visus.egen_korr.missing.left" script="left_eye"
 		  map="missing_eye_left_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+	<frame name="left_eye_frame" caption="o.sin øje" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.egen_korr.kontrast.left" value="">
@@ -863,6 +884,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -881,6 +903,7 @@
 		<lineedit name="visus.egen_korr.korr.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.egen_korr.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
 	    </frame>
diff --git a/server/xml/macros/visus-manifest_refraktion-1.0.xml b/server/xml/macros/visus-manifest_refraktion-1.0.xml
index a2c16fc..520c4ce 100644
--- a/server/xml/macros/visus-manifest_refraktion-1.0.xml
+++ b/server/xml/macros/visus-manifest_refraktion-1.0.xml
@@ -1,24 +1,46 @@
 <?xml version='1.0' encoding='UTF-8'?>
 <macro name="visus-manifest_refraktion" version="1.0">
+<!--
+    Info ved oprettelse af ny visus macro hvor denne kopieres.
+    query-replace på .navn1. til .navn2.
+    skift macro navnet under macro tagget helt i toppen
+    skift overskrift i resumeet (navn1->navn2)
+    skift GUI overskrift for macroen under widgets afsnittet
+    fjern resume felter der ikke skal bruges
+    fjern tilsvarende GUI felter der ikke skal bruges
+  -->
   <resume language="lua">
     out = ''
+    if ( getValue('visus.manifest_refraktion.missing.right') == '' or getValue('visus.manifest_refraktion.missing.left') == '' or getValue('visus.manifest_refraktion.ou') ~= '' )
+    then
+      out = out .. 'Visus optimal refraktion:\n'
+    end
+
     if ( getValue('visus.manifest_refraktion.missing.right') == '' )
     then
-      out = out .. 'Visus, manifest refraktion, o.dxt'
-      if ( getValue('visus.manifest_refraktion.kontrast.right') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.right') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.dxt: '
       if ( getValue('visus.manifest_refraktion.snellen.right') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.right') .. '\n'
+        out = out .. getValue('visus.manifest_refraktion.snellen.right')
+        if ( getValue('visus.manifest_refraktion.etdrs.right') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.manifest_refraktion.etdrs.right') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.right') .. '\n'
+        if ( getValue('visus.manifest_refraktion.snellen.right') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.manifest_refraktion.etdrs.right') .. ' ETDRS, '
+      end
+      if ( getValue('visus.manifest_refraktion.kontrast.right') ~= '' )
+      then
+        out = out .. getValue('visus.manifest_refraktion.kontrast.right') .. ' kontrast, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.manifest_refraktion.korr.sf.right') .. ' sf'
+
+      out = out .. 'cc ' .. getValue('visus.manifest_refraktion.korr.sf.right') .. ' sf'
       if ( getValue('visus.manifest_refraktion.korr.cyl.right') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.cyl.right') .. ' cyl'
@@ -27,50 +49,51 @@
       then
         out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.grader.right') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.manifest_refraktion.st_hul.right') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.manifest_refraktion.st_hul.snellen.right') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.st_hul.snellen.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.snellen.right')
         end
         if ( getValue('visus.manifest_refraktion.st_hul.etdrs.right') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.right') .. ' ETDRS'
         end
+        out = out .. ' st.h.'
       end
-      if ( getValue('visus.manifest_refraktion.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
 
 
 
-
-
-
-
     if ( getValue('visus.manifest_refraktion.missing.left') == '' )
     then
-      out = out .. 'Visus, manifest refraktion, o.sin'
-      if ( getValue('visus.manifest_refraktion.kontrast.left') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.left') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.sin: '
       if ( getValue('visus.manifest_refraktion.snellen.left') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.left') .. '\n'
+        out = out .. getValue('visus.manifest_refraktion.snellen.left')
+        if ( getValue('visus.manifest_refraktion.etdrs.left') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.manifest_refraktion.etdrs.left') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.left') .. '\n'
+        if ( getValue('visus.manifest_refraktion.snellen.left') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.manifest_refraktion.etdrs.left') .. ' ETDRS, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.manifest_refraktion.korr.sf.left') .. ' sf'
+      if ( getValue('visus.manifest_refraktion.kontrast.left') ~= '' )
+      then
+        out = out .. getValue('visus.manifest_refraktion.kontrast.left') .. ' kontrast, '
+      end
+
+      out = out .. 'cc ' .. getValue('visus.manifest_refraktion.korr.sf.left') .. ' sf'
       if ( getValue('visus.manifest_refraktion.korr.cyl.left') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.cyl.left') .. ' cyl'
@@ -79,23 +102,20 @@
       then
         out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.grader.left') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.manifest_refraktion.st_hul.left') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.manifest_refraktion.st_hul.snellen.left') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.st_hul.snellen.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.snellen.left')
         end
         if ( getValue('visus.manifest_refraktion.st_hul.etdrs.left') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.left') .. ' ETDRS'
         end
+        out = out .. ' st.h.\n'
       end
-      if ( getValue('visus.manifest_refraktion.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
@@ -103,25 +123,24 @@
 
 
 
-
-
-
-
     if ( getValue('visus.manifest_refraktion.ou') ~= '' )
     then
-      out = out .. 'Visus, manifest refraktion, o.u'
-      if ( getValue('visus.manifest_refraktion.kontrast.ou') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.ou') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.u: '
       if ( getValue('visus.manifest_refraktion.snellen.ou') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.ou') .. '\n'
+        out = out .. getValue('visus.manifest_refraktion.snellen.ou')
       end
       if ( getValue('visus.manifest_refraktion.etdrs.ou') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.ou') .. '\n'
+        if ( getValue('visus.manifest_refraktion.snellen.ou') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.manifest_refraktion.etdrs.ou') .. ' ETDRS'
+      end
+      if ( getValue('visus.manifest_refraktion.kontrast.ou') ~= '' )
+      then
+        out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.ou') .. ' kontrast'
       end
     end
 
@@ -371,18 +390,18 @@
       return true
     </script>
   </scripts>
-  <widgets caption="Visus - manifest refraktion"
+  <widgets caption="Visus - optimal refraktion"
           layout="vbox">
 
     <frame layout="hbox">
       
       <!-- Højre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på højre øje"
+	<checkbox caption="Der er ikke målt på o.dxt"
 		  name="visus.manifest_refraktion.missing.right" script="right_eye"
 		  map="missing_eye_right_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+	<frame name="right_eye_frame" caption="o.dxt" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.manifest_refraktion.kontrast.right" value="">
@@ -536,6 +555,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -554,6 +574,7 @@
 		<lineedit name="visus.manifest_refraktion.korr.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.manifest_refraktion.st_hul.right" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.right"/>
 	    </frame>
@@ -705,11 +726,11 @@
       
       <!-- Venstre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på venstre øje"
+	<checkbox caption="Der er ikke målt på o.sin øje"
 		  name="visus.manifest_refraktion.missing.left" script="left_eye"
 		  map="missing_eye_left_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+	<frame name="left_eye_frame" caption="o.sin øje" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.manifest_refraktion.kontrast.left" value="">
@@ -863,6 +884,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -881,6 +903,7 @@
 		<lineedit name="visus.manifest_refraktion.korr.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.manifest_refraktion.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
 	    </frame>
diff --git a/server/xml/macros/visus-template-1.0.xml b/server/xml/macros/visus-template-1.0.xml
index 57fb8d5..7818e5a 100644
--- a/server/xml/macros/visus-template-1.0.xml
+++ b/server/xml/macros/visus-template-1.0.xml
@@ -4,30 +4,43 @@
     Info ved oprettelse af ny visus macro hvor denne kopieres.
     query-replace på .navn1. til .navn2.
     skift macro navnet under macro tagget helt i toppen
-    skift overskrift for begge øjne + ou i resumeet (navn1->navn2)
+    skift overskrift i resumeet (navn1->navn2)
     skift GUI overskrift for macroen under widgets afsnittet
     fjern resume felter der ikke skal bruges
     fjern tilsvarende GUI felter der ikke skal bruges
   -->
   <resume language="lua">
     out = ''
+    if ( getValue('visus.template.missing.right') == '' or getValue('visus.template.missing.left') == '' or getValue('visus.template.ou') ~= '' )
+    then
+      out = out .. 'Visus template:\n'
+    end
+
     if ( getValue('visus.template.missing.right') == '' )
     then
-      out = out .. 'Visus, template, o.dxt'
-      if ( getValue('visus.template.kontrast.right') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.template.kontrast.right') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.dxt: '
       if ( getValue('visus.template.snellen.right') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.template.snellen.right') .. '\n'
+        out = out .. getValue('visus.template.snellen.right')
+        if ( getValue('visus.template.etdrs.right') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.template.etdrs.right') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.right') .. '\n'
+        if ( getValue('visus.template.snellen.right') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.template.etdrs.right') .. ' ETDRS, '
+      end
+      if ( getValue('visus.template.kontrast.right') ~= '' )
+      then
+        out = out .. getValue('visus.template.kontrast.right') .. ' kontrast, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.template.korr.sf.right') .. ' sf'
+
+      out = out .. 'cc ' .. getValue('visus.template.korr.sf.right') .. ' sf'
       if ( getValue('visus.template.korr.cyl.right') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.template.korr.cyl.right') .. ' cyl'
@@ -36,9 +49,8 @@
       then
         out = out .. ', ' .. getValue('visus.template.korr.grader.right') .. ' grader'
       end
-      out = out .. '\n'
 
-      out = out .. 'Add korr.: ' .. getValue('visus.template.add.sf.right') .. ' sf'
+      out = out .. ', add ' .. getValue('visus.template.add.sf.right') .. ' sf'
       if ( getValue('visus.template.add.cyl.right') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.template.add.cyl.right') .. ' cyl'
@@ -47,50 +59,51 @@
       then
         out = out .. ', ' .. getValue('visus.template.add.grader.right') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.template.st_hul.right') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.template.st_hul.snellen.right') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.template.st_hul.snellen.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.template.st_hul.snellen.right')
         end
         if ( getValue('visus.template.st_hul.etdrs.right') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.template.st_hul.etdrs.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.template.st_hul.etdrs.right') .. ' ETDRS'
         end
+        out = out .. ' st.h.'
       end
-      if ( getValue('visus.template.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
 
 
 
-
-
-
-
     if ( getValue('visus.template.missing.left') == '' )
     then
-      out = out .. 'Visus, template, o.sin'
-      if ( getValue('visus.template.kontrast.left') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.template.kontrast.left') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.sin: '
       if ( getValue('visus.template.snellen.left') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.template.snellen.left') .. '\n'
+        out = out .. getValue('visus.template.snellen.left')
+        if ( getValue('visus.template.etdrs.left') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.template.etdrs.left') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.left') .. '\n'
+        if ( getValue('visus.template.snellen.left') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.template.etdrs.left') .. ' ETDRS, '
       end
-      out = out .. 'Korr.: ' .. getValue('visus.template.korr.sf.left') .. ' sf'
+      if ( getValue('visus.template.kontrast.left') ~= '' )
+      then
+        out = out .. getValue('visus.template.kontrast.left') .. ' kontrast, '
+      end
+
+      out = out .. 'cc ' .. getValue('visus.template.korr.sf.left') .. ' sf'
       if ( getValue('visus.template.korr.cyl.left') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.template.korr.cyl.left') .. ' cyl'
@@ -99,9 +112,8 @@
       then
         out = out .. ', ' .. getValue('visus.template.korr.grader.left') .. ' grader'
       end
-      out = out .. '\n'
 
-      out = out .. 'Add korr.: ' .. getValue('visus.template.add.sf.left') .. ' sf'
+      out = out .. ', add ' .. getValue('visus.template.add.sf.left') .. ' sf'
       if ( getValue('visus.template.add.cyl.left') ~= '' )
       then
         out = out .. ', ' .. getValue('visus.template.add.cyl.left') .. ' cyl'
@@ -110,23 +122,20 @@
       then
         out = out .. ', ' .. getValue('visus.template.add.grader.left') .. ' grader'
       end
-      out = out .. '\n'
+
       if ( getValue('visus.template.st_hul.left') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.template.st_hul.snellen.left') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.template.st_hul.snellen.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.template.st_hul.snellen.left')
         end
         if ( getValue('visus.template.st_hul.etdrs.left') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.template.st_hul.etdrs.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.template.st_hul.etdrs.left') .. ' ETDRS'
         end
+        out = out .. ' st.h.\n'
       end
-      if ( getValue('visus.template.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
@@ -134,25 +143,24 @@
 
 
 
-
-
-
-
     if ( getValue('visus.template.ou') ~= '' )
     then
-      out = out .. 'Visus, template, o.u'
-      if ( getValue('visus.template.kontrast.ou') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.template.kontrast.ou') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.u: '
       if ( getValue('visus.template.snellen.ou') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.template.snellen.ou') .. '\n'
+        out = out .. getValue('visus.template.snellen.ou')
       end
       if ( getValue('visus.template.etdrs.ou') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.ou') .. '\n'
+        if ( getValue('visus.template.snellen.ou') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.template.etdrs.ou') .. ' ETDRS'
+      end
+      if ( getValue('visus.template.kontrast.ou') ~= '' )
+      then
+        out = out .. ', ' .. getValue('visus.template.kontrast.ou') .. ' kontrast'
       end
     end
 
@@ -409,11 +417,11 @@
       
       <!-- Højre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på højre øje"
+	<checkbox caption="Der er ikke målt på o.dxt"
 		  name="visus.template.missing.right" script="right_eye"
 		  map="missing_eye_right_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+	<frame name="right_eye_frame" caption="o.dxt" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.template.kontrast.right" value="">
@@ -567,6 +575,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -585,6 +594,8 @@
 		<lineedit name="visus.template.korr.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
+<!-- start fjern herfra hvis add felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label caption=""/>
@@ -603,6 +614,7 @@
 		<lineedit name="visus.template.add.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis add felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.template.st_hul.right" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.right"/>
 	    </frame>
@@ -754,11 +766,11 @@
       
       <!-- Venstre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på venstre øje"
+	<checkbox caption="Der er ikke målt på o.sin øje"
 		  name="visus.template.missing.left" script="left_eye"
 		  map="missing_eye_left_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+	<frame name="left_eye_frame" caption="o.sin øje" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.template.kontrast.left" value="">
@@ -912,6 +924,7 @@
 	    </frame>
 	  </frame>
 	  <frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label/>
@@ -930,6 +943,8 @@
 		<lineedit name="visus.template.korr.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
+<!-- start fjern herfra hvis add felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <frame layout="vbox">
 		<label caption=""/>
@@ -948,6 +963,7 @@
 		<lineedit name="visus.template.add.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
 	      </frame>
 	    </frame>
+<!-- slut fjern hertil hvis add felterne ikke skal bruges -->
 	    <frame layout="hbox">
 	      <checkbox name="visus.template.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
 	    </frame>
diff --git a/server/xml/macros/visus-uden_korr-1.0.xml b/server/xml/macros/visus-uden_korr-1.0.xml
index 9d450e6..dc087de 100644
--- a/server/xml/macros/visus-uden_korr-1.0.xml
+++ b/server/xml/macros/visus-uden_korr-1.0.xml
@@ -1,81 +1,101 @@
 <?xml version='1.0' encoding='UTF-8'?>
 <macro name="visus-uden_korr" version="1.0">
+<!--
+    Info ved oprettelse af ny visus macro hvor denne kopieres.
+    query-replace på .navn1. til .navn2.
+    skift macro navnet under macro tagget helt i toppen
+    skift overskrift for begge øjne + ou i resumeet (navn1->navn2)
+    skift GUI overskrift for macroen under widgets afsnittet
+    fjern resume felter der ikke skal bruges
+    fjern tilsvarende GUI felter der ikke skal bruges
+  -->
   <resume language="lua">
     out = ''
+    if ( getValue('visus.uden_korr.missing.right') == '' or getValue('visus.uden_korr.missing.left') == '' or getValue('visus.uden_korr.ou') ~= '' )
+    then
+      out = out .. 'Visus uden korrektion:\n'
+    end
+
     if ( getValue('visus.uden_korr.missing.right') == '' )
     then
-      out = out .. 'Visus, uden korr., o.dxt'
-      if ( getValue('visus.uden_korr.kontrast.right') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.uden_korr.kontrast.right') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.dxt: '
       if ( getValue('visus.uden_korr.snellen.right') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.right') .. '\n'
+        out = out .. getValue('visus.uden_korr.snellen.right')
+        if ( getValue('visus.uden_korr.etdrs.right') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.uden_korr.etdrs.right') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.right') .. '\n'
+        if ( getValue('visus.uden_korr.snellen.right') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.uden_korr.etdrs.right') .. ' ETDRS, '
+      end
+      if ( getValue('visus.uden_korr.kontrast.right') ~= '' )
+      then
+        out = out .. getValue('visus.uden_korr.kontrast.right') .. ' kontrast'
       end
+
       if ( getValue('visus.uden_korr.st_hul.right') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.uden_korr.st_hul.snellen.right') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.uden_korr.st_hul.snellen.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.uden_korr.st_hul.snellen.right')
         end
         if ( getValue('visus.uden_korr.st_hul.etdrs.right') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.st_hul.etdrs.right') .. '\n'
+          out = out .. ', ' .. getValue('visus.uden_korr.st_hul.etdrs.right') .. ' ETDRS'
         end
+        out = out .. ' st.h.'
       end
-      if ( getValue('visus.uden_korr.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
 
 
 
-
-
-
-
     if ( getValue('visus.uden_korr.missing.left') == '' )
     then
-      out = out .. 'Visus, uden korr., o.sin'
-      if ( getValue('visus.uden_korr.kontrast.left') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.uden_korr.kontrast.left') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.sin: '
       if ( getValue('visus.uden_korr.snellen.left') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.left') .. '\n'
+        out = out .. getValue('visus.uden_korr.snellen.left')
+        if ( getValue('visus.uden_korr.etdrs.left') == '' )
+        then
+	  out = out .. ', '
+	end
       end
       if ( getValue('visus.uden_korr.etdrs.left') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.left') .. '\n'
+        if ( getValue('visus.uden_korr.snellen.left') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.uden_korr.etdrs.left') .. ' ETDRS, '
+      end
+      if ( getValue('visus.uden_korr.kontrast.left') ~= '' )
+      then
+        out = out .. getValue('visus.uden_korr.kontrast.left') .. ' kontrast'
       end
+
       if ( getValue('visus.uden_korr.st_hul.left') ~= '' )
       then
-        out = out .. 'Måling foretaget med st. hul:\n'
         if ( getValue('visus.uden_korr.st_hul.snellen.left') ~= '' )
         then
-          out = out .. 'Snellen: ' .. getValue('visus.uden_korr.st_hul.snellen.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.uden_korr.st_hul.snellen.left')
         end
         if ( getValue('visus.uden_korr.st_hul.etdrs.left') ~= '' )
         then
-          out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.st_hul.etdrs.left') .. '\n'
+          out = out .. ', ' .. getValue('visus.uden_korr.st_hul.etdrs.left') .. ' ETDRS'
         end
+        out = out .. ' st.h.'
       end
-      if ( getValue('visus.uden_korr.missing.left') == '' )
-      then
-        out = out .. '\n'
-      end
+      out = out .. '\n'
     end
 
 
@@ -83,25 +103,24 @@
 
 
 
-
-
-
-
     if ( getValue('visus.uden_korr.ou') ~= '' )
     then
-      out = out .. 'Visus, uden korr., o.u'
-      if ( getValue('visus.uden_korr.kontrast.ou') ~= '' )
-      then
-        out = out .. ', ' .. getValue('visus.uden_korr.kontrast.ou') .. ' kontrast'
-      end
-      out = out .. ':\n'
+      out = out .. 'o.u: '
       if ( getValue('visus.uden_korr.snellen.ou') ~= '' )
       then
-        out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.ou') .. '\n'
+        out = out .. getValue('visus.uden_korr.snellen.ou')
       end
       if ( getValue('visus.uden_korr.etdrs.ou') ~= '' )
       then
-        out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.ou') .. '\n'
+        if ( getValue('visus.uden_korr.snellen.ou') ~= '' )
+        then
+	  out = out .. ', '
+	end
+        out = out .. getValue('visus.uden_korr.etdrs.ou') .. ' ETDRS'
+      end
+      if ( getValue('visus.uden_korr.kontrast.ou') ~= '' )
+      then
+        out = out .. ', ' .. getValue('visus.uden_korr.kontrast.ou') .. ' kontrast'
       end
     end
 
@@ -358,11 +377,11 @@
       
       <!-- Højre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på højre øje"
+	<checkbox caption="Der er ikke målt på o.dxt"
 		  name="visus.uden_korr.missing.right" script="right_eye"
 		  map="missing_eye_right_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+	<frame name="right_eye_frame" caption="o.dxt" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.uden_korr.kontrast.right" value="">
@@ -667,11 +686,11 @@
       
       <!-- Venstre øje -->
       <frame layout="vbox">
-	<checkbox caption="Der er ikke målt på venstre øje"
+	<checkbox caption="Der er ikke målt på o.sin øje"
 		  name="visus.uden_korr.missing.left" script="left_eye"
 		  map="missing_eye_left_map"
 		  truevalue="mangler" falsevalue="" value=""/>
-	<frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+	<frame name="left_eye_frame" caption="o.sin øje" layout="vbox">
 	  <frame layout="hbox">
 	    <label caption="Kontrast:"/>
 	    <combobox name="visus.uden_korr.kontrast.left" value="">
-- 
cgit v1.2.3