From de91c53b843e9c7779fabcdef67a716c08f3c890 Mon Sep 17 00:00:00 2001 From: senator Date: Fri, 6 Nov 2009 11:27:47 +0000 Subject: all sf cyl grader macros now allow only sf filled in. templates updated --- server/xml/macros/autorefraktion-1.0.xml | 52 +- server/xml/macros/cycloplegisk_refraktion-1.0.xml | 53 +- server/xml/macros/egen_brille-1.0.xml | 44 +- server/xml/macros/manifest_refraktion-1.0.xml | 41 +- server/xml/macros/visus-egen_korr-1.0.xml | 649 +++++++++++++++++++- .../xml/macros/visus-manifest_refraktion-1.0.xml | 649 +++++++++++++++++++- server/xml/macros/visus-template-1.0.xml | 3 +- server/xml/macros/visus-uden_korr-1.0.xml | 659 ++++++++++++++++++++- server/xml/templates/ref_efterkontrol.xml | 3 +- server/xml/templates/ref_forunders.xml | 3 +- 10 files changed, 2023 insertions(+), 133 deletions(-) diff --git a/server/xml/macros/autorefraktion-1.0.xml b/server/xml/macros/autorefraktion-1.0.xml index 54fd5bb..706300e 100644 --- a/server/xml/macros/autorefraktion-1.0.xml +++ b/server/xml/macros/autorefraktion-1.0.xml @@ -1,31 +1,35 @@ - - - out = '' if ( getValue('autorefractor.right.missing') == '' ) then - out = out .. 'Autorefraktion højre øje: ' .. getValue('autorefractor.right.sphere') - .. ' sf, ' .. getValue('autorefractor.right.cyl') - .. ' cyl ' .. getValue('autorefractor.right.axis') .. ' grader.\n' + out = out .. 'Autorefraktion, o.dxt: ' .. getValue('autorefractor.right.sphere') .. ' sf' + if ( getValue('autorefractor.right.cyl') ~= '' ) + then + out = out .. ', ' .. getValue('autorefractor.right.cyl') .. ' cyl' + end + if ( getValue('autorefractor.right.axis') ~= '' ) + then + out = out .. ', ' .. getValue('autorefractor.right.axis') .. ' grader\n' + else + out = out .. '\n' + end end if ( getValue('autorefractor.left.missing') == '' ) then - out = out .. 'Autorefraktion venstre øje: ' .. getValue('autorefractor.left.sphere') - .. ' sf, ' .. getValue('autorefractor.left.cyl') - .. ' cyl ' .. getValue('autorefractor.left.axis') .. ' grader.\n' + out = out .. 'Autorefraktion, o.sin: ' .. getValue('autorefractor.left.sphere') .. ' sf' + if ( getValue('autorefractor.left.cyl') ~= '' ) + then + out = out .. ', ' .. getValue('autorefractor.left.cyl') .. ' cyl' + end + if ( getValue('autorefractor.left.axis') ~= '' ) + then + out = out .. ', ' .. getValue('autorefractor.left.axis') .. ' grader\n' + else + out = out .. '\n' + end end return out @@ -94,7 +98,7 @@ + + + + + + + + + + @@ -248,9 +393,6 @@ - - - @@ -207,6 +256,93 @@ end return true + + + + + + + + + + @@ -248,9 +393,6 @@ - - -