diff options
-rw-r--r-- | server/xml/macros/B.2.2.7.xml | 113 |
1 files changed, 102 insertions, 11 deletions
diff --git a/server/xml/macros/B.2.2.7.xml b/server/xml/macros/B.2.2.7.xml index 0eeacca..e3eed24 100644 --- a/server/xml/macros/B.2.2.7.xml +++ b/server/xml/macros/B.2.2.7.xml @@ -2,19 +2,108 @@ <!-- 20081204: Bent Bisballe Nyeng Feltnavnene ændret så de giver mening. - --> -<!-- + 20090108: Bent Bisballe Nyeng Højre/venstre byttet om. - --> -<!-- + 20090320: Bent Bisballe Nyeng Total omskrivning + + 20090420: Bent Bisballe Nyeng + Nyt resume. --> <macro name="B.2.2.7" version="1.0"> - <resume>Inblikket til fundusbaggrunden er ${90D_lens.right.fundus_visibility} på højre øje og ${90D_lens.left.fundus_visibility} på venstre. -${90D_lens.implications} -${90D_lens.additional}</resume> + <resume language="lua"> + out = '' + + if ( getValue('90D_lens.right.missing') == '' and getValue('90D_lens.left.missing') == '' ) + then + out = 'Inblikket til fundusbaggrunden er ' .. getValue('90D_lens.right.fundus_visibility') + .. ' på højre øje og ' .. getValue('90D_lens.left.fundus_visibility')..' på venstre.\n' + else + if ( getValue('90D_lens.right.missing') == '' ) + then + out = 'Inblikket til fundusbaggrunden er ' .. getValue('90D_lens.right.fundus_visibility') + .. ' på højre øje.\n' + end + if ( getValue('90D_lens.left.missing') == '' ) + then + out = 'Inblikket til fundusbaggrunden er ' .. getValue('90D_lens.left.fundus_visibility') + ..' på venstre øje.\n' + end + end + + if ( getValue('90D_lens.right.missing') == '' ) + then + if ( getValue('90D_lens.right.implikation') == 'retinal hævelse' ) + then + out = out .. 'På højre øje findes der retinal hævelse' + if ( getValue('90D_lens.right.randbl') ~= '' and getValue('90D_lens.right.exsudater') ~= '') + then + out = out .. ' med randblødning og exhudater.\n' + end + + if ( getValue('90D_lens.right.randbl') == '' and getValue('90D_lens.right.exsudater') ~= '') + then + out = out .. ' med exhudater.\n' + end + + if ( getValue('90D_lens.right.randbl') ~= '' and getValue('90D_lens.right.exsudater') == '') + then + out = out .. ' med randblødning.\n' + end + + if ( getValue('90D_lens.right.randbl') == '' and getValue('90D_lens.right.exsudater') == '') + then + out = out .. '.\n' + end + end + + if ( getValue('90D_lens.right.implikation') == 'atrofi' ) + then + out = out .. 'På højre øje findes der atrofi.\n' + end + end + + if ( getValue('90D_lens.left.missing') == '' ) + then + if ( getValue('90D_lens.left.implikation') == 'retinal hævelse' ) + then + out = out .. 'På venstre øje findes der retinal hævelse' + if ( getValue('90D_lens.left.randbl') ~= '' and getValue('90D_lens.left.exsudater') ~= '') + then + out = out .. ' med randblødning og exhudater.\n' + end + + if ( getValue('90D_lens.left.randbl') == '' and getValue('90D_lens.left.exsudater') ~= '') + then + out = out .. ' med exhudater.\n' + end + + if ( getValue('90D_lens.left.randbl') ~= '' and getValue('90D_lens.left.exsudater') == '') + then + out = out .. ' med randblødning.\n' + end + + if ( getValue('90D_lens.left.randbl') == '' and getValue('90D_lens.left.exsudater') == '') + then + out = out .. '.\n' + end + end + + if ( getValue('90D_lens.left.implikation') == 'atrofi' ) + then + out = out .. 'På venstre øje findes der atrofi.\n' + end + end + + if ( getValue('90D_lens.additional') ~= '' ) + then + out = out .. getValue('90D_lens.additional') .. '\n' + end + + return out + </resume> <queries> </queries> <maps> @@ -111,13 +200,14 @@ ${90D_lens.additional}</resume> <item caption="Klart" value="klart"/> <item caption="Let sløret" value="let sløret"/> <item caption="Meget sløret" value="meget sløret"/> - <item caption="Intet" value="intet"/> </combobox> <!-- Observationer --> - <radiobuttons name="90D_lens..right.implikation" value="" script="retinal_haevelse_right"> + <radiobuttons name="90D_lens.right.implikation" value=" " + script="retinal_haevelse_right"> <radiobutton caption="Retinal hævelse" value="retinal hævelse"/> <radiobutton caption="Atrofi" value="atrofi"/> + <radiobutton caption="Andet (se suppl.)" value=""/> </radiobuttons> <frame name="retinal_haevelse_right" layout="vbox"> @@ -143,13 +233,14 @@ ${90D_lens.additional}</resume> <item caption="Klart" value="klart"/> <item caption="Let sløret" value="let sløret"/> <item caption="Meget sløret" value="meget sløret"/> - <item caption="Intet" value="intet"/> </combobox> <!-- Observationer --> - <radiobuttons name="90D_lens.left.implikation" value="" script="retinal_haevelse_left"> + <radiobuttons name="90D_lens.left.implikation" value=" " + script="retinal_haevelse_left"> <radiobutton caption="Retinal hævelse" value="retinal hævelse"/> <radiobutton caption="Atrofi" value="atrofi"/> + <radiobutton caption="Andet (se suppl.)" value=""/> </radiobuttons> <frame name="retinal_haevelse_left" layout="vbox"> |