out = ''
if ( getValue('snellen.odxt.missing') == '' or getValue('snellen.osin.missing') == '' )
then
out = out .. 'Objektivt:\n'
if ( getValue('snellen.odxt.missing') == '' )
then
out = out .. 'Visus o.dxt. ' .. getValue('snellen.odxt') .. '\n'
out = out .. 'ETDRS o.dxt. ' .. getValue('etdrs.odxt') .. '\n'
if ( getValue('snellen.odxt.korr.basis') ~= 'Ingen' )
then
out = out .. 'Korr.: ' .. getValue('snellen.odxt.korr.basis') .. ' add '
else
out = out .. 'Korr.: add '
end
out = out .. getValue('snellen.odxt.korr.sf') .. ' sf, '
.. getValue('snellen.odxt.korr.cyl') .. '.sf '
.. getValue('snellen.odxt.korr.grader') .. ' grader.\n'
end
if ( getValue('snellen.osin.missing') == '' )
then
out = out .. 'Visus o.sin. ' .. getValue('snellen.osin') .. '\n'
out = out .. 'ETDRS o.sin. ' .. getValue('etdrs.osin') .. '\n'
if ( getValue('snellen.osin.korr.basis') ~= 'Ingen' )
then
out = out .. 'Korr.: ' .. getValue('snellen.osin.korr.basis') .. ' add '
else
out = out .. 'Korr.: add '
end
out = out .. getValue('snellen.osin.korr.sf') .. ' sf, '
.. getValue('snellen.osin.korr.cyl') .. '.sf '
.. getValue('snellen.osin.korr.grader') .. ' grader.\n'
end
end
return out