From 07bcea680576cebf123a75c737539708704bb89b Mon Sep 17 00:00:00 2001 From: senator Date: Tue, 8 Sep 2009 09:40:17 +0000 Subject: *** empty log message *** --- .../xml/macros/ref_tremaaneder_spaltelampe-1.0.xml | 583 --------------------- 1 file changed, 583 deletions(-) delete mode 100644 server/xml/macros/ref_tremaaneder_spaltelampe-1.0.xml (limited to 'server/xml/macros') diff --git a/server/xml/macros/ref_tremaaneder_spaltelampe-1.0.xml b/server/xml/macros/ref_tremaaneder_spaltelampe-1.0.xml deleted file mode 100644 index 3aeec87..0000000 --- a/server/xml/macros/ref_tremaaneder_spaltelampe-1.0.xml +++ /dev/null @@ -1,583 +0,0 @@ - - - - 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 - - - - - - - - - - - - - - - - - -