diff options
| author | senator <senator> | 2009-11-16 10:25:55 +0000 | 
|---|---|---|
| committer | senator <senator> | 2009-11-16 10:25:55 +0000 | 
| commit | 7a94c424fda908c93331e378e209866b3e2d7e77 (patch) | |
| tree | 5fcfbe55e5a380a605e68596986fcb56cb499c9b /server/xml/macros | |
| parent | b8a6eb573c1992d41393cec87d1ac8d6fb3a6972 (diff) | |
Latest changes, mostly to visus macros
Diffstat (limited to 'server/xml/macros')
| -rw-r--r-- | server/xml/macros/keratometri-1.0.xml | 14 | ||||
| -rw-r--r-- | server/xml/macros/ref_90d_linse-1.0.xml | 4 | ||||
| -rw-r--r-- | server/xml/macros/ref_efterkontrol-konklusion-1.0.xml | 5 | ||||
| -rw-r--r-- | server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml | 31 | ||||
| -rw-r--r-- | server/xml/macros/ref_subjektivt-1.0.xml | 2 | ||||
| -rw-r--r-- | server/xml/macros/visus-egen_korr-1.0.xml | 131 | ||||
| -rw-r--r-- | server/xml/macros/visus-manifest_refraktion-1.0.xml | 133 | ||||
| -rw-r--r-- | server/xml/macros/visus-template-1.0.xml | 134 | ||||
| -rw-r--r-- | 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 < 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 < 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=""> | 
