From 2f860415f5f679636bda936f23d44ec960740aa9 Mon Sep 17 00:00:00 2001 From: senator Date: Tue, 8 Sep 2009 09:35:21 +0000 Subject: Changed ref_tremaaneder_spaltelampe to ref_tremaanederskontrol-spaltelampe --- .../ref_tremaanederskontrol-spaltelampe-1.0.xml | 583 +++++++++++++++++++++ 1 file changed, 583 insertions(+) create mode 100644 server/xml/macros/ref_tremaanederskontrol-spaltelampe-1.0.xml (limited to 'server') diff --git a/server/xml/macros/ref_tremaanederskontrol-spaltelampe-1.0.xml b/server/xml/macros/ref_tremaanederskontrol-spaltelampe-1.0.xml new file mode 100644 index 0000000..3aeec87 --- /dev/null +++ b/server/xml/macros/ref_tremaanederskontrol-spaltelampe-1.0.xml @@ -0,0 +1,583 @@ + + + + out = '' + if ( getValue('spaltelampe.right.missing') == '' ) + then + out = out .. 'Spaltelampe, højre øje:\n' + + if ( getValue('spaltelampe.right.konjuktiva') ~= '' ) + then + out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.right.konjuktiva') .. '\n' + end + + out = out .. 'Cornea:\n' + if ( getValue('spaltelampe.right.epithel') ~= '' ) + then + out = out .. ' Epithel: ' .. getValue('spaltelampe.right.epithel') .. '\n' + end + if ( getValue('spaltelampe.right.stroma') ~= '' ) + then + out = out .. ' Stroma: ' .. getValue('spaltelampe.right.stroma') .. '\n' + end + if ( getValue('spaltelampe.right.flap') ~= '' ) + then + out = out .. ' Flap: ' .. getValue('spaltelampe.right.flap') .. '\n' + end + if ( getValue('spaltelampe.right.folder') ~= '' ) + then + out = out .. ' Folder: ' .. getValue('spaltelampe.right.folder') .. '\n' + end + if ( getValue('spaltelampe.right.interface.partikler') ~= '' or getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' ) + then + out = out .. ' Interface: ' + if ( getValue('spaltelampe.right.interface.partikler') ~= '' ) + then + out = out .. getValue('spaltelampe.right.interface.partikler') + if ( getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' ) + then + out = out .. ', ' + end + end + if ( getValue('spaltelampe.right.interface.epithelindvaekst') ~= '' ) + then + out = out .. getValue('spaltelampe.right.interface.epithelindvaekst') .. '\n' + else + out = out .. '\n' + end + end + if ( getValue('spaltelampe.right.endothel') ~= '' ) + then + out = out .. ' Endothel: ' .. getValue('spaltelampe.right.endothel') .. '\n' + end + if ( getValue('spaltelampe.right.lens') ~= '' ) + then + out = out .. 'Lens: ' .. getValue('spaltelampe.right.lens') .. '\n' + end + if ( getValue('spaltelampe.right.supplerende') ~= '' ) + then + out = out .. getValue('spaltelampe.right.supplerende') .. '\n' + end + end + + if ( getValue('spaltelampe.left.missing') == '' ) + then + if ( getValue('spaltelampe.right.missing') == '' ) + then + out = out .. '\n' + end + out = out .. 'Spaltelampe, venstre øje:\n' + + if ( getValue('spaltelampe.left.konjuktiva') ~= '' ) + then + out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.left.konjuktiva') .. '\n' + end + + out = out .. 'Cornea:\n' + if ( getValue('spaltelampe.left.epithel') ~= '' ) + then + out = out .. ' Epithel: ' .. getValue('spaltelampe.left.epithel') .. '\n' + end + if ( getValue('spaltelampe.left.stroma') ~= '' ) + then + out = out .. ' Stroma: ' .. getValue('spaltelampe.left.stroma') .. '\n' + end + if ( getValue('spaltelampe.left.flap') ~= '' ) + then + out = out .. ' Flap: ' .. getValue('spaltelampe.left.flap') .. '\n' + end + if ( getValue('spaltelampe.left.folder') ~= '' ) + then + out = out .. ' Folder: ' .. getValue('spaltelampe.left.folder') .. '\n' + end + if ( getValue('spaltelampe.left.interface.partikler') ~= '' or getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' ) + then + out = out .. ' Interface: ' + if ( getValue('spaltelampe.left.interface.partikler') ~= '' ) + then + out = out .. getValue('spaltelampe.left.interface.partikler') + if ( getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' ) + then + out = out .. ', ' + end + end + if ( getValue('spaltelampe.left.interface.epithelindvaekst') ~= '' ) + then + out = out .. getValue('spaltelampe.left.interface.epithelindvaekst') .. '\n' + else + out = out .. '\n' + end + end + if ( getValue('spaltelampe.left.endothel') ~= '' ) + then + out = out .. ' Endothel: ' .. getValue('spaltelampe.left.endothel') .. '\n' + end + if ( getValue('spaltelampe.left.lens') ~= '' ) + then + out = out .. 'Lens: ' .. getValue('spaltelampe.left.lens') .. '\n' + end + if ( getValue('spaltelampe.left.supplerende') ~= '' ) + then + out = out .. getValue('spaltelampe.left.supplerende') .. '\n' + end + end + + return out + + + + + + + + value = 0 + timestamp = 0 + source = '' + + if( missing_eye_right ) + then + if( missing_eye_right.value and missing_eye_right.value == '' ) + then + value = '' + timestamp = missing_eye_right.timestamp + source = missing_eye_right.source + else + value = 'mangler' + timestamp = missing_eye_right.timestamp + source = missing_eye_right.source + end + end + return value, timestamp, source + + + value = 0 + timestamp = 0 + source = '' + + if( missing_eye_left ) + then + if( missing_eye_left.value and missing_eye_left.value == '' ) + then + value = '' + timestamp = missing_eye_left.timestamp + source = missing_eye_left.source + else + value = 'mangler' + timestamp = missing_eye_left.timestamp + source = missing_eye_left.source + end + end + return value, timestamp, source + + + + + + + + + + + + + + + + + +